Teksteditor: gutter og line/col-tekst

Du placer en status bar på formen giver den et panel.

og så laver du onselectionchange og onenter på din richEdit sådan her.

procedure TForm1.RichEdit1SelectionChange(Sender: TObject);
begin
StatusBar1.Panels.Items[1].Text:=IntToStr(RichEdit1.CaretPos.Y)+':'+IntToStr(RichEdit1.CaretPos.X);
end;
procedure TForm1.RichEdit1Enter(Sender: TObject);
begin
StatusBar1.Panels.Items[1].Text:=IntToStr(RichEdit1.CaretPos.Y)+':'+IntToStr(RichEdit1.CaretPos.X);
end;



-----------------------------------------------------------------------------

Min side ->www.the-hive.dk/~donp/

Det du søger med at der står linje-nummer i siden er rigtig enkelt.

Jeg hved ikke om du har set TSW Webcoder fra www.tsw.dk men de har sådan en. De bruger kompomentet synedit som kan hentes her:

http://synedit.sourceforge.net/

Synedit er bare bedst til webeditor da den også kan skifte farven på de forskællige slags koder...


Men er fin. Findes artikel om det her på udv.dk




Shafh
www.shafh.dk
Shafh@stofanet.dk
Theis F. Hinz

Make you glad to change the world

Kristian Kjærgaard
overgodt@yahoo.dk

Hej med dig Kristian

godt igang med delphi 7 ?

så lige dit navn herinde!

vi ses!

VH JOEy

Ja... Richedit er bedre end Memo! Bliv ved richedit eller som jeg sagde. Endnu bedre synedit




Shafh
www.shafh.dk
Shafh@stofanet.dk
Theis F. Hinz

Make you glad to change the world

Den 04-07-05 16:48 skrev Shafh følgende:
-----------------------------------------------------------------------------
Det du søger med at der står linje-nummer i siden er rigtig enkelt.

Jeg hved ikke om du har set TSW Webcoder fra www.tsw.dk men de har sådan en.

ved ikke? VED IKKE??? WebCoder er det fedeste! Jeg bruger den selv, og det var også derfra jeg blev inspireret.

Synedit er bare bedst til webeditor da den også kan skifte farven på de forskællige slags koder...

Ikke da kun til web-?

Den 02-07-05 08:54 skrev Nørden følgende:
-----------------------------------------------------------------------------
procedure TForm1.RichEdit1SelectionChange(Sender: TObject);
begin
StatusBar1.Panels.Items[1].Text:=IntToStr(RichEdit1.CaretPos.Y)+':'+IntToStr(RichEdit1.CaretPos.X);
end;

Det virker ikke. Noget med uidentificeret IntToStr og CaretPos. I min nu SynEdit.

Ja okay... Ikke kun webeditor...

Men altså. Det er det det er mest brugt til. Kan også highlighte mange andre sprog som: c++




Shafh
www.shafh.dk
Shafh@stofanet.dk
Theis F. Hinz

Make you glad to change the world

Den 04-07-05 16:48 skrev Shafh følgende:
----------------------------------------------------------------------------(SynEdit) Men er fin. Findes artikel om det her på udv.dk

Ehh... Hvor?

Den 04-07-05 16:48 skrev Shafh følgende:
----------------------------------------------------------------------------(SynEdit) Men er fin. Findes artikel om det her på udv.dk

Ehh... Hvor?

Her vil jeg tro:

http://udvikleren.dk/article.php?aid=55&techid=2

Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------