Einzelnen Beitrag anzeigen

poterp

Registriert seit: 27. Mär 2005
175 Beiträge
 
#1

PageControl-tabsheet-focus

  Alt 1. Sep 2007, 22:49
Hallo,
ich habe da ne frage und zwar ich habe auf meine anwendung ein PageControl mit 3 Tabsheet
(Page1 bis Page3)
was ich da möchte ist, wenn ich die Page1 wähle, dann sollte ich eine Nachrichte erhalten zb.:
"Hallo Page1". Ich habe diesen folgenden Code verwendet:
Delphi-Quellcode:
procedure TForm_Auswertung.TabSheet3Enter(Sender: TObject);
begin
   if ((Sender as TPageControl).ActivePage = TabSheet3) then
     begin
   showmessage('hallo tabsheet3');
 end;
end;
aber es passiert nix. hat jemand eine Idee??
grüß
poter
  Mit Zitat antworten Zitat