| Autor |
Beitrag |
schermerbua
 
Beiträge: 63
Win XP
|
Verfasst: Fr 22.04.05 14:03
ich habe eine Shellistview mit einer Shellcombobox gekoppelt und wollte folgendes machen:
man soll:
1.nur bilder und ordner sehen
2.wenn man das bild doppelklickt soll der Dateiname plus der Endung als String gespeichert werden.
wie kann ich die beiden sachen machen?
|
|
fvolk
Beiträge: 203
Win XP (Home & Pro)
Delphi 2005 Pers
|
Verfasst: Fr 22.04.05 14:26
Hi
1. Weiß ich leider nicht, habe die zusätzlichen Komponeten nicht installiert.
2. Es wird ein Ereignis wie z.B. OnDblClick geben und wahrscheinlich auch eine Eigenschaft, in der die Dateien (bzw. Dateinamen) gespeichert sind. Wenn du jetzt noch die Eigenschaft findest, welche die entweder die markierte Datei zurückgibt (wäre optimal) oder eine, welche angibt, die wievielte Datei markiert ist, dann hast du doch schon so gut wie gewonnen.
_________________ Nichts auf der Welt ist so gerecht verteilt wie der Verstand. Denn jedermann ist überzeugt, dass er genug davon habe.
(René Descartes)
|
|
schermerbua 
Beiträge: 63
Win XP
|
Verfasst: Fr 22.04.05 14:36
hm ungefähr daran hab ich auch schon gedacht, nur eben ich find die genannten eigenschaften nicht!
|
|
alias5000
Beiträge: 2145
WinXP Prof SP2, Ubuntu 9.04
C/C++(Code::Blocks, VS.NET),A51(Keil),Object Pascal(D2005PE, Turbo Delphi Explorer) C# (VS 2008 Express)
|
Verfasst: Fr 22.04.05 14:47
also zum ersten hab ich (noch) keine Lösung parat, aber zum zweiten: Im OnDblClick Ereignis kannst du die Eigenschaft ShelllistView1.Path auslesen. Damit erhälst du den kompletten Pfad der Selektierten Datei. Ist keine ausgewählt müsste .Path eigentlich leer (='') sein, bin mir aber net sicher.
  Delphi-Quelltext
1:
| fileName := extractfileName(ShelllistView1.Path) + extractfileext(Shelllistview1.Path); |
Das ergiebt dann den Dateinamen + Erweiterung _________________ Programmers never die, they just GOSUB without RETURN
|
|
alias5000
Beiträge: 2145
WinXP Prof SP2, Ubuntu 9.04
C/C++(Code::Blocks, VS.NET),A51(Keil),Object Pascal(D2005PE, Turbo Delphi Explorer) C# (VS 2008 Express)
|
Verfasst: Fr 22.04.05 14:50
@fvolk: Die Komponenten sind bei der Delphi installation schon dabei!!! (Seite Samples)
_________________ Programmers never die, they just GOSUB without RETURN
|
|
schermerbua
Beiträge: 63
Win XP
|
Verfasst: Fr 22.04.05 14:58
 Meine shellistview hat keine Path eigenschaft!
|
|
alias5000
Beiträge: 2145
WinXP Prof SP2, Ubuntu 9.04
C/C++(Code::Blocks, VS.NET),A51(Keil),Object Pascal(D2005PE, Turbo Delphi Explorer) C# (VS 2008 Express)
|
Verfasst: Fr 22.04.05 15:17
Sorry, dann hab ich mich vertan, mein Problem ist bloß, dass Delphi an nem anderen PC ist, und der aus ist. aber so eine Ähnliche Eigenschaft müsste es sein (FileName, Path...,...). Probier mal aus, wenn sich keiner mehr meldet...
_________________ Programmers never die, they just GOSUB without RETURN
|
|
schermerbua
Beiträge: 63
Win XP
|
Verfasst: Fr 22.04.05 15:21
ich habs mir nochmal(zum 100. mal) die eigenschaften durchgelesen und mir ist nichts aufgefallen was so ähnlich klingt. kennt jemand vl andere möglichkeiten, dass der benutzer sich ein bild auf seinem pc aussucht und der dateiname in einen string geschrieben wird?
|
|
alias5000
Beiträge: 2145
WinXP Prof SP2, Ubuntu 9.04
C/C++(Code::Blocks, VS.NET),A51(Keil),Object Pascal(D2005PE, Turbo Delphi Explorer) C# (VS 2008 Express)
|
Verfasst: Fr 22.04.05 15:27
_________________ Programmers never die, they just GOSUB without RETURN
|
|
fvolk
Beiträge: 203
Win XP (Home & Pro)
Delphi 2005 Pers
|
Verfasst: Sa 23.04.05 13:13
@alias5000: Was mich nicht davon abgehalten hat, diese nicht zu installieren. 
@schermerbua: Schon mal an Komponeten wie TOpenDialog, TOpenPictureDialog etc. gedacht? _________________ Nichts auf der Welt ist so gerecht verteilt wie der Verstand. Denn jedermann ist überzeugt, dass er genug davon habe.
(René Descartes)
|
|
schermerbua
Beiträge: 63
Win XP
|
Verfasst: So 24.04.05 17:37
nein, und ich weiß auch nicht wie die funktionieren, ganz ehrlich gesagt!
|
|
fvolk
Beiträge: 203
Win XP (Home & Pro)
Delphi 2005 Pers
|
Verfasst: So 24.04.05 18:44
Die Komponenten haben eine Methode Execute. Wird diese aufgerufen, wird der Dialog (ganz normaler Datei-Öffnen-Dialog) angezeigt und der Benutzer kann eine Datei aussuchen. Wie man's eben gewohnt ist. Nachdem der Benutzer auf " OK" geklickt hat, findet sich in OpenDialog.FileName der komplette Pfad der ausgewählten Datei.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| if OpenDialog1.Execute then
begin
foo(..); ShowMessage(Format('Sie haben die Datei %s ausgewählt.', [OpenDialog1.FileName]));
end
else
begin
bar(..); end; | _________________ Nichts auf der Welt ist so gerecht verteilt wie der Verstand. Denn jedermann ist überzeugt, dass er genug davon habe.
(René Descartes)
|
|
