VPF::из с++ в дэлфи - Форум программистов

киса2009

Дата 13.9.2010, 22:31 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 72
Регистрация: 21.9.2009
Где: Москва))

Репутация: нет
Всего: нет

Всем снова здравствуйте! smile

Помогите с такой задачкой, а то совсем отвыкла от символики дэлфи..
Есть такой код

Код


void __fastcall TForm12::DBGrid1CellClick(TColumn *Column)
{
Query2->Active=false;
Query2->SQL->Text= "select * from tabl where tabl.'INN_Klienta'=" +Query3->FieldByName("INN_Klienta")->AsString;


Query2->Active=true;
}

Т.е. есть два дбгрида, при выборе в одном появляется инфа в другом в зависимости от выбора. Помогите перевести в delphi smile

Данкинг

Дата 13.9.2010, 23:06 (ссылка)

(нет голосов)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 9
Всего: 130

И что: -> меняешь на точки, а = - на :=.

--------------------

There's nothing left but silent epitaphs.

Proxin

Дата 13.9.2010, 23:19 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 363
Регистрация: 21.6.2008

Репутация: 1
Всего: 3

Код


procedure TForm12.DBGrid1CellClick(Column:TColumn)
begin
Query2.Active:=false;
Query2.SQL.Text:='select * from tabl where tabl.''INN_Klienta''=' +Query3.FieldByName('INN_Klienta').AsString;
Query2.Active:=true;
end;

Это сообщение отредактировал(а) Proxin - 13.9.2010, 23:19

киса2009

Дата 13.9.2010, 23:42 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 72
Регистрация: 21.9.2009
Где: Москва))

Репутация: нет
Всего: нет

Спасибо, ребят smile

Еще и в базе самой с типом напутала.. smile

Можно закрыть

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »