Прикладные интеллектуальные системы, основанные на мягких вычислениях. Ярушкина Н.Г. - 133 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

132
Ниже схематично приводится пример простой работы с полями таблиц
InterBase.
1. Подключение к базе данных
TIBDatabase.DatabaseName EXAMPLE.GDB
TIBDatabase.params user_name=sysdba
password=masterkey
lc_ctype=NONE
TIBTransaction
TIBTable.TableName EX001
2. Добавление записей
TIBQuery
SL: WideString;
With IBQuery do begin
SQL.Clear;
SQL.Add(‘INSERT INTO EX001 (SLOVO_D )');
SQL.Add('VALUES (');
SQL.Add('_WIN1252 '''+WideStrToWIN1252(SL)+'''');
SQL.Add(')');
ExecSql;
End;
3. Выборка данных
With IBQuery do begin
Close;
SQL.Clear;
SQL.Add('select slovo_d, count(slovo) as CNT from EX001');
SQL.Add('where slovo_d like _WIN1252 '''+SL+'%''');
SQL.Add('group by slovo');
Open;
End;
Для облегчения написания процедур перекодировки из одной кодовой
таблицы в другую можно воспользоваться следующей ссылкой:
The Unicode units provide - http://fundementals.sourceforge.net/ unicode.html

Страницы