嗨我一直在Delphi 2006中使用此功能，但現在與D2010它引發錯誤。 我認爲它與切換到Unicode有關。 Function TWinUtils.GetTempFile(Const Extension: STRING): STRING;
Var
Buffer: ARRAY [0 .. MAX_PATH] OF char;
Begin
Repeat
我2007年德爾福代碼，看起來像這樣： procedure WriteString(Stream: TFileStream; var SourceBuffer: PChar; s: string);
begin
StrPCopy(SourceBuffer,s);
Stream.Write(SourceBuffer[0], StrLen(SourceBuffer));
end
我正在慢慢地將現有代碼轉換爲Delphi 2010，並閱讀Embarcaedro網站以及MarcoCantú白皮書中的幾篇文章。 仍然有一些事情我沒有理解，所以這裏有兩個函數來舉例說明我的問題： function RemoveSpace(InStr: string): string;
var
Ans : string;
I : Word;
L : Word;