Entwickler-Ecke
Internet / Netzwerk - Bilder laden Netz
tommythe1 - Do 09.11.06 12:53
Titel: Bilder laden Netz
Hallo!
Mein Programm läd ca. 120 Bilder beim Start als Image ein.
Delphi-Quelltext
1:
| imgInfo.Picture.LoadFromFile('Daten\Bilder\bild'+IntToStr(b)+'.emf'); |
Die Bilder liegen im selben Verzeichnis wie die exe, im Ordner Daten\Bilder\.
Nun soll das Programm über das Intranet laufen. Doch hier läd es kein bild ein, obwohl die exe mit den Daten im selben Ordner auf dem Server liegt!
Kann mir jemand helfen??
azubi_20 - Do 09.11.06 13:00
versuch mal
Delphi-Quelltext
1:
| imgInfo.Picture.LoadFromFile(extractFilePath(ParamStr[0])+'Daten\Bilder\bild'+IntToStr(b)+'.emf'); |
zur Erklärung :
extractFilePath(ParamStr[0]) ermittelt den aktuellen Pfad der Anwendung
tommythe1 - Do 09.11.06 13:15
azubi_20 hat folgendes geschrieben: |
versuch mal
Delphi-Quelltext 1:
| imgInfo.Picture.LoadFromFile(extractFilePath(ParamStr[0])+'Daten\Bilder\bild'+IntToStr(b)+'.emf'); |
zur Erklärung :
extractFilePath(ParamStr[0]) ermittelt den aktuellen Pfad der Anwendung |
kommt der Fehler: "nicht genügend wirkliche Parameter"
vor der 0 in eckigen klammern sitzt der Cursor bei der Fehlermeldung
azubi_20 - Do 09.11.06 13:19
sorry, muss so heißen :
Delphi-Quelltext
1:
| extractFilePath(ParamStr(0)) |
(runde statt eckige Klammern)
tommythe1 - Do 09.11.06 13:48
azubi_20 hat folgendes geschrieben: |
sorry, muss so heißen :
Delphi-Quelltext 1:
| extractFilePath(ParamStr(0)) |
(runde statt eckige Klammern) |
ja danke, hab schon in der hilfe nachgeschaut und den fehler bemerkt
jetzt test ichs mal obs im Intranet läuft
tommythe1 - Do 09.11.06 14:19
nein es läuft trotzdem nicht
DaKirsche - Do 09.11.06 15:21
Dann lasse dir doch mal den String von ExtractFilePath(ParamStr(0)); anzeigen.
Denke mal, dass er dir dabei den Serverpfad gibt, also "C:\...²..
Ansonsten versuche es mal folgendermaßen:
Setze eine Serverfreigabe auf den Ordner, wobei "Jeder" Lese- und Ausführrechte hat.
Dann gibst du im Programm den Pfad an:
Delphi-Quelltext
1:
| Image1.Picture.LoadFromFile('\\Servername\Freigabename\Bildname.JPG'); |
Aber am Besten du schickst mal den Output, den du bekommst, wenn du an einem Client folgendes ausführst:
Delphi-Quelltext
1:
| ShowMessage(ExtractFilePath(ParamStr(0))); |
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!