procedure TForm2.FormActivate(Sender: TObject);
begin
table1.First;
combobox1.Items.Add('<---- Seçsene looo--->');
while not table1.Eof do
begin
combobox1.Items.add(table1name.Text);
table1.Next;
end;
combobox1.ItemIndex:=0;
end;
end.
__________________
SusKun ve Sessiz Mürekkep...
Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
18 Mart 2015, 14:04
Benzer Konular 
Normal
