Category : BASIC Source Code
Archive   : SNIPPIT.ZIP
Filename : SNIPPITS.MDB

 
Output of file : SNIPPITS.MDB contained in archive : SNIPPIT.ZIP
xRich äïñòßçóÕÐÿÿÍüÿÙÝÞÝâÞÞÞÙàÐÿÿÕä
Þ
Üå
ÜÜÜÙã ÜÐÿÿÕß ÛÏþÿÍüÿÎýÿÌûÿÝ ÙÝÕÐÿÿÕˆ€@F€@ 
ð€@
YYYÞ€@ V€@999ª€@ð·ÅŠOܦm7Ë”]&ì´·ý
€`®‘3Áà@©tâ³Áà@7Õ£Snippits€–ÜSnippitsþ˜ÿseßÜ DescriptionÝ Descriptionæ Descriptionç+One Line Description of Source Code Snip-ItýskÜSnippitÝSnippitæSnippitç$The Actual Source Code for this Taskýï000000...&
8 À¦y3Áà@à©RÁà@Snippits0...&ÿ: `§¸ü2Áà@ ‰¼ü2Áà@
MSysMacros2000&ÿ7 `þ½ü2Áà@`þ½ü2Áà@7ÕTDForms/---&7  5¿ü2Áà@ 5¿ü2Áà@7Scripts/---&7 `þ½ü2Áà@`þ½ü2Áà@ĺ°Reports/---&7  5¿ü2Áà@ 5¿ü2Áà@Modules/---&5 `þ½ü2Áà@`þ½ü2Áà@¨–„rForms-+++&6 n€MSysDb.,,,&9 n€Databases1///&6 n€Tables.,,,&;  €MSysQueries3111&ÿ8  €MSysACEs0...&ÿ;  €MSysIndexes3111&ÿ;  €MSysColumns3111&ÿ; & €MSysObjects3111&ÿ5Ì
䤆b>!äĦ‡eDùÔµ”oM/îÆŸ}[7ñ˦…`5õÖ³“qP.Û·”nHõÌ) Íüÿ ä RgkeydReference$( ã ä IdxidReference#+ ß ä ObjectIdReference&& Þ
ä DeleteAction!& Ý ä UpdateAction!# Üä MatchType$ Üä FClustered) Üä FExcludeAllNull$* Üä FDisallowAnyNull%" Üä FPrimary! Üä FUnique" Îýÿ ä Rglocale Ïþÿ ä Rgkeyd# Ûä Operation Ùä Idxid Ðÿÿ
ä NameÇ" ÕObjectId+ ä
ä PresentationOrder&% Ìûÿ ä Description Ç! Íüÿ ä LvExtra% Îýÿ ä RmtInfoLong & Ïþÿ ä RmtInfoShort!% ä ä FRestricted ! âä Country$ àä LanguageId" Þä CodePage" Þä FVersion' Þä FDisallowNull"( Þä FAutoincrement# Ýä Coltyp! Ùä Hcolumn Ðÿÿ
ä NameÇ" ÕObjectId% Æõÿ ä Description Ç! Çöÿ ä LvExtra óä Flags% È÷ÿ ä RmtInfoLong & Éøÿ ä RmtInfoShort!% Êùÿ
ä ForeignName Ç! Ëúÿ ä ConnectÇ" Ìûÿ ä DatabaseÇ Íüÿ ä Owner òä CVar ñä CFixed! ïä CbFixed Îýÿ ä Lv Ïþÿ ä Rgb$ çä DateUpdate$ ßä DateCreate Ýä Type Ðÿÿ
ä NameÇ" ÙParentId ÕIdÊ$$ Õ¯‰dCüßÂœzW8úÖ¸–tQ-
çÄ¡~[8óÏ°ŽjE$! Ïþÿ ä SnippitÇ% Ðÿÿ ä Description Ç$ Ãò@
ä ÁàScriptNameÇ" Ù` 'ÁàScriptId Äó@
ä ÁàLabelÇ$ Åôÿ
ä ÁàExpressionÇ" Æõÿ
ä ÁàCommentsÇ# Çöÿ
ä ÁàArgument9Ç# È÷ÿ
ä ÁàArgument8Ç# Éøÿ
ä ÁàArgument7Ç# Êùÿ
ä ÁàArgument6Ç# Ëúÿ
ä ÁàArgument5Ç# Ìûÿ
ä ÁàArgument4Ç# Íüÿ
ä ÁàArgument3Ç# Îýÿ
ä ÁàArgument2Ç$ Ïþÿ
ä ÁàArgument10Ç# Ðÿÿ
ä ÁàArgument1Ç" ×` 'ÁàActionNo" Õ` 'ÁàActionId Úä Flag$ Íüÿ ä ExpressionÇ Îýÿ
ä Name2Ç Ïþÿ
ä Name1Ç Ðÿ€ Order# ÙAttribute" ÕObjectId& ÝFInheritable! ÙACM Ðÿÿ SID" ÕObjectId% È÷ÿ ä Description Ç! Éøÿ ä LvExtra% Êùÿ ä RmtInfoLong & Ëúÿ ä RmtInfoShort!& å
ä FDontEnforce!+ Ìûÿ ä RglocaleReference&#¹ŒEþËo#L@
ä ÁScNmLabelIndexSDTÃò@
Äó@
ä äE5%G\ObjectIdAttributeÕÙÐÿ€ ä ä äU=%?3ObjectIdÕ ä,$'GObjectIdNameÕÐÿÿ
ä ä@0 GObjectIdNameÕÐÿÿ
ä ä@0 ?-IdÕ ä&?GParentIdNameÙÐÿÿ
ä ä@0 /†¼„ëF3 
ÙúÅ®—ä€iÐW¼helfÅ!%õL6H:ÿûûÿøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøÿûøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøûÿøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøøÿÿ ÿÿ ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r ÿÿ  ÿÿ vvpjssjwvvpjssjwvov}vo`burv
wdgruov vbujswv ufsruwv
ordxmfv  gruov
ov}vdaov}vtxfujfvov}vrakfbwvov}vjpdf|fvov}vbrmxopvov}v`bfv
w`amfvd`w`a`vfv"`(öìâØÎtjĺ°¦œ’ˆ~`€€
  
 €€€€€šYÎíÛȸ¤ŽxaP9+
úéÕƯ—‡saN7íÙÆ°y\E-þèÌ´™…raG4ûÞÉ·œˆkT<$ýéÚůŸŽ}iXD0ðÛƱœ‡r]I3"øá΀vpjssjw#
€dfvbujswjrp"
€vbujswp`of!
€vbujswjd
€m`afm
€f|sufvvjrp
€broofpwv
€`uhxofpw_
€`uhxofpw^
€`uhxofpw]
€`uhxofpw\
€`uhxofpw[
€`uhxofpwZ
€`uhxofpwY
€`uhxofpwX
€`uhxofpwWV
€`uhxofpwW
€`bwjrppr
€`bwjrpjd
€rudfu
€rakfbwjd

€p`ofX
€p`ofW
€gm`h
€f|sufvvjrp
€`wwujaxwf

€vjd
€rakfbwjd
€gjpifujw`amf

€`bo
€xsd`wf`bwjrp0 €uowjpgrviruw
€uowjpgrmrph
€uhmrb`mfufgfufpbf
€uhmrb`mf) €uhlf}dufgfufpbf4
€uhlf}d( €rsfu`wjrp' €rakfbwjdufgfufpbf2 €rakfbwjd$ €p`of% €o`wbiw}sf/ €mzf|wu`
€jd|jdufgfufpbf3 €jd|jd& €gxpjtxf* €gsujo`u}+ €gf|bmxdf`mmpxmm- €gdrpwfpgrubf
€gdjv`mmr{`p}pxmm, €gbmxvwfufd. €dfvbujswjrp
€dfmfwf`bwjrp1 €uowjpgrviruw €uowjpgrmrph €sufvfpw`wjrprudfu# €rakfbwjd €p`of €mzf|wu`! €m`phx`hfjd €ibrmxop €gzfuvjrp €gufvwujbwfd €gdjv`mmr{pxmm €g`xwrjpbufofpw €dfvbujswjrp" €brxpwu}
€brmw}s €brdfs`hf €w}sf €uowjpgrviruw €uowjpgrmrph
€uha €s`ufpwjd €r{pfu €p`of €mzf|wu` €mz €jd €grufjhpp`of €gm`hv €dfvbujswjrp €d`wfxsd`wf €d`wfbuf`wf €d`w`a`vf €bz`u
€brppfbw

€bgj|fd €bagj|fd ¼\6òÚª–y\ 
€vbpom`afmjpdf|vdw €rakfbwjd`wwujaxwf €rakfbwjd €rakfbwjdp`of €rakfbwjdp`of €s`ufpwjdp`of €jd ¨®vó0!?Ü
ÅoöNÛÀ¥ŠX®99
  
€ €€)*€%&'(€#$€!"€   
 
