Ich denke ich muss an Inhalt gar nichts in die Dateien schreiben (?).
Ich bekomme als Startparameter sowieso die Benutzerid des aufrufenden Benutzers mitgegeben. Und für den Computernamen hab ich mir auch schon eine Funktion rausgesucht:
Delphi-Quellcode:
function ComputerName: String;
var
Size: DWORD;
begin
Size := MAX_COMPUTERNAME_LENGTH + 1;
SetLength(Result, Size);
if GetComputerName(PChar(Result), Size) then
SetLength(Result, Size)
else
Result := '';
end;
Also würde ich den Dateinamen einfach wie folgt zusammenstellen:
'FFileName_'+ComputerName+'_'+Trim(ParamStr(1))+'.pid'
Damit hätte ich alle Infos direkt im Dateinamen.
Trotzdem werde ich mich mal mit dem THandleStream auseinandersetzen falls ich doch mal was rein schreiben muss
