اینو کجا باید بنویسمش؟؟؟TtableRec = record
fields : packed array [0..2] of string;
end;
TSearcher = class
Table : array of TtableRec;
TBLSIZE : integer;
FIELD_NUMBER : integer;
function tblfind(info : TtableRec):boolean;
function recessive(info : TtableRec; ind : integer;
const field : integer = 0): boolean;
public
constructor Create(TABLE_MAX_SIZE : integer);
function find(name , family , age : string):boolean;
procedure insert(name , family , age : string);
end;
اینو باید کلید براش تعریف کرد یا فقط همین رو بنویسم کفایت میکنهconstructor TSearcher.Create(TABLE_MAX_SIZE: integer);
یا
ویاfunction TSearcher.find(name, family, age: string): boolean;
وهمچنین این یکی روprocedure TSearcher.insert(name, family, age: string);
function TSearcher.recessive(info: TtableRec; ind: integer;
const field: integer): boolean;
اگه میشه یه توضیحی بدین اینا با دکمه یا چیز دیگری وصل میشه یا خودشون همینجوری کار میکننfunction TSearcher.tblfind(info: TtableRec): boolean;
ورودیهامون چجوری باشه خوروجیمون چطوری
بازهم تشکرم