Forum: Sonstige Fragen zu Delphi
Delphi
by etom291272,
3. Jun 2004
:-D
habs hinbekommen
frage mit folgendem code das Letzte Änderungsdatum der Datei ab die vom Scanner erstellt wird wenn das Änderungsdatum nicht um über 1 minute kleiner ist als now wird die Datei übergangen
procedure THauptForm.Timer1Timer(Sender: TObject);
var
i : Integer;
Forum: Sonstige Fragen zu Delphi
Delphi
by etom291272,
3. Jun 2004
function FileInUse(FileName: string): Boolean;
var
hFileRes: HFILE;
begin
Result := False;
if not FileExists(FileName) then
Exit;
hFileRes := CreateFile(PChar(FileName),
GENERIC_WRITE,
0,
Forum: Sonstige Fragen zu Delphi
Delphi
by etom291272,
3. Jun 2004
danke für die Antwort
meinst du mit der fileopen methode ??
Forum: Sonstige Fragen zu Delphi
Delphi
by etom291272,
3. Jun 2004
Hallo zusammen
ich entwickle zur Zeit gearade ein kleines Programm dass mir ein bestimmtes Verzeichnis im
Sekundentakt überwacht. In dieses Verzeichnis wird von einem Scanner ein Multipage TIF File
gestellt dass dann von diesem Programm in einzelne TIF Files zerlegt und als seperate Datei
je TIF Seite abgespeichert wird.
Schön und gut funktioniert auch. Aber :wall: mein Programm scannt...