Delphi-PRAXiS
Seite 1 von 2  1 2   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Fehler : Failed to set data for ''# (https://www.delphipraxis.net/150962-fehler-failed-set-data.html)

-Phantom- 1. Mai 2010 16:32


Fehler : Failed to set data for ''#
 
Hey Leute,

Ich habe mir ein Programm geschrieben was bei mir auch ganz gut geht. Nun hab ich es einen Freund von mir geschickt und er sagte mir das beim ersten Start die Fehlermeldung "Failed to set data for ''#" kommt ( auch wenn man es als Admin startet ). Beim zweiten Start geht es dann.

Wisst ihr woran das liegt?

_____________________________________

Gruß Mathias

mkinzler 1. Mai 2010 16:36

Re: Fehler : Failed to set data for ''#
 
Ohne dein Programm zu kennen, nicht

-Phantom- 1. Mai 2010 16:39

Re: Fehler : Failed to set data for ''#
 
Soll ich nun das ganze Programm hier reinstellen?

-Phantom- 1. Mai 2010 16:40

Re: Fehler : Failed to set data for ''#
 
Hier habt ihr es :

http://www3.bigupload.com/files/I7GV...1.exe.zip.html

wicht 1. Mai 2010 16:50

Re: Fehler : Failed to set data for ''#
 
Ohne Quelltext wird das glaube ich nichts..

-Phantom- 1. Mai 2010 19:50

Re: Fehler : Failed to set data for ''#
 
Oke hier habt ihr alles :

http://www.bigupload.com/files/W76OR...e_Zip.zip.html

turboPASCAL 1. Mai 2010 20:30

Re: Fehler : Failed to set data for ''#
 
Au Backe. Das Du da noch Überblick über den Quelltext hast:

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
ini : Tinifile;
skin : String;
k : String;
reg : Tregistry;
begin
version := Getversion;
major := LoByte(Loword(version));
minor := Hibyte(Loword(version));
Windowsversion := IntToStr(Major)+'.'+IntToSTr(Minor);
if windowsversion = '5.1' then
createdir('C:\Programme\Ultimate Zip\');
if windowsversion = '6.0' then
createdir('C:\Program Files\Ultimate Zip\');
if windowsversion = '6.1' then
createdir('C:\Program Files\Ultimate Zip\');
if windowsversion = '5.1' then
ini := Tinifile.Create('C:\Programme\Ultimate Zip\Einstellungen.ini');
if windowsversion = '6.1' then
ini := Tinifile.Create('C:\Program Files\Ultimate Zip\Einstellungen.ini');
if windowsversion = '6.0' then
ini := Tinifile.Create('C:\Program Files\Ultimate Zip\Einstellungen.ini');
skin := ini.ReadString('Design','Skinname','Snow Leopard (internal)');
sSkinManager1.SkinName := skin;
k := Application.ExeName;
// ...  
end;
Sicherlich kann der Fehler unter anderem davon kommen das du die Dateipfade einfach festlegst.
Unter Windows Vista und Windows 7 wirst du unter anderem Probleme mit dem Zugriff auf die Verzeichnisse haben.

1. Hier im Forum suchenStyleguide siehe auch: http://www.delphi-treff.de/delphi-st...e/anweisungen/
2. Hier im Forum suchenrelative Pfade siehe auch: http://www.delphi-library.de/viewtopic.php?p=548600

mkinzler 1. Mai 2010 20:41

Re: Fehler : Failed to set data for ''#
 
Zitat:

Unter Windows Vista und Windows 7 wirst du unter anderem Probleme mit dem Zugriff auf die Verzeichnisse haben.
Eigentlich unter allen NT Systemen ( alsso auch mit W2k und WinXP, wenn man dort nicht als Admin arbeitet)
Zudem könnte der Anwender das Programm auch wo anders installiert haben.

-Phantom- 1. Mai 2010 21:28

Re: Fehler : Failed to set data for ''#
 
Ich hab es aber genau so schon in anderen Programm so gemacht und da kam nie so eine Fehlermeldung und es hat alles super geklappt.
das Programm an sich läuft ja auch also alle Funktionen gehen.

// und bei XP tritt das Problem auch auf

-Phantom- 1. Mai 2010 21:37

Re: Fehler : Failed to set data for ''#
 
@ mkinzler :

Das Programm kann gar nicht Installiert werden. Also es gibt keine "Installationsdatei". Der Pfad ist so festgelegt !


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:18 Uhr.
Seite 1 von 2  1 2   

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