Forum: Sonstige Fragen zu Delphi
Delphi
by Schubi,
11. Jan 2008
@Luckie:
Die Dateri musst du vorher in der Software runterladen und irgendwo abspeichern.
Und diesen Pfad setzt du dann dort ein.
In meiner bat hat er sich die Datei von einem Server im Lan kopiert ("\\Server\Pfad\Datei.exe").
Forum: Sonstige Fragen zu Delphi
Delphi
by Schubi,
30. Apr 2007
Du kannst sowas wie
dir c:\ /s >> NULL
machen. Das dauert ne kleine Weile.
(Gibt alle Verzeichnisse und Dateien auf Laufwerk C aus. Allerdings wird wegen ">> NULL" nichts angezeigt)
Ansonsten so:
Add(':Label1');
Add('del "'+Pfad_Lokal+File1+'"'); //Löscht die alte Datei
Add('if Exist "' + Pfad_Lokal + File1 + '" goto Label1'); //Prüft, ob sie
Forum: Sonstige Fragen zu Delphi
Delphi
by Schubi,
24. Apr 2007
Das wird wahrscheinlich den Grund haben, dass ein normaler Benutzer nun mal nicht zu schreiben HAT.
Solche Sicherheitsmechanismen sollte man nicht einfach so umgehen.
Forum: Sonstige Fragen zu Delphi
Delphi
by Schubi,
24. Apr 2007
Dafür muss ich mein System nicht mit einem Dienst "zumüllen", das geht auch mit einer simplen exe.
Die Batch-Datei ist aber kleiner und genauso wirksam.
Forum: Sonstige Fragen zu Delphi
Delphi
by Schubi,
24. Apr 2007
//Auslesen der Versionsnummer aus einer Datei
type
T_Version = Record
Hauptversion, Nebenversion, Ausgabe, Build : Integer;
end;
function GetVersion(Datei : String): T_Version;
var
VerInfoSize: DWORD;
VerInfo: Pointer;
Forum: Sonstige Fragen zu Delphi
Delphi
by Schubi,
24. Apr 2007
Bat-Dateien sinf recht praktisch für sowas!
Die kannst du z.B. direkt von deiner Homepage downloaden und lokal ausführen.
batchname := Pfad_Lokal+'Update.bat';
FileSetAttr(Pfad_Lokal+'TTS_Starter.exe', 0);
batchfile := TStringList.Create;
with batchfile do
begin
try