Einzelnen Beitrag anzeigen

Benutzerbild von juergen
juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.164 Beiträge
 
Delphi 11 Alexandria
 
#1

Memo.Lines.IndexOf() auf ein anderes Memo übertragen

  Alt 2. Sep 2008, 21:58
Hallo zusammen,

ich habe nun einiges probiert und hier auch gesucht aber nichts passendes gefunden.
Ich habe 2 Memos.
Im ersten Memo werden Dateinamen gespeichert.
Im zweiten Memo ZUSÄTZLICH der komplette Pfad zu der Datei.

mein Wunsch:
In Memo 1 markiere ich eine Zeile und würde über ein Popup-Menü den Explorer öffnen, natürlich zu der markierten Datei.

Das geht mit:
Delphi-Quellcode:
  ShellExecute(0, 'open', 'explorer.exe', PChar('/select,' +
    (Memo1.SelText)), nil, SW_SHOWNORMAL);
Da ich in der markierten Memo1 Zeile ja nur den Dateinamen habe, kann ich diesen nicht an den Explorer als Parameter übergeben; da wird der komplette Pfad erwartet.
Dazu habe ich das "synchrone" 2. Memo, wo zusätzlich die Pfade mit angegeben sind.
Nun muss ich irgendwie die markierte Zeile aus Memo 1 "übergeben" an Memo 2.
Das habe ich so gemacht:
Delphi-Quellcode:
var My_MemoIndex : Integer;
My_MemoIndex := Memo2.Lines.IndexOf(Memo1.SelText);
Bedeutet, ich habe denselben Zeilenindex wie in Memo 1.

Soweit, so gut, aber:
Wie bekomme ich nun die Zeile in Memo2 kopiert oder markiert oder irgendwie als Text ausgewiesen?
, so dass ich damit den Parameter für den Explorer Memo1.SelText ersetzen kann?


Danke schonmal vorab!

Edit: Memo3 geändert in Memo 2
Jürgen
Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
  Mit Zitat antworten Zitat