Forum: Win32/Win64 API (native code)
Delphi
by Christian Seehase,
19. Sep 2002
Moin Thomas,
ich wusste doch, dass ich was vergessen hatte :?
Beim speichern eines Dateipfades
statt:
FaFileList.sFilePath := p_sFilePath;
besser
FaFileList.sFilePath := AnsiUpperCase(p_sFilePath);
Forum: Win32/Win64 API (native code)
Delphi
by Christian Seehase,
16. Sep 2002
Moin Thomas,
bitte gerne. :D
Um kurz auf die Positionierung der Variablen die vom Typ TcsFileLocker ist zu kommen:
Zum einen eignet sie sich wohl als Eigenschaft des Hauptformulares, so dass das Objekt dann im OnCreate des Formulares erzeugt, und im OnDestroy wieder freigegeben werden kann, oder aber als globale Variable. Erzeugt und wieder freigegeben wird es dann im...
Forum: Win32/Win64 API (native code)
Delphi
by Christian Seehase,
16. Sep 2002
Moin Thomas,
ich hab' da mal eben was zusammengeschrieben, wie ich mir das so ungefähr vorstelle. Ist natürlich nicht getestet, aber probiers mal aus, bzw. schau's Dir mal an.
type
TcsFileLockEntry =
packed record
sFilePath : string;
fsFile : TFileStream;
end;
Forum: Win32/Win64 API (native code)
Delphi
by Christian Seehase,
16. Sep 2002
Moin Thomas,
dann bietet es sich doch an, ein Objekt zu erstellen, das ein variables Array enthält, welches Einträge für Dateipfad und entsprechenden TFileStream speichert, und das mit Methoden versehen ist, die es einem ermöglichen übergebene Dateien über fmShareExclusive zu sperren, bzw. durch Freigeben eines Eintrags im array (anschliessendes komprimieren des Arrays eventuell einplanen)...
Forum: Win32/Win64 API (native code)
Delphi
by Christian Seehase,
16. Sep 2002
Moin Thomas,
die Variable ist ja eingentlich nur ein Pointer auf das Filestream Objekt.
Wenn Du jetzt ein public Feld in einem Formular anlegst, oder eine globale Variable vom Typ TFileStream, dann kannst Du in dieser lokalen Prozedur diesen Pointer in die globale Variable übergeben, und an jeder beliebigen Stelle im Programm darauf zugreifen, und dass natürlich mit jeder beliebigen Methode....