Autor Beitrag
hibbert
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1007

WinServer2003, Win XP, Linux
D6 Pers, D05
BeitragVerfasst: Mo 28.10.02 17:26 
hallo,
wie kann ich über ShellListView1 einen neuen ordner erstellen ?
ess soll so ähnlich aus sehen, wie wenn man z.b. unter word sagt: datei > speichern unter. es öffnet si ja ein neues fenster, und so ähnlich soll dann meins auch sein. hats jemand verstanden :?: :?: :?:
wenn nicht einfach nachfragen !!
mfg hibbert

_________________
I kunnen väl svara endast ja eller nej
Om i viljen eller nej
DelphiMan
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 73



BeitragVerfasst: So 03.11.02 10:52 
Titel: Wieso mit ShellListView?
Machs doch einfach mit einem TOpenDialog...oder TSaveDialog. ist ja egal.

MfG
DelphiMan
DelphiMan
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 73



BeitragVerfasst: So 03.11.02 11:16 
Titel: Es geht aber auch mit ShellListView...
Ich habs mir mal gerade angeschaut. Wenn du's unbedingt mit ShellListView machen willst geht es natürlich auch...
Den aktuellen Pfad kannst du folgendermaßen ermitteln:
ausblenden Quelltext
1:
  shelllistview.RootFolder.PathName;					


Mit Hilfe eines PopupMenüs oder wie auch immer kannst du somit nun mit den üblichen Funktionen ein Verzeichnis erstellen:

ausblenden Quelltext
1:
2:
3:
4:
5:
6:
7:
  if not DirectoryExists(sh.RootFolder.PathName+'\Ordner') then
    begin
      if not CreateDir(sh.RootFolder.PathName+'\Ordner') then
        Showmessage('Verzeichnis konnte nicht angelegt werden!');
    end
  else
    Showmessage('Verzeichnis bereits vorhanden!');


MfG
DelphiMan