Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - [VisualCLX] CaretPos eines Memos setzen ?


JoelH - Sa 06.09.03 19:05
Titel: CaretPos eines Memos setzen ?
Wie setzte ich das Teil ? In der VCL ist das ja vom Typ Point , aber in Kylix CLX wohl nicht.
Also geht

Quelltext 
1:
 
memo.caretpos := Point(x,y);


leider nicht
und


Quelltext 
1:
 
memo.caretpos.line := x;


geht auch nicht, weil man nix zuweisen darf, wie geht es also überhaupt ?


derDoc - So 07.09.03 08:46
Du musst das folgend machen:


Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
 
var
  Position: TCaretPos;
begin
  Position.Line := 3;  //Zeilennummer, z.B. 3. Zeile
  Position.Col := 10; //Zeichennummer, z.B. 10. Zeichen
  Memo1.CaretPos := Position;
end;


JoelH - So 07.09.03 15:47
Titel: hmm,
warum funktioniert dies ?
Ich meine ich lege eine Var an, die aber keine Var ist, warum muss ich das dind nicht mit
xy := TCaretPos.Create;
erst erzeugen ? Das hab ich nämlich versucht, mag der Comiler aber nicht. Ich sehe hier irgendwie das System als nonkonsistent an. Denn eine Stringlist miuss mann via Create erst erzeugen obwohl vorher klar ist was sie mach da man bein Create nix beeinflussen kann.

Wo ist da die KlassenKonsistenz ?


Keldorn - So 07.09.03 19:17
Hallo

mit der CLX arbeite ich nicht und ich hab auch die CLX-Hilfe deaktiviert, kann also nicht nachguggn.

TCaretpos ist wie Tpoint keine Klasse, sondern nur ein Record. Du hast doch die Sourcen, Strg+Maus auf TCaretpos und schon stehts da.
Erstell dir doch einfach eine Funktion Caretpos (wenn es die nicht evtl schon gibt). Point ist auch nur eine Funktion

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
 
Function Caretpos(x,y:integer):Tcaretpos;
  begin
    result.Col:=x;
    result.Line:=y;
  end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  memo1.CaretPos:=CaretPos(2,3);
  memo1.SetFocus;
end;


Mfg Frank


JoelH - Mo 08.09.03 09:21
Titel: hmm,
joo danke,
hab es auch gemerkt :( Gelesen aber ignoriert ;)


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!