Class TForm1 (unit Fastf) |
Inherits from
TForm
procedure CreateBtnClick(Sender: TObject);
Copy the string to the array.
procedure DeleteBtnClick(Sender: TObject);
Read the file MaxRecs records at a time.
procedure ReadBtnClick(Sender: TObject);
Write 100 buffers (10,000 records.
CreateBtn : TButton;
DeleteBtn : TButton;
Label1 : TLabel;
ReadBtn : TButton;
ReadCount : TLabel;
procedure CreateBtnClick(Sender: TObject);
Copy the string to the array.
procedure DeleteBtnClick(Sender: TObject);
Read the file MaxRecs records at a time.
procedure ReadBtnClick(Sender: TObject);
Write 100 buffers (10,000 records.
CreateBtn : TButton;
DeleteBtn : TButton;
Label1 : TLabel;
ReadBtn : TButton;
ReadCount : TLabel;