Entwickler-Ecke
Dateizugriff - Unterschied Win 98 und NT
madigeMade - Mo 21.04.03 11:58
Titel: Unterschied Win 98 und NT
Hi @ all!
Hier ist mein Quelltext:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| procedure TForm4.DirectoryListBox1Change(Sender: TObject);
begin
{$I-}
if IOResult <> 0 then
begin
messagedlg('Bitte legen Sie einen beschreibbaren Datenträger ein',mtError,[mbOK],0);
drivecombobox1.Drive:='c';
end
else
begin
directorylistbox1.Drive:=drivecombobox1.Drive;
FileListBox1.Directory:=directorylistbox1.Directory;
end;
end; |
Dies ist einfach nur ne Abfrage wenn man z.B. auf eine Diskette zugreifen will.
Unter Win 98 klappt das wunderbar. Unter Win NT kommt zuerst 2 x eine Fehlermeldung und dann meine Fehlermeldung.
Muss ich bei NT noch zusätzlich was einbinden oder wo steckt der Fehler?
Gruß
de Made
Delete - Mo 21.04.03 13:08
Ich will ja nicht neugierig erscheinen, aber teilst du uns auch mit WAS für Fehlermeldungen Windows NT anzeigt?
MSCH - Mo 21.04.03 14:09
| Zitat: |
procedure TForm4.DirectoryListBox1Change(Sender: TObject);
begin
{$I-}
if IOResult <> 0 then
begin
... |
womit bitte wird IOResult gesetzt? Nur alleine das OnChange() Ereigniss ist keine IO Routine.
Du musst vielleicht vorher mit der Disk, vielleicht den freien Speicherplatz, abfragen.
grez
Msch
madigeMade - Mo 21.04.03 22:09
Das onchange ereignis reicht bei windows 98 für diese io-message. Es wird praktisch aus einer drivecombobox das Verzeichnis ausgelesen und wenn z.b. keine Diskette drinne liegt, kommt die Fehlermeldung. Windows NT schreibt vorher noch zwei mal die selbe Fehlermeldung "Keine Diskette im Laufwerk gefunden". Danach kommt erst diese Fehlermeldung.
Gruß de Made
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!