我有一個RandomRange問題，這是代碼： procedure TForm1.FormCreate(Sender: TObject);
var
i : Integer;
function RandomRange(const AFrom, ATo: Integer): Integer;
begin
Result := RandomRange(15,20);
我有用於繪製一個平面圖形的配置文件的代碼。 Chart1.Series.Clear;
Lser:=TLineSeries.Create(Chart1);
for x:= 1 to 20 do
Lser.AddXY(strtofloat(stringgrid1.Cells[1,x]),strtofloat(stringgrid1.Cells[2,x]));
c
我試圖讓使用拉撒路（免費帕斯卡）下面的代碼的主窗口句柄： function FindMainWindow(Pid: LongWord): LongWord;
type
TParam = record
Window: HWnd;
Test: Integer;
Pid: LongWord;
end;
PParam = ^TParam;
v
使用下面的代碼當我添加手錶的價值： A[1, 1].IsX
，並把下面的註釋行斷點，觀察名單顯示了這個消息： Type array [1..3] of TBLOCK is not a structure or union type.
，而不是顯示記錄元素值。下面是示例代碼： type
TBlock = record
IsX: Boolean;
IsO: Boo