Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by CTV,
4. Feb 2004
nun bin ich der sache etwas näher gekommen msg.wparam gibt immer 0 aus wenn man den power knopf drückt. ich hab ez mal untersucht was msg.msg ausgibt wenn man den powerknopf drückt. und es gibt bei mir 536 aus nun klapts auch mit dem ereignis wenn ich nähnlich dies hier einfüge:
if (msg.msg=536) and (msg.WParam=0) then
begin
DoPowerbuttonPress;
end;
Meine frage ist nun ist...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by CTV,
4. Feb 2004
ich ez raus gefunden dass der meine procedure "DoPowerbuttonPress;" jedes mal ausführt wenn meine Applikation eine WinMsg erhält egal welche. Wenn ich z.b die grösse des fensters ändere wird sie auch aus geführt. An was kann das liegen? sie sollte doch wirklich nur dann ausgeführt werden wenn die message diese: PWR_SUSPENDREQUEST oder diese ist: PBT_APMQUERYSUSPEND was läuft da falsch ? hat...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by CTV,
2. Feb 2004
ich hab ez mal das eingebaut:
..
private
i:integer;
..
constructor TPowerButton.create(AOwner : TComponent);
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by CTV,
2. Feb 2004
Wenn das Programm startet wird das Ereigniss DoPowerbuttonPress genau 5 mal ausgeführt. Ich hab das mal so getestet:
procedure TForm1.PowerButton1PowerbuttonPress(Sender: TObject);
var s:string;
begin
s:='L';
label1.Caption:=label1.Caption+s;
end;