Показать сообщение отдельно
  #19  
Старый 26.06.2019, 23:36
Maks19 Maks19 вне форума
Начинающий
 
Регистрация: 19.06.2019
Сообщения: 113
Версия Delphi: Delphi7
Репутация: 10
По умолчанию

Я так передавал имя проекта в табл 1 и одновременно поиском делал текущим.
Код:
if  not (ComboBox1.Text='') then
 begin
 if not Table1.Locate('Projname',ComboBox1.Text,[]) then
 begin
 Table1.Insert;
 Table1.FieldByName('Projname').AsString:=ComboBox1.Text;
Form1.Caption:=Table1.FieldByName('Projname').AsString;
  Table1.Post;
Ответить с цитированием