кружка кофе делает свое дело

немного подумал и сделал так:
Код:
for i:=0 to k do
begin
j:=i+1;
while j <= k do
begin
if listbox2.Items[i]=listbox2.Items[j] then begin
listbox2.Items.Delete(j);
k:=k-1;
end;
inc(j);
end;
end;
вроде убирает повторы..а можно как-нибудь это сделать на SQL?