èOܦm7Ë”]&ì´·ý
€`®‘3Áà@©tâ³Áà@7Õ£Snippits€–ÜSnippitsþ˜ÿseßÜ DescriptionÝ Descriptionæ Descriptionç+One Line Description of Source Code Snip-ItýskÜSnippitÝSnippitæSnippitç$The Actual Source Code for this Taskýï000000...&
8 À¦y3Áà@à©RÁà@Snippits0...&ÿ: `§¸ü2Áà@ ‰¼ü2Áà@
MSysMacros2000&ÿ7 `þ½ü2Áà@`þ½ü2Áà@7ÕTDForms/---&7  5¿ü2Áà@ 5¿ü2Áà@7Scripts/---&7 `þ½ü2Áà@`þ½ü2Áà@ĺ°Reports/---&7  5¿ü2Áà@ 5¿ü2Áà@Modules/---&5 `þ½ü2Áà@`þ½ü2Áà@Forms-+++&6 n€MSysDb.,,,&9 n€Databases1///&6 n€Tables.,,,&;  €MSysQueries3111&ÿ8  €MSysACEs0...&ÿ;  €MSysIndexes3111&ÿ;  €MSysColumns3111&ÿ; & €MSysObjects3111&ÿì€XèíÛȸ¤ŽxaP9+
úéÕƯ—‡saN7íÙÆ°y\E-þèÌ´™…raG4ûÞÉ·œˆkT<$ýéÚůŸŽ}iXD0ðÛƱœ‡r]I3"€vbujswjd
€m`afm
€f|sufvvjrp
€broofpwv
€`uhxofpw_
€`uhxofpw^
€`uhxofpw]
€`uhxofpw\
€`uhxofpw[
€`uhxofpwZ
€`uhxofpwY
€`uhxofpwX
€`uhxofpwWV
€`uhxofpwW
€`bwjrppr
€`bwjrpjd
€rudfu
€rakfbwjd

€p`ofX
€p`ofW
€gm`h
€f|sufvvjrp
€`wwujaxwf

€vjd
€rakfbwjd
€gjpifujw`amf

€`bo
€xsd`wf`bwjrp0 €uowjpgrviruw
€uowjpgrmrph
€uhmrb`mfufgfufpbf
€uhmrb`mf) €uhlf}dufgfufpbf4
€uhlf}d( €rsfu`wjrp' €rakfbwjdufgfufpbf2 €rakfbwjd$ €p`of% €o`wbiw}sf/ €mzf|wu`
€jd|jdufgfufpbf3 €jd|jd& €gxpjtxf* €gsujo`u}+ €gf|bmxdf`mmpxmm- €gdrpwfpgrubf
€gdjv`mmr{`p}pxmm, €gbmxvwfufd. €dfvbujswjrp
€dfmfwf`bwjrp1 €uowjpgrviruw €uowjpgrmrph €sufvfpw`wjrprudfu# €rakfbwjd €p`of €mzf|wu`! €m`phx`hfjd €ibrmxop €gzfuvjrp €gufvwujbwfd €gdjv`mmr{pxmm €g`xwrjpbufofpw €dfvbujswjrp" €brxpwu}
€brmw}s €brdfs`hf €w}sf €uowjpgrviruw €uowjpgrmrph
€uha €s`ufpwjd €r{pfu €p`of €mzf|wu` €mz €jd €grufjhpp`of €gm`hv €dfvbujswjrp €d`wfxsd`wf €d`wfbuf`wf €d`w`a`vf €bz`u
€brppfbw

€bgj|fd €bagj|fd B€V+®îxfTB0º¨–„rüêØÆ´>,ö€n\J8°žŒzò|jôâlZH6À® v|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r ö ö ö vö|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r  v|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r  v|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r  v|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r  ÿÿ ÿÿ ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r ÿÿ ÿÿ  ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r ÿÿ ÿÿ 
 ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r ÿÿ ÿÿ ö ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r ÿÿ ÿÿ  ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r ÿÿ ÿÿ ö ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r  xØîÜfTB0º¨–„üêØcros2000&ÿjKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r 3  š-×Áà@ š-×Áà@Snippits.&ÿ5 ` '×Áà@€c,×Áà@
°¦MSysMacros0&ÿ2  —%×Áà@ —%×Áà@7ÕTDForms-&2  —%×Áà@ —%×Áà@7Scripts-&2  —%×Áà@ —%×Áà@ĺ°Reports-&2 ÿÿ ÿÿ ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r ÿÿ  ÿÿ vÿÿ|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r    v|ÌįgŸƒØoÂ͉RQßc¶ží‰ÃdN¶Ïæ§"¬Ýùª?*ßV#jKßV#jKrÌväwl±rßV#jKßV#jKßV#jKßV#jKßV#r   ª00âÊ»ÐÐïP// Used to store Bitmaps with Captions to display in list box
class CBitmapCaption
{
public:
CBitmap m_Bitmap[25];
CString m_Caption[25];
};

// CPicListBox (The actual listbox on the CPicListBoxWnd parent window)
class CPicListBox : public CListBox
{
public:
CPicListBox(CWnd* pParent);
};

/////////////////////////////////////////////////////////////////////////////
// CPicListBoxWnd window
class CPicListBoxWnd : public CWnd
{
public:
CPicListBoxWnd(CWnd*);
virtual ~CPicListBoxWnd();
void AddItem(CString, CString);
CPicListBox* m_pLB_LIST;
private:
CBitmapCaption m_ListItem;
int m_nListCount; // Count of Items in List
int m_nItemSpacing; // Distance Items should be seperated by in listbox
int m_nOffsetY; // Distance to place bitmap from top of rect for each item in list
HFONT m_ListFont; // Font to be used in listbox
protected:
//{{AFX_MSG(CPicListBoxWnd)
afx_msg int OnCreate(LPCREATESTRUCT lpCreateStruct);
afx_msg void OnDrawItem(int nIDCtl, LPDRAWITEMSTRUCT lpDrawItemStruct);
afx_msg void OnMeasureItem(int nIDCtl, LPMEASUREITEMSTRUCT lpMeasureItemStruct);
afx_msg void OnDblclkList();
//}}AFX_MSG
DECLARE_MESSAGE_MAP()
};

/* CPicListBoxWnd is a parent window for a list box that displays Bitmap Images and Text.
The Bitmaps should be 48 x 100. The x axis (100) is variable and can be changed
to almost any number without bad side effects. The y axis (48) can be changed
but you will need to adjust the m_nItemSpacing in the InitDialog
Set m_ItemSpacing to Bitmap Height + 20. This will allow enough
clearance for the rectangle that is drawn when an item is selected (Assuming you
are using the Arial 8 pt. font). m_nOffsetY determines the amount of space to leave
blank at the top of each list item. The actual listbox control is in a class called
CPicListBox which is an owner draw listbox derived from CListBox. This is called in the
constructor of CPicListBof00ÐÐïPxWnd. A Listbox sends messages to its parent window only. This is
the reason for CPicListBoxWnd's existance.

Code By: Todd Osborne 12/14/93
*/

#include
#include
#include "piclistb.h"

#ifdef _DEBUG
#undef THIS_FILE
static char BASED_CODE THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CPicListBoxWnd
CPicListBoxWnd::CPicListBoxWnd(CWnd* pParent)
{
CRect Prect;
pParent->GetClientRect(&Prect);

CRect rect(0, 0, 150, Prect.Height());
Create(NULL, "", WS_CHILD | WS_VISIBLE, rect, pParent, 5000, NULL);

// Set Variables needed for drawing list box (See Notes above and in .h file)
m_nListCount = 0;
m_nOffsetY = 13;
m_nItemSpacing = 78;

// Create the actual List Box
m_pLB_LIST= new CPicListBox(this);

// Add Item(s) to List Box
AddItem("A", "Test 0");
AddItem("B", "Test 1");
AddItem("C", "Test 2");
AddItem("D", "Test 3");
AddItem("E", "Test 4");
}

CPicListBoxWnd::~CPicListBoxWnd()
{
delete m_pLB_LIST;
}

void CPicListBoxWnd::AddItem(CString szBitmapName, CString szCaption)
{
// szBitampName: String name of bitmap in resource file
// szCaption: String to be displayed to right of bitmap in list
if ( m_nListCount<=24 )
{
m_ListItem.m_Bitmap[m_nListCount].LoadBitmap(szBitmapName);
m_ListItem.m_Caption[m_nListCount] = szCaption;
m_pLB_LIST->AddString((LPCSTR)&m_ListItem.m_Bitmap[this->m_nListCount]);
this->m_nListCount++;
}
}

BEGIN_MESSAGE_MAP(CPicListBoxWnd, CWnd)
//{{AFX_MSG_MAP(CPicListBoxWnd)
ON_WM_CREATE()
ON_WM_DRAWITEM()
ON_WM_MEASUREITEM()
ON_LBN_DBLCLK(5001, OnDblclkList)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CPicListBoxWnd message handlers
int CPicListBoxWnd::OnCreate(LPCREATESTRUCT lpCreateStruct)
{
if (CWnd::OnCreate(lpCreateStruct) == -1)
return -1;

// Font to beÎ00

ŒG2x ÿÿÿÿÕ'ÐÐïP used in List Box
m_ListFont = CreateFont(14, 0, 0, 0, FW_MEDIUM, 0, 0, 0, ANSI_CHARSET, OUT_STROKE_PRECIS, CLIP_STROKE_PRECIS, DEFAULT_QUALITY, FF_SWISS | FF_DONTCARE, "Arial" );

return 0;
}

void CPicListBoxWnd::OnDrawItem(int nIDCtl, LPDRAWITEMSTRUCT lpDrawItemStruct)
{
CDC* pDC = CDC::FromHandle(lpDrawItemStruct->hDC);

if ((lpDrawItemStruct->itemState & ODS_SELECTED) && (lpDrawItemStruct->itemAction & (ODA_SELECT | ODA_DRAWENTIRE)))
{
// item has been selected - hilite frame
CBrush Brush(GetSysColor(COLOR_HIGHLIGHT));
pDC->FillRect(&lpDrawItemStruct->rcItem, &Brush);
Brush.DeleteObject();
}

if (!(lpDrawItemStruct->itemState & ODS_SELECTED) && (lpDrawItemStruct->itemAction & ODA_SELECT))
{
// Item has been de-selected -- remove frame
CBrush Brush(pDC->GetBkColor());
pDC->FillRect(&lpDrawItemStruct->rcItem, &Brush);
Brush.DeleteObject();
}

// Draw the bitmap (Bitmap will be centered left<>right in list box
CDC MemDC;
MemDC.CreateCompatibleDC (pDC);
MemDC.SelectObject((CBitmap*)lpDrawItemStruct->itemData);

CBitmap* pBitmap = (CBitmap*)lpDrawItemStruct->itemData;
BITMAP Bitmap;
pBitmap->GetObject(sizeof(Bitmap), &Bitmap);

pDC->BitBlt ( ((lpDrawItemStruct->rcItem.right - lpDrawItemStruct->rcItem.left) / 2) - Bitmap.bmWidth / 2,
lpDrawItemStruct->rcItem.top + m_nOffsetY,
lpDrawItemStruct->rcItem.right,
lpDrawItemStruct->rcItem.bottom,
&MemDC, 0, 0, SRCCOPY);

// Determine which item is being added by looking at the rectangle (position).
// Add appropriate caption string
int ItemNum = (lpDrawItemStruct->rcItem.top / m_nItemSpacing);

// Select which colors to use for text depending on itemState
if (lpDrawItemStruct->itemState & ODS_SELECTED)
{
// Item is Selected
pDC->SetBkColor(GetSysColor(COLOR_HIGHLIGHT));
pDC->SetTextColor(GetSysColor(COLOR_HIGHLIGHTTEXT));
}
else
{
// Item is De-Selecteð??ÿÿÿøøÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿøøÿÿÿÿÿÿÿÿÿÿÿøøÿÿÿÿÿÿÿÿÿÿÿÿÿý ù $)nÁÐïPd
pDC->SetBkColor(GetSysColor(COLOR_WINDOW));
pDC->SetTextColor(GetSysColor(COLOR_WINDOWTEXT));
}

// Select the font for the list box and draw the text (m_Caption)
CFont* pOldFont = pDC->SelectObject(CFont::FromHandle(m_ListFont));

pDC->DrawText(m_ListItem.m_Caption[ItemNum],
m_ListItem.m_Caption[ItemNum].GetLength(),
&lpDrawItemStruct->rcItem,
DT_BOTTOM | DT_CENTER | DT_SINGLELINE);

// Good Measures
pDC->SelectObject(pOldFont);
pOldFont->DeleteObject();
ReleaseDC(pDC);
}

void CPicListBoxWnd::OnMeasureItem(int nIDCtl, LPMEASUREITEMSTRUCT lpMeasureItemStruct)
{
lpMeasureItemStruct->itemHeight = m_nItemSpacing;
}

void CPicListBoxWnd::OnDblclkList()
{
// Double Clicked In The List
int ListItem = m_pLB_LIST->GetCurSel();

// Send Notification Message to handler
MessageBox("Clicked in List Box", "Test", MB_OK);
}

CPicListBox::CPicListBox(CWnd* pParent)
{
CRect Prect;
pParent->GetClientRect(&Prect);

CRect rect(Prect.left, Prect.top, Prect.Width()-1, Prect.Height());
Create(LBS_OWNERDRAWVARIABLE | LBS_NOTIFY | LBS_DISABLENOSCROLL | WS_VSCROLL | WS_CHILD | WS_VISIBLE | WS_BORDER, rect, pParent, 5001);
}
̸¸->SetBkColor(GetSysColor(COLOR_WINDOW));
pDC->SetTextColor(GetSysColor(COLOR_WINDOWTEXT));
}

// Select the font for the list box and draw the text (m_Caption)
CFont* pOldFont = pDC->SelectObject(CFont::FromHandle(m_ListFont));

pDC->DrawText(m_ListItem.m_Caption[ItemNum],
m_ListItem.m_Caption[ItemNum].GetLength(),
&lpDrawItemStruct->rcItem,
DT_BOTTOM | DT_CENTER | DT_SINGLELINE);

// Good Measures
pDC->SelectObject(pOldFont);
pOldFont->DeleteObject();
ReleaseDC(pDC);
}

void CPicListBoxWnd::OnMeasureItem(int nIDCtl, LPMEASUREITEMSTRUCT lpMeasureItemStruct)
{
lpMeasureItemStruct->itemHeight = m_nItemSpacing;
}

void CPicListBoxWnd::OnDblclkList()
{
// Double Clicked In The List
int ListItem = m_pLB_LIST->GetCurSel();

// Send Notification Message to handler
MessageBox("Clicked in List Box", "Test", MB_OK);
}

CPicListBox::CPicListBox(CWnd* pParent)
{
CRect Prect;
pParent->GetClientRect(&Prect);

CRect rect(Prect.left, Prect.top, Prect.Width()-1, Prect.Height());
Create(LBS_OWNERDRAWVARIABLE | LBS_NOTIFY | LBS_DISABLENOSCROLL | WS_VSCROLL | WS_CHILD | WS_VISIBLE | WS_BORDER, rect, pParent, 5001);
}
itmap);

pDC->BitBlt ( ((lpDrawItemStruct->rcItem.right - lpDrawItemStruct->rcItem.left) / 2) - Bitmap.bmWidth / 2,
lpDrawItemStruct->rcItem.top + m_nOffsetY,
lpDrawItemStruct->rcItem.right,
lpDrawItemStruct->rcItem.bottom,
&MemDC, 0, 0, SRCCOPY);

// Determine which item is being added by looking at the rectangle (position).
// Add appropriate caption string
int ItemNum = (lpDrawItemStruct->rcItem.top / m_nItemSpacing);

// Select which colors to use for text depending on itemState
if (lpDrawItemStruct->itemState & ODS_SELECTED)
{
// Item is Selected
pDC->SetBkColor(GetSysColor(COLOR_HIGHLIGHT));
pDC->SetTextColor(GetSysColor(COLOR_HIGHLIGHTTEXT));
}
else
H€CPicListBox Show Bitmaps and Text in a Listbox ÐïPD6romHandlePermanentòñ@>
DeleteTempMapB>AttachóòñD>DetachóòñB>SubclassWindowóòñF>SubclassDlgItemòñH>CreateExñJ>CreateóòñM>
DestroyWindowO>PreCreateWindowòñQ>CalcWindowRectóòñS> GetDlgCtrlIDñU>
GetDlgItemóòñU>GetDescendantWindowòñW>SendMessageToDescendantsñY>GetParentFrameóòñ[> SendMessageòñ]> PostMessageòñ_>
SetWindowTexta>
GetWindowTextS>GetWindowTextLengthòñd>SetFontòñf>GetFontòñh>GetMenuòñj>SetMenuòñm> DrawMenuBaròñn>
GetSystemMenup>HiliteMenuItemóòñS>IsIconicñS>IsZoomedñs>
MoveWindowóòñ1>wndTopóòñ1> wndBottom1>
wndTopMostóòñ1> wndNoTopMostñv> SetWindowPosñz>ArrangeIconicWindowsñm>BringWindowToTopñ|>
GetWindowRect|>
GetClientRect~>GetWindowPlacementóòñ€>SetWindowPlacementóòñ‚>ClientToScreenóòñ‚>ScreenToClientóòñ„>MapWindowPointsòñ‰>
BeginPaintóòñ‹>EndPaintñ>GetDC> GetWindowDCòñ> ReleaseDCm> UpdateWindowñ‘> SetRedraw“>
GetUpdateRect•> GetUpdateRgnñ‘>
Invalidateóòñ—>InvalidateRectóòñ˜>
InvalidateRgnš> ValidateRectñœ> ValidateRgnòñž>
ShowWindowóòñS>IsWindowVisibleòñ‘>ShowOwnedPopupsòñ >GetDCExòñ¢>LockWindowUpdateñ£> RedrawWindowñ¥>EnableScrollBaròñ§>SetTimerñž> KillTimerS>IsWindowEnabledòñž> EnableWindowñ©>GetActiveWindowòñ«>SetActiveWindowòñ©>
GetCaptureóòñ«>
SetCaptureóòñ©>GetFocusñ«>SetFocusñ©>GetDesktopWindowñm> CloseWindowòñ¢>OpenIconñ«>SetSysModalWindow©>GetSysModalWindow­>CheckDlgButtonóòñ¯>CheckRadioButtonñ±>GetCheckedRadioButton³>
DlgDirListóòñ³>DlgDirListComboBoxóòñµ> DlgDirSelectñµ>DlgDirSelectComboBoxñ·>
GetDlgItemInt¹>GetDlgItemTextóòñ»>GetNextDlgGroupItemòñ»>GetNextDlgTabItem¾>IsDlgButtonCheckedóòñÀ>SendDlgItemMessageóòñÂ>
SetDlgItemIntÄ>SetDlgItemTextóòñÆ> GetScrollPosñÈ>GetScrollRangeóòñÊ> ScrollWindowñÌ> SetScrollPosñÎ>SetScrollRangeóòñÐ>
ShowScrollBarÒ>EnableScrollBarCtrlòñÔ>GetScrollBarCtrlñÖ>ScrollWindowExóòñØ>ChildWindowFromPointñÚ>
FindWindowóòñÜ>
GetNextWindowÞ> GetTopWindowñÜ> GetWindowÞ>GetLastActivePopupóòñà>IsChildòñÞ> GetParentã> SetParentå>WindowFromPointòñž> FlashWindowòñç>
MessageBoxóòñB>ChangeClipboardChainñD>SetClipboardVieweróòñ¢>
OpenClipboard©>GetClipboardOwner©>GetClipboardVieweróòñ©>GetOpenClipboardWindowóòñé> CreateCaretòñÒ>CreateSolidCaretñÒ>CreateGrayCaretòñë> GetCaretPosòñí> SetCaretPosòñm> HideCaretm> ShowCaret‘>DragAcceptFilesòñž>
UpdateDataóòñï>RepositionBarsóòññ>UpdateDialogControlsñó> OnCommandõ>
OnActivateóòñ÷>
OnActivateAppù> OnCancelModeñù>OnChildActivateòñù>OnCloseòñú>OnCreateñü>
OnCtlColoróòñù> OnDestroyÿ>OnEnableñÿ> OnEndSessionñ? OnEnterIdleòñ? OnEraseBkgndñ?OnGetMinMaxInfoòñ?OnIconEraseBkgndñ? OnKillFocusòñ ?
OnMenuCharóòñ ? OnMenuSelectñ?OnMoveóòñù>OnPaintòñ?OnParentNotifyóòñ?OnQueryDragIconòñ?OnQueryEndSession?OnQueryNewPalette? OnQueryOpenòñ?
OnSetFocusóòñ? OnShowWindowñ?OnSizeóòñ?OnWindowPosChangingòñ?OnWindowPosChangedóòñ? OnNcActivateñ? OnNcCalcSizeñú>
OnNcCreateóòñù> OnNcDestroyòñ? OnNcHitTestòñ?OnNcLButtonDblClk?OnNcLButtonDownòñ?
OnNcLButtonUp?OnNcMButtonDblClk?OnNcMButtonDownòñ?
OnNcMButtonUp?
OnNcMouseMoveù> OnNcPaint?OnNcRButtonDblClk?OnNcRButtonDownòñ?
OnNcRButtonUp ? OnDropFilesòñ?OnPaletteIsChangingòñ"? OnSysChar? OnSysCommandñ"?
OnSysDeadChar"? OnSysKeyDownñ"?
OnSysKeyUpóòñ#? OnCompactingñ%?OnDevModeChangeòñù> OnFontChangeñ?OnPaletteChangedñ&?OnSpoolerStatusòñù>OnSysColorChangeñù> OnTimeChangeñ%?OnWinIniChangeóòñ"?OnCharóòñ"?
OnDeadCharóòñ(? OnHScroll(? OnVScroll"? OnKeyDown"?OnKeyUpòñ?OnLButtonDblClkòñ?
OnLButtonDown? OnLButtonUpòñ?OnMButtonDblClkòñ?
OnMButtonDown? OnMButtonUpòñ*?OnMouseActivateòñ? OnMouseMoveòñ?OnRButtonDblClkòñ?
OnRButtonDown? OnRButtonUpòñ*? OnSetCursoròñ#?OnTimeròñ,?
OnInitMenuóòñ.?OnInitMenuPopupòñ0?OnAskCbFormatName2?OnChangeCbChainòñù>OnDestroyClipboardóòñù>OnDrawClipboardòñ4?OnHScrollClipboardóòñ6?OnPaintClipboardñù>OnRenderAllFormatsóòñ#?OnRenderFormatóòñ6?OnSizeClipboardòñ4?OnVScrollClipboardóòñ9?
OnCompareItem;? OnDeleteItemñ=?
OnDrawItemóòñ?? OnGetDlgCodeñ@?
OnMeasureItemB? OnCharToItemñB? OnVKeyToItemñ‡?
OnMDIActivateŠ?GetSuperWndProcAddròñŒ?DoDataExchangeóòñ?PreTranslateMessageòñ’?
WindowProcóòñ“?Defaultòñ•?
DefWindowProc–?
PostNcDestroy—?
OnChildNotify™?~CWndš? AssertValidòñœ?Dumpñž?SendChildNotifyLastMsgóòñ ?ExecuteDlgInitóòñ¢? GrayCtlColorñ¤? CenterWindowñ¥?
OnVBXEventóòñ¼=_messageEntriesòñÀ=
messageMapóòñ§?
GetMessageMapË;és
CCmdTargetñ"À)Ç)classCCmdTargetòñÚ+GetRuntimeClassòñÞ+
CCmdTargetóòñá+BeginWaitCursoròñá+
EndWaitCursorá+RestoreWaitCursorâ+OnCmdMsgñÌ; pRoutingViewñ)>GetRoutingViewóòñ¼=_messageEntriesòñÀ=
messageMapóòñ+>
GetMessageMap-> ~CCmdTargetòñÍ;'Î;kCViewòñÈ;Ç)
classCViewóòñç+GetRuntimeClassòñë+CViewÏ; GetDocumentòñú=DoPreparePrintingü=
IsSelectedóòñþ=OnActivateViewóòñ>OnInitialUpdateòñ>OnUpdateñ>OnDrawóòñ> OnPrepareDCòñ >OnPreparePrinting
>OnBeginPrintingòñ >OnPrintòñ >
OnEndPrinting
>OnEndPrintPreview>~CViewóòñ>Dumpñ> AssertValidòñ>DoPrintPreviewóòñÑ; m_pDocument>OnCmdMsgñ>PreCreateWindowòñ>
PostNcDestroy>GetScrollBarCtrlñ>OnCreateñë+ OnDestroyë+OnPaintòñ!>OnMouseActivateòñ#>OnUpdateSplitCmdñ%>
OnSplitCmdóòñ#>OnUpdateNextPaneMenuñ%>
OnNextPaneCmdë+ OnFilePrintòñë+OnFilePrintPreviewóòñ¼=_messageEntriesòñÀ=
messageMapóòñ'>
GetMessageMapÐ; Ñ;Í;é+Ò;+Ó;& CDocumentòñ‚Ê;Ç)classCDocumentóòñó+GetRuntimeClassòñ÷+ CDocumentú+GetTitleñü+SetTitleñú+ GetPathNameòñþ+ SetPathNameòñÔ;GetDocTemplateóòñÕ=
IsModifiedóòñ×=SetModifiedFlagòñÙ=AddViewòñÙ=
RemoveViewóòñÛ=GetFirstViewPositionñÝ= GetNextViewòñß=UpdateAllViewsóòñâ=OnChangedViewListã=DeleteContentsóòñä=
OnNewDocumentå=OnOpenDocumentóòñç=OnSaveDocumentóòñè=OnCloseDocumentòñé=ReportSaveLoadExceptionòñë=
CanCloseFrameí= SaveModifiedñ7
m_strTitleñ7

m_strPathNameòñÖ;m_pDocTemplateñ›+
m_viewListñr" m_bModifiedr$
m_bAutoDeleteòñî=Dumpñð= AssertValidòñò=
~CDocumentóòñó=DoSaveóòñ÷+UpdateFrameCountsõ=OnCmdMsgñ÷= OnFileCloseòñ÷=
OnFileSaveóòñ÷= OnFileSaveAsñ¼=_messageEntriesòñÀ=
messageMapóòñø=
GetMessageMapÕ; Ö;Ò;õ+×;Ø; CDocTemplateóòñ6Ê;Ç)classCDocTemplate,GetRuntimeClassòñ, CDocTemplateñ ,GetFirstDocPositionòñ
,
GetNextDocóòñ, AddDocumentòñ,RemoveDocumentóòñ oDocStringIndexñ, GetDocStringñ r
Confidenceñ, MatchDocTypeñ,CreateNewDocumentÙ;CreateNewFrameóòñÈ=InitialUpdateFrameóòñË=SaveAllModifiedòñÍ=OpenDocumentFileñÏ=
~CDocTemplateË)m_pAttachedServeròñÑ=DumpñÓ= AssertValidòñs
m_nIDResourceòñÆ) m_pDocClassÆ)

m_pFrameClassòñÆ) m_pViewClassóòñ7m_strDocStrings
Ú;8 Û;×;
,Ç=Ü;EÝ;s CFrameW

  3 Responses to “Category : BASIC Source Code
Archive   : SNIPPIT.ZIP
Filename : SNIPPITS.MDB

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/