Einzelnen Beitrag anzeigen

Benutzerbild von Störtebeker
Störtebeker

Registriert seit: 9. Jul 2007
398 Beiträge
 
#1

Pagecontrol: Case-Problem

  Alt 21. Okt 2008, 01:33
Hallo,

die Entwicklung meines Editors schreitet voran. Ich weiß nicht, ob mein Anliegen am folgenden Code schon ersichtlich ist aber trotzdem stelle ich ihn mal vor die Frage:

Delphi-Quellcode:
procedure TForm1.PageControl1PageChanged(Sender: TObject);
begin
case PageControl1.ActivePageIndex of
  0: ComboBox3.Text := 'HTML';
     SynEdit1.Highlighter:=SynHTMLSyn1;
  1: ComboBox3.Text := 'JAVA';
     SynEdit1.Highlighter:=SynJavaSyn1;
  2: ComboBox3.Text := 'C++';
     SynEdit1.Highlighter:=SynCppSyn1;
  end
end;
So, nun die Frage: Ich habe ein Pagecontrol mit den Seiten
0: Web
1: Java
2: C++


Wenn ich jetzt zwishen den Seiten hin und herwechsle, soll sich sowohl der Wert in der Combox für die Highlighterauswahl ändern, als auch der aktive Highlighter des SynEdits. Nur kriege ich irgendwie die Anweisung nicht so ganz hin. Habe es schon mit "AND" versucht. Ohne Erfolg.
"And he piled upon the whale´s white hump - a sum of all the rage and hate felt by his whole race.
If his chest had been a cannon, he would have shot his heart upon it."
  Mit Zitat antworten Zitat