Delphi-PRAXiS - Einzelnen Beitrag anzeigen

Zitat von Muetze1:

&H = hexadezimal in VB
% = ??? in VB

Ist letzteres eine Binärschreibweise (also duales System?)??

Danke!
Dann müßte das ja stimmen ....

Delphi-Quellcode:

			    WStyleList.Add('WS_ACTIVECAPTION,%1');

    WStyleList.Add('WS_BORDER,%800000');

    WStyleList.Add('WS_CAPTION,%C00000');

    WStyleList.Add('WS_CHILD,%40000000');

    WStyleList.Add('WS_CLIPCHILDREN,%2000000');

    WStyleList.Add('WS_CLIPSIBLINGS,%4000000');

    WStyleList.Add('WS_DISABLED,%8000000');

    WStyleList.Add('WS_DLGFRAME,%400000');

    WStyleList.Add('WS_EX_ACCEPTFILES,%10');

    WStyleList.Add('WS_EX_APPWINDOW,%40000');

    WStyleList.Add('WS_EX_CLIENTEDGE,%200');

    WStyleList.Add('WS_EX_CONTEXTHELP,%400');

    WStyleList.Add('WS_EX_CONTROLPARENT,%10000');

    WStyleList.Add('WS_EX_DLGMODALFRAME,%1');

    WStyleList.Add('WS_EX_LAYERED,%80000');

    WStyleList.Add('WS_EX_LAYOUTRTL,%400000');

    WStyleList.Add('WS_EX_LEFT,%0');

    WStyleList.Add('WS_EX_LEFTSCROLLBAR,%4000');

    WStyleList.Add('WS_EX_LTRREADING,%0');

    WStyleList.Add('WS_EX_MDICHILD,%40');

    WStyleList.Add('WS_EX_NOACTIVATE,%8000000');

    WStyleList.Add('WS_EX_NOINHERITLAYOUT,%100000');

    WStyleList.Add('WS_EX_NOPARENTNOTIFY,%4');

    WStyleList.Add('WS_EX_OVERLAPPEDWINDOW,%300');

    WStyleList.Add('WS_EX_PALETTEWINDOW,%188');

    WStyleList.Add('WS_EX_RIGHT,%1000');

    WStyleList.Add('WS_EX_RIGHTSCROLLBAR,%0');

    WStyleList.Add('WS_EX_RTLREADING,%2000');

    WStyleList.Add('WS_EX_STATICEDGE,%20000');

    WStyleList.Add('WS_EX_TOOLWINDOW,%80');

    WStyleList.Add('WS_EX_TOPMOST,%8');

    WStyleList.Add('WS_EX_TRANSPARENT,%20');

    WStyleList.Add('WS_EX_WINDOWEDGE,%100');

    WStyleList.Add('WS_GROUP,%20000');

    WStyleList.Add('WS_GT,%30000');

    WStyleList.Add('WS_HSCROLL,%100000');

    WStyleList.Add('WS_ICONIC,%20000000');

    WStyleList.Add('WS_MAXIMIZE,%1000000');

    WStyleList.Add('WS_MAXIMIZEBOX,%10000');

    WStyleList.Add('WS_MINIMIZE,%20000000');

    WStyleList.Add('WS_MINIMIZEBOX,%20000');

    WStyleList.Add('WS_OVERLAPPED,%0');

    WStyleList.Add('WS_OVERLAPPEDWINDOW,%CF0000');

    WStyleList.Add('WS_POPUP,%80000000');

    WStyleList.Add('WS_POPUPWINDOW,%80880000');

    WStyleList.Add('WS_SIZEBOX,%40000');

    WStyleList.Add('WS_SYSMENU,%80000');

    WStyleList.Add('WS_TABSTOP,%10000');

    WStyleList.Add('WS_THICKFRAME,%40000');

    WStyleList.Add('WS_TILED,%0');

    WStyleList.Add('WS_TILEDWINDOW,%CF0000');

    WStyleList.Add('WS_VISIBLE,%10000000');

    WStyleList.Add('WS_VSCROLL,%200000');

will nur sicher gehen

gruß

Einzelnen Beitrag anzeigen

Re: Hexstring vb to Delphi