Groups > Borland > Delphi winforms controls > Using WinForm controls in VCL .NET applications




Using WinForm controls in VCL .NET applications

Using WinForm controls in VCL .NET applications
Wed, 11 Oct 2006 13:12:43 +010
I used "WinForm Control Import Wizard" to import winform's DataGrid
component and it works fine, I can see the control and place it on a form,
but when I tried to put data in it, it does not work. 

Code:
~~~~~

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs,System.Data.SqlClient,System.Data, System.ComponentModel,

Borland.Vcl.StdCtrls, Borland.Vcl.NetControlContainer,

Borland.Vcl.NetControl, Borland.Vcl.NetControlWrapper,

Borland.Wrapper.System.Windows.Forms.DataGrid;

type

TForm1 = class(TForm)

Button1: TButton;

DataGrid1: TImpDataGrid;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

Connection: SqlConnection;

Adapter: SqlDataAdapter;

CustomerDataSet: DataSet;

end;

var

Form1: TForm1;

implementation

{$R *.nfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

Connection := SqlConnection.Create('Persist Security Info=False;' +

'Integrated Security=SSPI;database=TempCustomer;' +

'server=servername;Connect Timeout=30');

Connection.Open;

CustomerDataSet := DataSet.Create;

Adapter := SqlDataAdapter.Create('select * from tblCustomer', Connection);

Adapter.Fill(CustomerDataSet, 'Customer');

DataGrid1.DataSource := CustomerDataSet;

DataGrid1.DataMember := 'Customer';

end;

end.

This code connects to the Database and get the data but it is not shown in
the DataGrid control (TImpDataGrid).

Thanks & Rgds,
R.Saravanan



Post Reply
about | contact