Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
17. Okt 2003
Vielen vielen Dank fuer die tolle Unterstuetzung, so klappt es einwandfrei :-D
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
17. Okt 2003
:-D siehe vorhergegangene Frage bzw Kommentar im Code :-D
Weisst du auch dafuer eine Loesung?
Da hab ich ja den richtigen erwischt :-D, danke!
Gruss lkz633
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
17. Okt 2003
Jup, hier ist der gesamte Quellcode+php-Datei zum Testen, manchmal wird anscheinend "willkuerlich" byw um mehrere <Stellen falsch markiert
Danke fuer deine Hilfe
lkz633
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
17. Okt 2003
Super, danke fuer deine Hilfe.
Der Code funktioiert noch nicht so 100%, sind bei mehreren Vorkommnissen doch um mehrere Stellen verrutscht.
Sehe aber den Fehler nicht, kann jemand helfen?
Welchen Befehl muss ich ausserdem benutzen, um alle Markierungen wieder aufzuheben?
Herzlichen Dank und Gruss
lkz633
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
17. Okt 2003
Hi,
verstehje leider gerade nur Bahnhof.
Wiso kann ich in einem Memo nichts markieren? Was bedeuten die Kommentare "nur um zu zeigen dass es geht".
Also bei mir wird jetzt gar nichts markeirt.
Gruss lkz633
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
17. Okt 2003
Dann stimmen aber die Indizes nicht mehr ueberein.
Weiss denn nimand eine Loesung?
Gruss lkz633
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
17. Okt 2003
memo.SelStart:= 1;
while (pos(node.Text,copy(memo.Lines.Text, memo.SelStart, length(memo.lines.text))) > 0) do
begin
memo.SelStart:= pos(node.Text,copy(memo.Lines.Text.selstart length(memo.lines.text))) ;
memo.SelLength:= length(node.text);
end;
Es faengt immer wieder von vorne an, so dass es zu einer Endlosschleife kommt
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
16. Okt 2003
Hallo,
wollte das auch schon mit einer while Schleife machen, aber was ist dann die Abbruchbedingung? So ist es eine Endlosschleife.
Gruss lkz633
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by lkz633,
16. Okt 2003
Hallo,
markiere mit procedure Tfmain.tv_listChange(Sender: TObject; Node: TTreeNode);
begin
memo.SelStart:= pos(node.Text,memo.Lines.Text);
memo.SelLength:= length(node.text);
end; einen ausgewaehlten Eintrag in einem Memo.
Ich wuerde jetzt gerne alle Vorkommnise und nicht nur das Erste Auftreten markieren.