Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
10. Jun 2003
Moin Zero,
das lässt sich umgehen.
Statt die Zeilen mit #13#10 zu verbinden, kannst Du auch +#13#10+ daraus machen. Dann muss es funktionieren.
Der Grund ist folgender:
Wenn Du eine Stringkonstante so bildest
resourcestring
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
10. Jun 2003
Moin Zero,
ich hatte mir einen TreeView (TTreeView) und ein Memo (TMemo) auf's Formular gelegt.
Dann dem Treeview zwei Einträge verpasst, eben Info und Proxy, und dann im OnChange diesen Code eingetragen:
begin
// _rsText1 := 'test';
// _rsText2 := 'teeeest';
If Node<>Nil then
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
10. Jun 2003
Moin Zero,
bei mir funzt das problemlos.
Auch wenn Du ein begin/end zuviel hast.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
9. Jun 2003
Moin Zero,
Wenn Du die Eigenschaft Text nimmst, wird natürlich immer der Inhalt des Memos ersetzt.
Wenn fortgeschrieben werden soll dann mit Lines.Add(....).
Das mit dem Überschreib-/Einfügemodus wird, Überraschung, mit der Einfügentaste umgeschaltet. ;-)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
9. Jun 2003
Moin Zero,
Jens' Beispiel mit dem OnChange Ergeignis:
procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
If Node<>Nil then
Memo1.Text:=Node.Text;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
9. Jun 2003
Moin Zero1,
dazu ein paar Tips:
Node ist vom Typ TTreeNode
TTreeNode hat die Eigenschaft Text
TTreeView.Selected gibt eine Wert vom Typ TTreeNode zurück
Kombiniere das mit dem Source aus Deinem Eingangsposting
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
8. Jun 2003
Moin Zero,
Memo1.Text := _rsText1;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
8. Jun 2003
Moin Zero1,
ein Resourcestring kannst Du genauso verwenden, wie eine Stringkonstante, also z.B. an Memo1.Text zuweisen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
7. Jun 2003
Moin Zero,
die Text könntest Du als Resourcen in Deinem Programm unterbringen, und zwar einfach unter verwendung von Resourcestring.
resourcestring
_rsText1 = 'Zeile1'#13#10'Zeile2'#13#10'Zeile3';
_rsText2 = //...
//...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
7. Jun 2003
Moin Zero,
gesamt oder je...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
7. Jun 2003
Moin Zero,
um welche Textmengen geht's denn so?
(je Memo Eintrag, und gesamt)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
7. Jun 2003
Moin Zero1,
das ginge, z.B. mit Memo1.Lines.LoadFromFile.
Wichtig ist in jedem Falle das was Jens geschrieben hat. Du musst abfragen, ob überhaupt ein Item ausgewählt wurde.
Es ist schliesslich möglich, dass Du (bezogen auf das OnClick) auf den TreeView klickst, ohne ein Item zu markieren. Dann wäre InfoList.Selected = nil, und das Ansprechen von InfoList.Selected.Text läuft auf eine...