الاخ العزيز
شكرا لك لكن طريقتي وهي كالاتي تعطيني ارقام غريبة غير متسلسلة , برغم انني عملت int ل i بمعنى ان i= 0 ;
حاولت ان اعمل طريقتن لكنني لم استطع عملprocedure Tform .create
ارجوا المساعدة في ذلك
عدنان من هولندا
sal 1150
مغلق
var
Form1: TForm1;
i:integer;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
i:=i+1;
memo1.Lines.Add(inttostr(i))
end;
واضغط مرتين في الفراغ
وراح ينتقل لهذا الجزء تلقائي (FormCreate)
محمـــــــــد
المملكه العربيه السعوديـــه
[الفريق العربي للبرمجه الأفضـل دائما]
::::::::::::::::::::::::::::::::::::
msvbvm60.dll = فيجوال بيسك
.................= دلفــــــــــــــي
::::::::::::::::::::::::::::::::::::
الاخ عدنان
يفضل ان تكون الردود في نفس الموضوع...
لن ازيد عن ماقال الاخ دلفي
هذا الموضوع مغلق.