Добавление в столбик в мемо

[Миледи]

а как записать данные в мемо в столбик программно например при событии onShow нужно столбиком записать

0000
0001
0002
0003
0004
0005

[Shouldercannon]

procedure TForm1.FormShow(Sender: TObject);
var
  i: Integer;
begin
  Memo1.Clear;
  for i := 0 to 5 do Memo1.Lines.Add('000' + IntToStr(i));
end;

[Serge_Bliznykov]

Add('000' + IntToStr(i));

в данном случае можно и так,
но в общем - я бы рекомендовал воспользоваться функцией Format():

   for i := 0 to 15 do Memo1.Lines.Add(Format('%.4d', [i]));