irgendwie hab ich nen Denkfehler
mit :
Delphi-Quellcode:
procedure Tartikelbearbeitenform.ArtikelPageControlChange(Sender: TObject);
begin
if trim(artbez1edit.text) = '' then
begin
ShowMessage('blabla');
self.artikelpagecontrol.activepage:= seite1TabSheet ;
end;
end;
möchte ich eine Meldung anzeigen und den aktiven Tab beibehalten.
leider bringt er mir die Message 2mal, deshalb gehe ich maldavon aus, dass ich im falschen Ereignis arbeite?
Was mache ich falsch?
Gruss KH