Forum: Programmieren allgemein
by HolgerX,
10. Dez 2016
Hmm..
Ich hab mal meine eigene Routine noch mal angeschaut...
eigentlich kann ich immer ein tmpStringList.Add('.');
machen, bevor ich die Stingliste in den Stream packe.
Denn vorher werden aus allen '.' -> '..' somit würde die Abfrage nach dem '.' in der letzten Zeile eh immer false ergeben..
Forum: Programmieren allgemein
by HolgerX,
10. Dez 2016
Sorry hätte ich auch direkt machen können..
function LoadEMFFileToMsg(AFileName: string;Msg : TIdMessage):boolean;
var
tmpStringList : TStringList;
tmpStream : TMemoryStream;
tmpBuffer : array of AnsiChar;
i : integer;
begin
result := false;