Einzelnen Beitrag anzeigen

Benutzerbild von Störtebeker
Störtebeker

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

Lazarus: Statusbar

  Alt 30. Sep 2008, 23:11
Hallo,

tja, lange ist es her, dass ich das letzte Mal in Delphi programmiert habe. Nun dachte ich mir, fängste mal wieder an. Allerdings bin ich nun von Delphi auf Lazarus umgestiegen. Das liegt nicht zuletzt daran, dass ich einfach keine 1000 Euro für Delphi ausgeben wollte und Lazarus ist ja Freeware. Außerdem ist, soweit ich weiß, mit der SSL-Lizenz und den Turbo-Versionen von Delphi, welche ja beide recht preiswert bzw. Freeware sind, die Weitergabe der geschriebenen Programme verboten.

Nun zu meiner eigentlichen Frage:
In einer Statusbar, die ich für die Programmierung meines Editors verwende, soll die aktuelle Position des Cursors (Spalte und Zeile) angezeigt werden.

In Delphi:
Delphi-Quellcode:
procedure TForm1.Action1Update(Sender: TObject);
begin
  StatusBar1.Panels[3].Text := Format(' %6d:%3d ', [SynEdit1.CaretXY.Char, SynEdit1.CaretXY.Line]);
end;
Hier funktioniert der Code. Aber...

...in Lazarus:
Delphi-Quellcode:
procedure TForm1.Action1Update(Sender: TObject);
begin
  StatusBar1.Panels[3].Text := Format(' %6d:%3d ', [SynEdit1.CaretXY.Char, SynEdit1.CaretXY.Line]);
end;
Zitat:
Fehlermeldung:
Unknown record field identifier "CHAR"
Unknown record field identifier "LINE"
Was nun? Wieso funzt es in Delphi, nicht aber in Lazarus?

P.S.: Bin offen für weitere Delphiähnliche Editoren.

MfG
Störtebeker
"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