Código Delphi [-] function CreateQuery(AOwner: TComponent; const ASQL: string): TFDQuery; begin Result := TFDQuery.Create(AOwner); Result.Conncetion := // asignar connection, o dejarla vacia y asignarla despues,o pedirla por parametro, etc Result.SQL.Text := ASQL; end;
function CreateQuery(AOwner: TComponent; const ASQL: string): TFDQuery; begin Result := TFDQuery.Create(AOwner); Result.Conncetion := // asignar connection, o dejarla vacia y asignarla despues,o pedirla por parametro, etc Result.SQL.Text := ASQL; end;