![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#20
|
||||
|
||||
|
Вот мой код получения ID:
Код:
var
nomer_predm:integer;
begin
Query_zapros.Active:=False;
Query_zapros.SQL.Clear;
Query_zapros.SQL.Add('SELECT ID_Predmet FROM table_predmety2 WHERE Predmet="'+
Form1.ComboBox3.Text+'"');
Query_zapros.Active:=True;
nomer_predm:=Query_zapros.FieldByName('ID_Predmet').AsInteger;
Form1.Label12.Caption:='Номер предмета = '+IntToStr(nomer_predm);![]() |