Forum: Win32/Win64 API (native code)
Delphi
by himitsu,
13. Jun 2006
Na bis auf IAAnotif und SiXPack halten sich ja eigentlich alle an die Konventionen.
Ich möchte jetzt aber nicht wissen, was dann in den Pogrammen noch so los ist, wenn die schon bei so'ner einfachen Sache Mist bauen.
(Mich wunder eigentlich nur der doppelte \ bei Nero :shock: )
Forum: Win32/Win64 API (native code)
Delphi
by himitsu,
13. Jun 2006
Na ja, denn liegt es halt wohl daran, dat Windows hier mal wieder die Fehler der Pogrammierer behebt.
(wenn ich windows wäre, dann würde ich dann ganz einfach nichts machen)
Es ist dennoch nicht sehr gut, wenn man irreguläre "Fehler" ausnutzt ... erstens ist es nicht gerade schön und dann könnte M$ auch irgendwann mal diese "Fehlerkorrektur" weglassen ;)
Forum: Win32/Win64 API (native code)
Delphi
by himitsu,
13. Jun 2006
Das funktioniert eben nicht, oder doch ...
es kommt halt darauf an, wie dieser String definiert ist ... bei dem was in der Registry (Autostart) steht, muß jeder Dateiname, welcher Leerzeichen enthält, in " eingeschlossen sein.
Wärend andere Dinge (z.B. die Funktionen, womit man z.B. sich das Icon der Datei zurückgeben lassen kann, nur einen reinen Dateinamen haben wollen und das ohne die "....
Forum: Win32/Win64 API (native code)
Delphi
by himitsu,
13. Jun 2006
Du kannst zwar alle StringReplace zusammensetzten, aber ersten kommes etwa auf's Selbe raus und zweitens ist das bestimmt nicht gerade übersichtlich.
Und wie äußert der sich?
Das geht nicht, ein Dateiname/Pfad mit Leerzeichen muß in "" stehen, wennn er zusammen mit Parametern übergeben werden kann.
Denn nur zwischen zwei " ist das Leerzeichen ein Leerzichen ... außerhalb ist es ein...
Forum: Win32/Win64 API (native code)
Delphi
by himitsu,
12. Jun 2006
if (s<>'') and (s='"') then
begin
SL.DelimitedText := s;
Result := SL;
end
else
Result := s;
Ja ... der Dateiname muß nicht unbedingt zwischen "" stehen, wenn ein Parameter angehängt wurde,
dieses ist "nur" notwendig, wenn Leerzeichen im Dateinamen sind.
Forum: Win32/Win64 API (native code)
Delphi
by himitsu,
12. Jun 2006
Na wenn es dir nur darum geht, dann sollte das schon ausreichen:
Var i: Integer;
B: Boolean;
S, Dateiname, Parameter: String;
S := ...
i := 1;
B := False;
While (i <= Length(S)) and ((S <> ' ') or B) do Begin