Zitat von
malo:
Zitat von
aerotech:
Delphi-Quellcode:
procedure TForm1.Label9Click(Sender: TObject);
begin
if MessageDlg('Serialarchiv wirklich schiließen?',mtwarning,[mbyes, mbno],0) = mryes then
Action := caFree
else
Action := caNone;
end;
[Error] Unit1.pas(249): Incompatible types: 'TBasicAction' and 'TCloseAction'
[Error] Unit1.pas(250): Incompatible types: 'TBasicAction' and 'TCloseAction'
[Fatal Error] Project1.dpr(7): Could not compile used
unit 'Unit1.pas'
Der Code muss auch ins
OnClose nicht ins Label-OnClick
Ja klar, aber ich möchte "auch" meinem Label mit der Caption -> Programm schließen diese Abfrage erteilen.....also n' Closelabel inkl Abfrage ob man wirklich schließen will.
