我想在下面的函數中獲取任何「記錄」類型的大小。但是看來它不工作: function GetDataSize(P : Pointer) : Integer;
begin
Result := SizeOf(P^); // **How to write the code?**
end;
例如,下列記錄的大小是8個字節 SampleRecord = record
Age1 : Inte
我想打開一個文本文件閱讀的Delphi 7應用程序,但得到I/O錯誤32(共享衝突),因爲另一個應用程序已經打開文件。我試過將FileMode設置爲「fmOpenRead或fmShareDenyNone」,但現在意識到這並不適用於文本文件。 有沒有辦法讀取由另一個應用程序打開的文本文件? var
f: TextFile;
begin
FileMode := fmOpenRea
顯示TImage中是相當一個新手,我剛喝了我的第一個問題回答(Delphi: TImage.Create causes Access violation)立即碰到了新的問題: procedure TSelectorForm.FormCreate(Sender: TObject);
var
Loop: Byte;
begin
for Loop := 1 to 10 do