Program IFSTest;
var
SQLConnection: TDBConnection;
SQLQuery: TDBQuery;
Begin
SQLConnection:= TDBConnection.Create();
SQLConnection.ProviderName := 'MySQL'; // property assigment time whole program getting exit
SQLConnection.UserName := 'root';
SQLConnection.Password := '';
SQLConnection.Server := 'localhost';
SQLConnection.Database := 'mysql';
SQLConnection.Open();
SQLQuery:= TDBQuery.Create();
SQLQuery.Connection := SQLConnection;
SQLQuery.SQL.Text := 'select * from user';
SQLQuery.Open;
while not SQLQuery.Eof do
begin
Memo1.Lines.Add(SQLQuery.FieldByNameAsString('User')) ;
SQLQuery.Next;
end;
SQLQuery.Close();
SQLQuery.Free();
SQLConnection.Close();
SQLConnection.free();
End.
hello that 2 object calling from dll and added to pascalscript plugings collection then i test with this code but object creation succeded then exit whole program when the property set by text
hello that 2 object calling from dll and added to pascalscript plugings collection then i test with this code but object creation succeded then exit whole program when the property set by text