<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman, new york, times, serif;font-size:12pt"><DIV style="FONT-SIZE: 12pt; FONT-FAMILY: times new roman, new york, times, serif">
<DIV style="FONT-SIZE: 12pt; FONT-FAMILY: times new roman, new york, times, serif">
<DIV>Summary :</DIV>
<DIV>"MakeIntResource" was previously declared as function in win32 and wince,windows.pp files,also we had one declared in rtl\resh.inc as pchar and also there was some uses of it just as pchar in classes.</DIV>
<DIV>All these makes some problems in lazarus,as we cant have constants declared as arrays of makeintresource and things like this.</DIV>
<DIV>Obviously makeintresource is just a type definition,so instead of this function</DIV>
<DIV> </DIV>
<DIV>function MAKEINTRESOURCE(i : longint) : LPTSTR;<BR> begin<BR> MAKEINTRESOURCE:=LPTSTR(DWORD(WORD(i)));<BR> end;</DIV>
<DIV> </DIV>
<DIV>it could be changed into pchar(LPSTR) or pwidechar(lpwcstr).</DIV>
<DIV>and making all other functions being declared as constants.</DIV>
<DIV> </DIV>
<DIV>I suggest the same changes also to win32.</DIV>
<DIV> </DIV>
<DIV>regards,</DIV>
<DIV>roozbeh</DIV>
<DIV> </DIV>
<P>
<HR SIZE=1>
Don't be flakey. <A href="http://us.rd.yahoo.com/evt=43909/*http://mobile.yahoo.com/mail" target=_blank rel=nofollow>Get Yahoo! Mail for Mobile</A> and <BR><A href="http://us.rd.yahoo.com/evt=43909/*http://mobile.yahoo.com/mail" target=_blank rel=nofollow>always stay connected</A> to friends.
<DIV>Index: inc/resh.inc<BR>===================================================================<BR>--- inc/resh.inc (revision 6486)<BR>+++ inc/resh.inc (working copy)<BR>@@ -3,7 +3,12 @@<BR> TResourceHandle = Cardinal;<BR> HMODULE = Cardinal;<BR> HGLOBAL = Cardinal;<BR>+{$ifdef UNICODE}<BR>+ {roozbeh : maybe it shoud be moved after ifndef mswindows,as there is one declared in wince,base.inc}<BR>+ MAKEINTRESOURCE = pwidechar;<BR>+{$else}<BR> MAKEINTRESOURCE = pchar;<BR>+{$endif} <BR> <BR>{$ifndef MSWINDOWS }<BR>{ windows has this in the windows unit. It probably would better<BR>Index: objpas/types.pp<BR>===================================================================<BR>--- objpas/types.pp (revision 6486)<BR>+++ objpas/types.pp (working copy)<BR>@@ -21,8 +21,14
@@<BR> Windows;<BR>{$endif Windows}<BR><BR>-const<BR>+ {$ifdef wince}<BR>+ //roozbeh:the reason is currently RT_RCDATA is defines in windows for wince as constant,<BR>+ // but in win32 it is function so here is required to redeclared.<BR>+ //RT_RCDATA = PWideChar(10);<BR>+ {$else}<BR>+ const<BR> RT_RCDATA = PChar(10);<BR>+ {$endif}<BR><BR>type<BR> DWORD = LongWord;<BR>Index: wince/wininc/base.inc<BR>===================================================================<BR>--- wince/wininc/base.inc (revision 6486)<BR>+++ wince/wininc/base.inc (working copy)<BR>@@ -54,7 +54,9 @@<BR> const<BR> ANYSIZE_ARRAY = 1; //~winnt,
moved from define to compile SID<BR> type<BR>- ATOM = word; //windef<BR>+<BR>+ MAKEINTRESOURCE = pwidechar;<BR>+ ATOM = word; //windef<BR> TAtom = ATOM;<BR><BR> WINBOOL = longbool;<BR>@@ -461,9 +463,6 @@<BR> { argument types are unknown }<BR> function MAKEINTATOM(i : longint) : LPTSTR;<BR><BR>- { was #define dname(params) def_expr }<BR>- { argument types are unknown }<BR>- function MAKEINTRESOURCE(i : longint) : LPTSTR;<BR><BR> { was #define dname(params) def_expr }<BR> { argument types are unknown }<BR>@@
-859,12 +858,6 @@<BR> MAKEINTATOM:=LPTSTR(DWORD(WORD(i)));<BR> end;<BR><BR>- { was #define dname(params) def_expr }<BR>- { argument types are unknown }<BR>- function MAKEINTRESOURCE(i : longint) : LPTSTR;<BR>- begin<BR>- MAKEINTRESOURCE:=LPTSTR(DWORD(WORD(i)));<BR>- end;<BR><BR> { was #define dname(params) def_expr }<BR> { argument types are unknown }<BR>Index: wince/wininc/defines.inc<BR>===================================================================<BR>--- wince/wininc/defines.inc (revision 6486)<BR>+++ wince/wininc/defines.inc (working copy)<BR>@@ -50,10 +50,9 @@<BR><BR>{$PACKRECORDS C}<BR><BR>- { was #define dname def_expr }<BR>- function UNICODE_NULL : WCHAR;<BR><BR>
const<BR>+ UNICODE_NULL = widechar(#0);<BR> NULL=0; //+windef<BR> //FALSE=0; //+windef, removed can't compile<BR> //TRUE=1; //+windef, removed can't compile<BR>@@ -1155,62 +1154,21 @@<BR> { EnumPrinters }<BR> { EnumProtocols }<BR> { EnumResLangProc }<BR>- { was #define dname def_expr
}<BR>- function RT_ACCELERATOR : LPTSTR;<BR>- { return type might be wrong }<BR>+ RT_ACCELERATOR = MAKEINTRESOURCE(9);<BR>+ RT_BITMAP = MAKEINTRESOURCE(2);<BR>+ RT_DIALOG = MAKEINTRESOURCE(5);<BR>+ RT_FONT = MAKEINTRESOURCE(8);<BR>+ RT_FONTDIR = MAKEINTRESOURCE(7);<BR>+ RT_MENU = MAKEINTRESOURCE(4);<BR>+ RT_RCDATA = MAKEINTRESOURCE(10);<BR>+ RT_STRING = MAKEINTRESOURCE(6);<BR>+ RT_MESSAGETABLE = MAKEINTRESOURCE(11);<BR>+ RT_CURSOR = MAKEINTRESOURCE(1);<BR>+ RT_GROUP_CURSOR = MAKEINTRESOURCE(12);<BR>+ RT_ICON = MAKEINTRESOURCE(3);<BR>+ RT_GROUP_ICON = MAKEINTRESOURCE(13);<BR>+ RT_VERSION
= MAKEINTRESOURCE(16);<BR><BR>- { was #define dname def_expr }<BR>- function RT_BITMAP : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_DIALOG : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_FONT : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_FONTDIR : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_MENU : LPTSTR;<BR>- { return type might be wrong
}<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_RCDATA : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_STRING : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_MESSAGETABLE : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_CURSOR : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_GROUP_CURSOR : LPTSTR;<BR>- { return type might be wrong
}<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_ICON : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_GROUP_ICON : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_VERSION : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR> { EnumServicesStatus }<BR><BR> const<BR>@@ -1621,94 +1579,29 @@<BR> HANDLE_FLAG_INHERIT = 1;<BR> HANDLE_FLAG_PROTECT_FROM_CLOSE = 2;<BR> { GetIconInfo }<BR>- { was #define dname def_expr }<BR>- function IDC_ARROW :
LPTSTR;<BR>- { return type might be wrong }<BR>+ IDC_ARROW = MAKEINTRESOURCE(32512);<BR>+ IDC_IBEAM = MAKEINTRESOURCE(32513);<BR>+ IDC_WAIT = MAKEINTRESOURCE(32514);<BR>+ IDC_CROSS = MAKEINTRESOURCE(32515);<BR>+ IDC_UPARROW = MAKEINTRESOURCE(32516);<BR>+ IDC_SIZENWSE = MAKEINTRESOURCE(32642);<BR>+ IDC_SIZENESW = MAKEINTRESOURCE(32643);<BR>+ IDC_SIZEWE = MAKEINTRESOURCE(32644);<BR>+ IDC_SIZENS = MAKEINTRESOURCE(32645);<BR>+ IDC_SIZEALL = MAKEINTRESOURCE(32646);<BR>+ IDC_NO = MAKEINTRESOURCE(32648);<BR>+ IDC_APPSTARTING = MAKEINTRESOURCE(32650);<BR>+ IDC_HELP = MAKEINTRESOURCE(32651);<BR>+ IDI_APPLICATION =
MAKEINTRESOURCE(32512);<BR>+ IDI_HAND = MAKEINTRESOURCE(32513);<BR>+ IDI_QUESTION = MAKEINTRESOURCE(32514);<BR>+ IDI_EXCLAMATION = MAKEINTRESOURCE(32515);<BR>+ IDI_ASTERISK = MAKEINTRESOURCE(32516);<BR>+ IDI_WINLOGO = MAKEINTRESOURCE(32517);<BR>+ IDC_SIZE = MAKEINTRESOURCE(32640);<BR>+ IDC_ICON = MAKEINTRESOURCE(32641);<BR>+ IDC_HAND = MAKEINTRESOURCE(32649);<BR><BR>- { was #define dname def_expr }<BR>- function IDC_IBEAM : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_WAIT : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define
dname def_expr }<BR>- function IDC_CROSS : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_UPARROW : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZENWSE : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZENESW : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZEWE : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr
}<BR>- function IDC_SIZENS : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZEALL : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_NO : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_APPSTARTING : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_HELP : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr
}<BR>- function IDI_APPLICATION : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_HAND : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_QUESTION : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_EXCLAMATION : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_ASTERISK : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr
}<BR>- function IDI_WINLOGO : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZE : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_ICON : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_HAND : LPTSTR;<BR>- { return type might be wrong }<BR>-<BR> { GetMapMode }<BR><BR> const<BR>@@ -1771,22 +1664,18 @@<BR> SIF_DISABLENOSCROLL = 8;<BR> SIF_TRACKPOS = $10;<BR> {
GetStdHandle }<BR>- { was #define dname def_expr }<BR>- function STD_INPUT_HANDLE : DWORD;<BR><BR>- { was #define dname def_expr }<BR>- function STD_OUTPUT_HANDLE : DWORD;<BR><BR>- { was #define dname def_expr }<BR>- function STD_ERROR_HANDLE : DWORD;<BR>+ { was #define dname def_expr }<BR>+ STD_INPUT_HANDLE = DWORD(-(10));<BR>+ STD_OUTPUT_HANDLE = DWORD(-(11));<BR>+ STD_ERROR_HANDLE = DWORD(-(12));<BR><BR> { was #define dname def_expr }<BR>-Const<BR>- INVALID_HANDLE_VALUE = HANDLE(-1);<BR>+ INVALID_HANDLE_VALUE = HANDLE(-1);<BR><BR> { GetStockObject }<BR><BR>- const<BR> BLACK_BRUSH =
4;<BR> DKGRAY_BRUSH = 3;<BR> GRAY_BRUSH = 2;<BR>@@ -2376,7 +2265,7 @@<BR> SC_MANAGER_MODIFY_BOOT_CONFIG = 32;<BR> { PostMessage }<BR> { was #define dname def_expr }<BR>- function HWND_BROADCAST : HWND;<BR>+ HWND_BROADCAST = HWND($FFFF);<BR><BR> { PrepareTape }<BR><BR>@@ -2427,27 +2316,14 @@<BR> RDW_ALLCHILDREN = 128;<BR> RDW_NOCHILDREN = 64;<BR> { RegCreateKey }<BR>- { was #define dname def_expr }<BR>- function HKEY_CLASSES_ROOT : HKEY;<BR>+
HKEY_CLASSES_ROOT = HKEY($80000000);<BR>+ HKEY_CURRENT_USER = HKEY($80000001);<BR>+ HKEY_LOCAL_MACHINE = HKEY($80000002);<BR>+ HKEY_USERS = HKEY($80000003);<BR>+ HKEY_PERFORMANCE_DATA = HKEY($80000004);<BR>+ HKEY_CURRENT_CONFIG = HKEY($80000005);<BR>+ HKEY_DYN_DATA = HKEY($80000006);<BR><BR>- { was #define dname def_expr }<BR>- function
HKEY_CURRENT_USER : HKEY;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_LOCAL_MACHINE : HKEY;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_USERS : HKEY;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_PERFORMANCE_DATA : HKEY;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_CURRENT_CONFIG : HKEY;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_DYN_DATA : HKEY;<BR>-<BR> { RegCreateKeyEx }<BR><BR> const<BR>@@ -2693,19 +2569,12 @@<BR> EXCEPTION_CONTINUE_EXECUTION = -(1);<BR> EXCEPTION_CONTINUE_SEARCH = 0;<BR> { SetWindowPos,
DeferWindowPos }<BR>- { was #define dname def_expr }<BR>- function HWND_BOTTOM : HWND;<BR>+ HWND_BOTTOM = HWND(1);<BR>+ HWND_NOTOPMOST = HWND(-(2));<BR>+ HWND_TOP = HWND(0);<BR>+ HWND_TOPMOST = HWND(-(1));<BR><BR>- { was #define dname def_expr }<BR>- function HWND_NOTOPMOST : HWND;<BR><BR>- { was #define dname def_expr }<BR>- function HWND_TOP : HWND;<BR>-<BR>- { was #define dname def_expr }<BR>- function HWND_TOPMOST : HWND;<BR>-<BR>-<BR> const<BR> SWP_DRAWFRAME = 32;<BR> SWP_FRAMECHANGED = 32;<BR>@@ -3242,9 +3111,7 @@<BR> WIZ_CYDLG = 140;<BR><BR> {
VX_FIXEDFILEINFO structure }<BR>- { was #define dname def_expr }<BR>- function VS_FILE_INFO : LPTSTR;<BR>- { return type might be wrong }<BR>+ VS_FILE_INFO = MAKEINTRESOURCE(16);<BR><BR><BR> const<BR>@@ -3773,8 +3640,7 @@<BR> HHT_TOLEFT = 2048;<BR> HHT_TORIGHT = 1024;<BR> { TBADDBITMAP structure }<BR>- { was #define dname def_expr }<BR>- function HINST_COMMCTRL : HINST;<BR>+ HINST_COMMCTRL = HINST(-(1));<BR><BR><BR> const<BR>@@ -3943,27 +3809,25 @@<BR> PBS_SMOOTH =
01;<BR> PBS_VERTICAL = 04;<BR><BR>- { was #define dname def_expr }<BR>- function LPSTR_TEXTCALLBACKW : LPWSTR;<BR>+ LPSTR_TEXTCALLBACKW = LPWSTR(-(1));<BR>+ LPSTR_TEXTCALLBACKA = LPSTR(-(1));<BR><BR>- { was #define dname def_expr }<BR>- function LPSTR_TEXTCALLBACKA : LPSTR;<BR><BR>-{$ifdef UNICODE}<BR>+ {$ifdef UNICODE}<BR><BR>- {const this is a function in fact !!<BR>- LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKW;}<BR>- function LPSTR_TEXTCALLBACK : LPWSTR;<BR>+ {const this is a function in fact !!<BR>+ LPSTR_TEXTCALLBACK =
LPSTR_TEXTCALLBACKW;}<BR>+ LPSTR_TEXTCALLBACK = LPWSTR(-(1));<BR><BR>-{$else}<BR>+ {$else}<BR><BR>- {const<BR>- LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKA; }<BR>- function LPSTR_TEXTCALLBACK : LPSTR;<BR>-{$endif}<BR>- { UNICODE }<BR>- { LV_ITEM structure }<BR>+ {const<BR>+ LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKA; }<BR>+ LPSTR_TEXTCALLBACK =LPSTR(-(1));<BR>+ {$endif}<BR><BR>+ { LV_ITEM structure }<BR>+<BR> const<BR> LVIF_TEXT = 1;<BR> LVIF_IMAGE = 2;<BR>@@ -5169,7 +5033,7
@@<BR> PRF_OWNED = $20;<BR> { MapWindowPoints }<BR> { was #define dname def_expr }<BR>- function HWND_DESKTOP : HWND;<BR>+ HWND_DESKTOP = HWND(0);<BR><BR> { WM_SYSCOMMAND message }<BR><BR>@@ -5915,264 +5779,10 @@<BR><BR>{$ifdef read_implementation}<BR><BR>- { was #define dname def_expr }<BR>- function UNICODE_NULL : WCHAR;<BR>- begin<BR>- UNICODE_NULL:=#0;<BR>- end;<BR><BR>- { was #define dname def_expr }<BR>- function RT_ACCELERATOR : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>-
RT_ACCELERATOR:=MAKEINTRESOURCE(9);<BR>- end;<BR><BR>- { was #define dname def_expr }<BR>- function RT_BITMAP : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_BITMAP:=MAKEINTRESOURCE(2);<BR>- end;<BR><BR>- { was #define dname def_expr }<BR>- function RT_DIALOG : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_DIALOG:=MAKEINTRESOURCE(5);<BR>- end;<BR><BR>- { was #define dname def_expr }<BR>- function RT_FONT : LPTSTR;<BR>- { return type
might be wrong }<BR>- begin<BR>- RT_FONT:=MAKEINTRESOURCE(8);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_FONTDIR : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_FONTDIR:=MAKEINTRESOURCE(7);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_MENU : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_MENU:=MAKEINTRESOURCE(4);<BR>- end;<BR>-<BR>- { was #define dname def_expr
}<BR>- function RT_RCDATA : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_RCDATA:=MAKEINTRESOURCE(10);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_STRING : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_STRING:=MAKEINTRESOURCE(6);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_MESSAGETABLE : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>-
RT_MESSAGETABLE:=MAKEINTRESOURCE(11);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_CURSOR : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_CURSOR:=MAKEINTRESOURCE(1);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_GROUP_CURSOR : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_GROUP_CURSOR:=MAKEINTRESOURCE(12);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_ICON :
LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_ICON:=MAKEINTRESOURCE(3);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_GROUP_ICON : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- RT_GROUP_ICON:=MAKEINTRESOURCE(13);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function RT_VERSION : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>-
RT_VERSION:=MAKEINTRESOURCE(16);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_ARROW : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_ARROW:=MAKEINTRESOURCE(32512);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_IBEAM : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_IBEAM:=MAKEINTRESOURCE(32513);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_WAIT : LPTSTR;<BR>- {
return type might be wrong }<BR>- begin<BR>- IDC_WAIT:=MAKEINTRESOURCE(32514);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_CROSS : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_CROSS:=MAKEINTRESOURCE(32515);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_UPARROW : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_UPARROW:=MAKEINTRESOURCE(32516);<BR>- end;<BR>-<BR>- {
was #define dname def_expr }<BR>- function IDC_SIZENWSE : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_SIZENWSE:=MAKEINTRESOURCE(32642);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZENESW : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_SIZENESW:=MAKEINTRESOURCE(32643);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZEWE : LPTSTR;<BR>- { return type might be wrong
}<BR>- begin<BR>- IDC_SIZEWE:=MAKEINTRESOURCE(32644);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZENS : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_SIZENS:=MAKEINTRESOURCE(32645);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZEALL : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_SIZEALL:=MAKEINTRESOURCE(32646);<BR>- end;<BR>-<BR>- { was #define dname
def_expr }<BR>- function IDC_NO : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_NO:=MAKEINTRESOURCE(32648);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_APPSTARTING : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_APPSTARTING:=MAKEINTRESOURCE(32650);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_HELP : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>-
IDC_HELP:=MAKEINTRESOURCE(32651);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_APPLICATION : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDI_APPLICATION:=MAKEINTRESOURCE(32512);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_HAND : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDI_HAND:=MAKEINTRESOURCE(32513);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_QUESTION :
LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDI_QUESTION:=MAKEINTRESOURCE(32514);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_EXCLAMATION : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDI_EXCLAMATION:=MAKEINTRESOURCE(32515);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_ASTERISK : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>-
IDI_ASTERISK:=MAKEINTRESOURCE(32516);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDI_WINLOGO : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDI_WINLOGO:=MAKEINTRESOURCE(32517);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_SIZE : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_SIZE:=MAKEINTRESOURCE(32640);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_ICON :
LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_ICON:=MAKEINTRESOURCE(32641);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function IDC_HAND : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- IDC_HAND:=MAKEINTRESOURCE(32649);<BR>- end;<BR>-<BR> { was #define dname(params) def_expr }<BR> { argument types are unknown }<BR> { return type might be wrong }<BR>@@ -6198,148 +5808,8 @@<BR> end;<BR><BR><BR>+// INVALID_HANDLE_VALUE =
HANDLE(-(1));<BR> { was #define dname def_expr }<BR>- function STD_INPUT_HANDLE : DWORD;<BR>- begin<BR>- STD_INPUT_HANDLE:=DWORD(-(10));<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function STD_OUTPUT_HANDLE : DWORD;<BR>- begin<BR>- STD_OUTPUT_HANDLE:=DWORD(-(11));<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function STD_ERROR_HANDLE : DWORD;<BR>- begin<BR>- STD_ERROR_HANDLE:=DWORD(-(12));<BR>- end;<BR>-<BR>- { was #define dname def_expr
}<BR>-{<BR>- function INVALID_HANDLE_VALUE : HANDLE;<BR>- begin<BR>- INVALID_HANDLE_VALUE:=HANDLE(-(1));<BR>- end;<BR>-}<BR>-<BR>- { was #define dname def_expr }<BR>- function HWND_BROADCAST : HWND;<BR>- begin<BR>- HWND_BROADCAST:=HWND($FFFF);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_CLASSES_ROOT : HKEY;<BR>- begin<BR>- HKEY_CLASSES_ROOT:=HKEY($80000000);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_CURRENT_USER :
HKEY;<BR>- begin<BR>- HKEY_CURRENT_USER:=HKEY($80000001);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_LOCAL_MACHINE : HKEY;<BR>- begin<BR>- HKEY_LOCAL_MACHINE:=HKEY($80000002);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_USERS : HKEY;<BR>- begin<BR>- HKEY_USERS:=HKEY($80000003);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_PERFORMANCE_DATA :
HKEY;<BR>- begin<BR>- HKEY_PERFORMANCE_DATA:=HKEY($80000004);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_CURRENT_CONFIG : HKEY;<BR>- begin<BR>- HKEY_CURRENT_CONFIG:=HKEY($80000005);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HKEY_DYN_DATA : HKEY;<BR>- begin<BR>- HKEY_DYN_DATA:=HKEY($80000006);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HWND_BOTTOM :
HWND;<BR>- begin<BR>- HWND_BOTTOM:=HWND(1);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HWND_NOTOPMOST : HWND;<BR>- begin<BR>- HWND_NOTOPMOST:=HWND(-(2));<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HWND_TOP : HWND;<BR>- begin<BR>- HWND_TOP:=HWND(0);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HWND_TOPMOST : HWND;<BR>- begin<BR>-
HWND_TOPMOST:=HWND(-(1));<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function VS_FILE_INFO : LPTSTR;<BR>- { return type might be wrong }<BR>- begin<BR>- VS_FILE_INFO:=MAKEINTRESOURCE(16);<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function HINST_COMMCTRL : HINST;<BR>- begin<BR>- HINST_COMMCTRL:=HINST(-(1));<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function LPSTR_TEXTCALLBACKW : LPWSTR;<BR>- begin<BR>-
LPSTR_TEXTCALLBACKW:=LPWSTR(-(1));<BR>- end;<BR>-<BR>- { was #define dname def_expr }<BR>- function LPSTR_TEXTCALLBACKA : LPSTR;<BR>- begin<BR>- LPSTR_TEXTCALLBACKA:=LPSTR(-(1));<BR>- end;<BR>-{$ifdef UNICODE}<BR>-<BR>- {const this is a function in fact !!<BR>- LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKW;}<BR>- function LPSTR_TEXTCALLBACK : LPWSTR;<BR>- begin<BR>- LPSTR_TEXTCALLBACK:=LPWSTR(-(1));<BR>- end;<BR>-<BR>-{$else}<BR>-<BR>- {const<BR>- LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKA; }<BR>- function LPSTR_TEXTCALLBACK :
LPSTR;<BR>- begin<BR>- LPSTR_TEXTCALLBACK:=LPSTR(-(1));<BR>- end;<BR>-{$endif}<BR>-<BR>- { was #define dname def_expr }<BR> function TVI_ROOT : HTREEITEM;<BR> begin<BR> TVI_ROOT:=HTREEITEM($FFFF0000);<BR>@@ -6363,12 +5833,6 @@<BR> TVI_SORT:=HTREEITEM($FFFF0003);<BR> end;<BR><BR>- { was #define dname def_expr }<BR>- function HWND_DESKTOP : HWND;<BR>- begin<BR>- HWND_DESKTOP:=HWND(0);<BR>- end;<BR>-<BR> { was #define dname(params) def_expr
}<BR> { argument types are unknown }<BR> { return type might be wrong }</DIV></DIV><BR></DIV></div><br>
<hr size=1>
<a href="http://us.rd.yahoo.com/evt=49678/*http://smallbusiness.yahoo.com/domains/?p=BESTDEAL"> Get your own web address.</a><br> Have a HUGE year through <a href="
http://us.rd.yahoo.com/evt=49678/*http://smallbusiness.yahoo.com/domains/?p=BESTDEAL">Yahoo! Small Business.</a></body></html>