Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Wie dcc32 übergebene Parameter benutzen? (https://www.delphipraxis.net/30041-wie-dcc32-uebergebene-parameter-benutzen.html)

Wuaegner 18. Sep 2004 23:27


Wie dcc32 übergebene Parameter benutzen?
 
Hallo!
Ich habe ein Programm geschriebn, dass bis jetzt noch eine Eingabemaske besitzt in der man ein Verzeichnispfad eingibt, und noch einen Pfad für eine CSS-Datei. Diese beiden Eingaben brauche ich also später in meinem Programm. Nun möchte ich dass man mein Programm beispielsweise so ausführen könnte: C:\MeinProgramm.exe -CssDateiPfad -ZuBearbeitenderVerzeichnisPfad.
Denke dass man das mit dem dcc32 machen könnte?!
Kann mir jemand sagen wie ich das hinbekommen könnte? Also in meinem Programm auf die eingebenen Parameter , die vorher in den Editfeldern der Maske standen,zuzugreifen ?

Hansa 19. Sep 2004 01:32

Re: Wie dcc32 übergebene Parameter benutzen?
 
Da mußt du dir "ParamStr" und "ParamCount" in der Hilfe ansehen.

Wuaegner 19. Sep 2004 10:49

Re: Wie dcc32 übergebene Parameter benutzen?
 
Ah vieln Dank, werds mal probieren!

Wuaegner 20. Sep 2004 15:30

Re: Wie dcc32 übergebene Parameter benutzen?
 
OK hat perfekt geklappt! Danke! :thumb:

Die Muhkuh 20. Sep 2004 15:45

Re: Wie dcc32 übergebene Parameter benutzen?
 
Hi,

vielleicht könntest du noch ein Beispiel zeigen wie du es gemacht hast? Vielleicht hat ja jemand das gleiche Problem^^.

Wuaegner 21. Sep 2004 14:00

Re: Wie dcc32 übergebene Parameter benutzen?
 
OK:
Code:
FolderPath:= ParamStr(1); {Erster Parameter wird FolderPath zugeordnet}
  for i:= 2 to ParamCount do
   begin
   if (Pos('-cInfo:',ParamStr(i))>0) then
   ContentFileName:= Copy(ParamStr(i),8,(length(ParamStr(i))))
   else ContentFileName:= 'Content.txt';{Standard}

   if (Pos('-format:',ParamStr(i))>0) then
   PatternFileName:= Copy(ParamStr(i),9,(length(ParamStr(i))))
   else PatternFileName:= 'C:\PatternFile.css';{Standard}
   end;
Bei meinem Programm ist der erste Parameter immer der FolderPath, die dann kommenden werden je nach "keyword" dann auch zugeordnet.


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:52 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz