Create OraLoader at Runtime

[reini]

Hi,

when creating the OraLoader at Runtime i get "unknown identifier" for the OraLoader.Column.size and OraLoader.Column.datatype.

Is it necessary to set the size, because it works also without setting the size.

We use ODAC 5.50.0.15 / D7 / XP SP1 / Ora 8.1.7

Thanks in advance,
reini

Code: Select all

  OraLoader := TOraLoader.Create(Self);
  with OraLoader do
  begin
    Name := 'OraLoader';
    Session := OraSession;
    TableName := 'MYTABLE';

    with Columns.Add do begin
      Name := 'FIELD1';
      DataType := ctString;   //-> unknown identifier
      Size := 20;    //-> unknown identifier
    end;

    LoadMode := lmDML;
    OnPutData := OraLoaderPutData;
  end;

Code: Select all

[Paul]

Columns.Add is a method of TCollection and returns TCollectionItem. You must convert it to TDPColumn

[reini]

Hi again,

ok - the DataType works but the "convert to TDPColumn" ist not clear for me.

Could you give a short example.

Code: Select all

 
    MyOraLoader.Columns.Items[i].DataType := ctstring;

Thanks in advance.

[Paul]

Code: Select all

    with TDPColumn(Columns.Add) do begin 
      Name := 'FIELD1'; 
      DataType := ctString;
      Size := 20;  
    end; 

[reini]

thanks a lot,

it works...