Доступ к объекту Oracle

Previous  Top  Next

    
 

 

 

Для этого можно воспользоваться компонентами от AllRoundAutomations Direct Oracle Access. Если кому надо могу поделиться. При помощи этих компонент можно не только производить простые запросы/вставки, но и выполнять DDL-скрипты, и иметь доступ к объектам Oracle 8, примет смотри ниже...

 

 

Code:

var

Address: TOracleObject;

begin

Query.SQL.Text := 'select Name, Address from Persons';

Query.Execute;

while not Query.Eof do

begin

   Address := Query.ObjField('Address');

   if not Address.IsNull then

     ShowMessage(Query.Field('Name') + ' lives in ' + Address.GetAttr('City'));

   Query.Next;

end;

end;

 

 

©Drkb::02721

       

Взято с http://delphiworld.narod.ru