Autor Beitrag
Andreas L.
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 1703
Erhaltene Danke: 25

Windows Vista / Windows 10
Delphi 2009 Pro (JVCL, DragDrop, rmKlever, ICS, EmbeddedWB, DEC, Indy)
BeitragVerfasst: Do 07.08.03 13:46 
Hi Leutz,
wie kann ich den Namen eines markierten elements in einer ShelllistView in ien Edit eintragen? Bisher habe ich folgednen Code, geht aber irgendwie nicht:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
procedure TForm1.ShellListView1Click(Sender: TObject);
begin
Form2.Edit29.Text := (ShellListView1.selected.caption);
Form2.show;
end;


thx und Greetz


Zuletzt bearbeitet von Andreas L. am Sa 09.08.03 11:35, insgesamt 1-mal bearbeitet
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Do 07.08.03 15:50 
Aha. Geht nicht. Als ich heute morgen beim Arzt war, mich auf die Liege gelegt habe und gesagt habe: "Tut weh." War er genauso hilflos, wie ich hier im Moment. Denk mal drüber nach.
Andreas L. Threadstarter
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 1703
Erhaltene Danke: 25

Windows Vista / Windows 10
Delphi 2009 Pro (JVCL, DragDrop, rmKlever, ICS, EmbeddedWB, DEC, Indy)
BeitragVerfasst: Do 07.08.03 15:58 
Etwas genauer:

Ein Benutzer des Proggis ist browst in der ShellListView1. Er klickt auf einen Ordner/Datei, der Ordner/Datei der durch deisen Klick markiert wurde soll in Edit29 eingetragen werden, also nur der Name mein ich.
-----------
Und der Compiler gibt keine Meldung, er compiliert einfach. Wenn ich dann das oben beschriebene Nachmache passiert nix...
Tino
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Veteran
Beiträge: 9839
Erhaltene Danke: 45

Windows 8.1
Delphi XE4
BeitragVerfasst: Fr 08.08.03 07:46 
Versuch es mal so:
ausblenden Delphi-Quelltext
1:
ShellListView1.SelectedFolder.PathName					


Gruß
Tino
Andreas L. Threadstarter
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 1703
Erhaltene Danke: 25

Windows Vista / Windows 10
Delphi 2009 Pro (JVCL, DragDrop, rmKlever, ICS, EmbeddedWB, DEC, Indy)
BeitragVerfasst: Fr 08.08.03 10:38 
Ahh Hi,
ich werds mal versuchen. thx
Andreas L. Threadstarter
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 1703
Erhaltene Danke: 25

Windows Vista / Windows 10
Delphi 2009 Pro (JVCL, DragDrop, rmKlever, ICS, EmbeddedWB, DEC, Indy)
BeitragVerfasst: Fr 08.08.03 10:41 
Habs jetzt ausprobiert. Das fügt den kompletten Pfad in das Edit ein. Es soll aber nur der Name des Objekts drin stehen.
Andreas L. Threadstarter
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 1703
Erhaltene Danke: 25

Windows Vista / Windows 10
Delphi 2009 Pro (JVCL, DragDrop, rmKlever, ICS, EmbeddedWB, DEC, Indy)
BeitragVerfasst: Sa 09.08.03 10:52 
Ich habe jetzt nochmal alle Funktionen der Komponente durchegschaut. Aber ich habs nciht geschafft. *heul*

Würde ich isn OffTopic posten dann hätte ich sofort ne Antwort :-)
Keldorn
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 2266
Erhaltene Danke: 4

Vista
D6 Prof, D 2005 Pro, D2007 Pro, DelphiXE2 Pro
BeitragVerfasst: Sa 09.08.03 11:32 
onlinehome hat folgendes geschrieben:
Habs jetzt ausprobiert. Das fügt den kompletten Pfad in das Edit ein. Es soll aber nur der Name des Objekts drin stehen.

na dann kopiers doch einfach raus
ausblenden Delphi-Quelltext
1:
edit1.Text:=ExtractFilename( ShellListView1.SelectedFolder.PathName)					

_________________
Lükes Grundlage der Programmierung: Es wird nicht funktionieren.
(Murphy)
Andreas L. Threadstarter
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 1703
Erhaltene Danke: 25

Windows Vista / Windows 10
Delphi 2009 Pro (JVCL, DragDrop, rmKlever, ICS, EmbeddedWB, DEC, Indy)
BeitragVerfasst: Sa 09.08.03 11:35 
Es geht JUHU. DANKE DANKE DANKE... *freu*

Greetz