@Official_AKT Telegram kanali
27-3. Delphi
dasturlash muhitida dastlabki 5 ta toq sonni ekranga chiqaradigan ilova yarating.
Bitta label va 1ta button o‟rnatib, buttonning prosedurasiga quyidagini yozamiz:
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
for i:=1 to 5 do label1.Caption:=label1.Caption+inttostr(i)+', ';
end;
Dostları ilə paylaş: