Wie kann ich überprüfen ob die von mir gewählte Datei..

[Bine]

eine Accessdatei ist?

If opendialog.filename is ...?

WER KANN MIR HELFEN????

BINEsa :_(

[Uli Becker]

Versuchs doch mal mit der Datei-Endung

[Bine]

If opendialog.filename is not ('data.mdb') then
messagedlg (..)..

so??

[Uli Becker]

Die Datei-Endung ermittelt man mit:

ExtractFileExt (siehe Hilfe in Delphi)

Beispiel:

datei := openDialog1.filename;<br>
if UpperCase(ExtractFileExt(datei)) = '.MDB' then<br>
showmessage('Access!');<br>

P.S. Ich empfehle dringend den Kauf eines guten Einführungsbuches in Delphi ;-

[Bine]

Hab ich! Aber die Sachen die ich brauche stehen nicht drinnen!!!
Außerdem fehlt mir die Zeit.

Ich weiß das das Grundlagen sind, aber mir fehlt einfach die Zeit.

BINCHEN *sniff

[Bernhard Berger]

Hm, einfacher ist es vielleicht die Filter-Eigenschaft des OpenDialogs zu setzen. Du kannst dann aber nur Dateien auswählen, die den Filter entsprechen.<p>
Bsp. für Filter: OpenDialog1.Filter := 'Access-Datenbanken|*.mdb';<p>
Gruß,<br>
Bernhard *tröst

[Fred Ziebell]

Hallo,
wir haben vor einiger Zeit ein ähnliches Problem so gelöst:
Überprüfen, ob der Dateiextender .mdb ist, oder die ersten Bytes der Datei Binär einlesen und ab dem vierten Byte auf die ASCII-Zeichen "STANDARD JET DB" prüfen. letzteres ist eine sehr sichere Methode, es sind mir allerdings auch schon *.mdb-Dateien vorgekommen, die den Hinweis auf das Jetmodul nicht im Kopf vermerkt hatten.

Gruß
Fred Ziebel