Olá galera,
Hoje eu vim trazer um tultorial que eu achei em uma apostila de como criar uma tabuada no delphi.
Enquanto X < Y faça
<instruções>

* X - Variavel integer
* Y - Até o numero da tabuada que quiser, exemplo: 100. A tabuada vai até 100.

Então vamos a obra ...
Adicione os componentes:

1 Listbox
1 Edit
1 Button

Coloque no button:

var
Num, i, mult: integer;
Begin
Num := StrToInt(Edit1.text);
i := 1;
While i <= 10 do
Begin
Mult := Num * i;
ListBox1.items.Add(IntToStr(Mult));
i := i + 1;
End;

Só isto, o número que esta no edit1, multiplica ate o Y ( no caso 10 ).
Qualquer coisa só avisar !