| 
| Autor | Beitrag |  
| ALF 
          Beiträge: 1085
 Erhaltene Danke: 53
 
 WinXP, Win7, Win10
 Delphi 7 Enterprise, XE
 
 | 
Verfasst: Mi 23.02.11 21:16 
 
Überlege schon ne ganze Zeit wie ich diese Parameter (FO_MOVE, FO_COPY, FO_DELETE, FO_RENAME) direkt übergeben kann.
 Zur Zeit mache ich das mit integer und in der Funktion mit Case. Nachteil, ich muss selber immer erst schauen welcher integer welche funktion ausführt! mhhh...
 Würde also gerne den Parameter so übergeben
 		                       Delphi-Quelltext 
 									| 1:2:
 3:
 
 | MultiFilePathFunc(PAnsiChar(temppath), PAnsiChar(tofile), 4)MultiFilePathFunc(PAnsiChar(temppath), PAnsiChar(tofile), FO_RENAME)					 |  und in der funktion:
 		                       Delphi-Quelltext 
 									| 1:2:
 3:
 4:
 5:
 6:
 7:
 
 | ........
 4: begin
 fos.wFunc:= FO_RENAME;                           ....
 ....
 |  und schon bräuchte ich nicht mehr in die funktion schauen.
 Hab aber nicht so die richtige Idee     Gruss ALf_________________ Wenn jeder alles kann oder wüsste und keiner hätt' ne Frage mehr, omg,  währe dieses Forum leer!
 |  |  |  
| jaenicke 
          Beiträge: 19326
 Erhaltene Danke: 1749
 
 W11 x64 (Chrome, Edge)
 Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
 
 | 
Verfasst: Mi 23.02.11 21:40 
 
Wofür das case? FO_RENAME usw. sind auch Integerkonstanten, die kannst doch direkt nutzen.   Für diesen Beitrag haben gedankt: ALF
 |  |  |  
| ALF  
          Beiträge: 1085
 Erhaltene Danke: 53
 
 WinXP, Win7, Win10
 Delphi 7 Enterprise, XE
 
 | 
Verfasst: Mi 23.02.11 21:48 
 
Na toll, die ganze Zeit versuche ich das und bekam immer ne Fehlermeldung! 
 Jetzt setzte ich das ein und es funct     Keine Ahnung was da vorher  für ein Problem war     Thx
 Gruss ALf_________________ Wenn jeder alles kann oder wüsste und keiner hätt' ne Frage mehr, omg,  währe dieses Forum leer!
 |  |  |  
| jaevencooler 
          Beiträge: 166
 Erhaltene Danke: 6
 
 MS-DOS,Win32, Win95, Win 98, Me,XP, Linux, NT4.0, NT 2000-2008, Vista, Windows 7
 Turbo Pascal,D1 Enter,D2 Enter,D3 Enter,D5 Enter, Kylix, D2007, PL/SQL, MS/SQL, Delphi 2010, Delphi XE
 
 | 
Verfasst: Do 24.02.11 15:09 
 
Tach auch,
 da war sicherlich Fehler 51 !
 
 
 Gruß Michael
 _________________ Wissen ist Macht, nichts wissen macht auch nichts...
 |  |  |  |