Forum: Win32/Win64 API (native code)
Delphi
by KodeZwerg,
26. Mai 2018
Vielleicht bringe ich da auch etwas durcheinander. War nicht LParam = 32bit LongWord und wParam = 16bit Word. Ich bin da bestimmt nicht auf dem aktuellen Stand der Dinge.
Hab gerade mal in Delphi geschaut, LParam ergibt ein Interger, jupp!
Deine Erklärung reicht mir völlig aus, Vielen Dank dafür, ich aktualisiere mich mal selbst ^_^
edit
Ps: Deswegen hatte ich es ja Gedanklich erst...
Forum: Win32/Win64 API (native code)
Delphi
by KodeZwerg,
26. Mai 2018
Danke fürs Aufpassen und Deine Hilfe dabei!
Nachtrag, Integer() mit LPARARM() ersetzt, kannst Du mir auch den Unterschied dabei sagen, das Versteh ich gerade irgendwie nicht so ganz?
Als Du sagtest "Du verletzt die untere Grenze." weil Integer gefordert wird, dachte ich, naiv wie ich bin, Caste ich mir den als Integer. LPARARM ist für mich gleichzusetzen wie ein LongWord also ein cast ala...
Forum: Win32/Win64 API (native code)
Delphi
by KodeZwerg,
26. Mai 2018
{Fenste 1 erzeugen und hWnd1 zuweisen}
hWndMain := CreateWindowEx(0, ClassName1, Window1Name, WS_VISIBLE or
WS_OVERLAPPEDWINDOW,
Integer(CW_USEDEFAULT), Integer(CW_USEDEFAULT), Window1Width, Window1Height, 0, 0, hInstance,
nil);
Habe das so abgeändert, korrekt oder völlig falsch?
Forum: Win32/Win64 API (native code)
Delphi
by KodeZwerg,
26. Mai 2018
So hab ich es jetzt momentan, es macht genau das was ich wollte.
Vielen Dank nochmal!!
Ist DestroyWindow() das richtige Mittel um das Fenster zu schließen oder sollte da ein anderer Befehl hin?
{******************************************************************************}
{ }
{ ...
Forum: Win32/Win64 API (native code)
Delphi
by KodeZwerg,
25. Mai 2018
Jetzt habe ich Dich glatt überlesen, Danke, den hab ich auch schon irgendwo gesehn bestimmt auch geladen.
Das ist eine Super Idee da mal reinzuschaun, Danke!
Forum: Win32/Win64 API (native code)
Delphi
by KodeZwerg,
25. Mai 2018
Das Example was Du da sagst ist auf jeden Fall besser als nichts!
Es erstellt kein Modal Fenster, man kann jederzeit zum Hauptfenster um noch eins und noch eins und noch eins zu erstellen.
Ich lese mich da mal rein da es zumindest mehr als ein Fenster kann :thumb:
Das PDF habe ich von diesem Server aber mit den Erklärungen darin für Fenster, um ein zweites zu erstellen fehlt da was bzw...
Forum: Win32/Win64 API (native code)
Delphi
by KodeZwerg,
25. Mai 2018
Damit ihr seht woran es bei mir scheitert, hier mein 2 Fenster Kompilat plus Source.
Problem: Zweites Fenster ist nicht Modal. Beendet man zweites Fenster stirbt erstes Fenster und Programm ist Tot, nurnoch über Taskmanager zu beenden. Das ich Sachen total falsch mache ist mir schon klar, nur weiß ich noch nicht wie es korrekt sein müsste.
Forum: Win32/Win64 API (native code)
Delphi
by KodeZwerg,
25. Mai 2018
Klappt einwandfrei, Umlaut wird dargestellt, Danke!!
Ich habe das in .dpr auch verbessert, Danke!!
Erledigt und Danke!!
wItems := CreateWindowEx(0, 'BUTTON', 'Beenden', WS_VISIBLE or WS_CHILD, 220, 130, 75, 25, hWnd, IDC_BTN_EXIT, hInstance, nil);
wItems := CreateWindowEx(0, 'BUTTON', 'Über', WS_VISIBLE or WS_CHILD, 220, 100, 75, 25, hWnd, IDC_BTN_ABOUT, hInstance, nil);
...