Einzelnen Beitrag anzeigen

Benutzerbild von Christoph
Christoph

Registriert seit: 23. Jan 2004
Ort: Heidelberg
48 Beiträge
 
Delphi 6 Personal
 
#2

Re: THeaderControl.OnSectionClick

  Alt 10. Mär 2006, 14:58
Hi,

habe es bereits herausgefunden. Ist einfacher als gedacht:

Delphi-Quellcode:
procedure TForm1.HeaderControl1SectionClick(HeaderControl: THeaderControl; Section: THeaderSection);
begin
  if (Section.Text='a') then showmessage('a');
  if (Section.Text='b') then showmessage('b');
  if (Section.Text='c') then showmessage('c');
end;
Grüße,
Christoph
'Bist 900 Jahre alt wirst aussehen Du nicht gut!'
  Mit Zitat antworten Zitat