Forum: Sonstige Fragen zu Delphi
Delphi
by kingflo,
17. Jan 2007
jo mega geil der geht... danke danke danke.... super geil danke
Forum: Sonstige Fragen zu Delphi
Delphi
by kingflo,
17. Jan 2007
SendMessage(hWnd,WM_USER+4711,0,0); gibt auch 0 zurück, d.H das senden geht nicht richtig
Forum: Sonstige Fragen zu Delphi
Delphi
by kingflo,
17. Jan 2007
jetzt hab ich aber das Problem, das die Windows Message trotzdem nicht ankommt :|
Windows.SendMessage(hWnd,WM_USER+4711,0,0);
procedure TLoginForm.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
if MSg.message = WM_USER+4711 then begin
ShowMessage('Angekommen');
end;
Forum: Sonstige Fragen zu Delphi
Delphi
by kingflo,
17. Jan 2007
ok ok jetzt gehts... danke mein application.titel war nach der initialisierung anders...
Forum: Sonstige Fragen zu Delphi
Delphi
by kingflo,
17. Jan 2007
ich kriegs nicht hin... mit deinem Code kommt es nicht vor, dass h <>0 ist.
dann dachte ich,´dass es so gehen müsste:
mHandle := CreateMutex(nil,True,'Stryyke Client');
if GetLastError = ERROR_ALREADY_EXISTS then begin
ShowMessage('test');
Windows.SendMessage(mHandle,WM_USER,0,0);
Halt;