Ver Mensaje Individual
  #2  
Antiguo 17-08-2008
[coso] coso is offline
Miembro Premium
 
Registrado: may 2008
Ubicación: Girona
Posts: 1.678
Reputación: 0
coso Va por buen camino
Hola,
1.- Adoconnection se conecta a bases de datos usando tansolo connectionstring, y pudiendose cambiar esta en tiempo de ejecución.

Código Delphi [-]
function Tdm.ConnectString(s : string) : string;
begin
     ConnectString := 'Provider=Microsoft.Jet.OLEDB.4.0;' +   // creem una conection sring standard
          'Password="";User ID=Admin;Data Source=' + s + ';' +
          'Mode=Share Deny None;Extended Properties="";' +
          'Jet OLEDB: System database="";' +
          'Jet OLEDB: Registry Path="";' +
          'Jet OLEDB: Database Password="";' +
          'Jet OLEDB: Engine Type=5;' +
          'Jet OLEDB: Database Locking Mode=1;' +
          'Jet OLEDB: Global Partial Bulk Ops=2;' +
          'Jet OLEDB: Global Bulk Transactions=1;' +
          'Jet OLEDB: New Database Password="";' +
          'Jet OLEDB: Create System Database=False;' +
          'Jet OLEDB: Encrypt Database=False;' +
          'Jet OLEDB: Don''t Copy Locale on Compact=False;' +
          'Jet OLEDB: Compact Without Replica Repair=False;' +
          'Jet OLEDB: SFP=False';
end;

...

ADOConnection1.ConnectionString := Connectstring('Mi archivo.mdb');
ADOConnection1.Connected := true;

lo que significa que te olvidas de los alias y del ODBC

Cita:
Edit2.text:= Datamodule.TablaCampo2.value;
yo lo haria como

Cita:
Edit2.Text := Datamodule.Tabla.FieldByName('CAMPO2').Asstring;
2. ¿Tiene alguien idea de que de malo pueda tener usar los DBEdit o
DBLabel? ¿se puede corromper la BD por un mal uso de estos o algo así?

No tienen nada malo...lo unico que si no los controlas, pues es quiza mas facil trabajar con los edits y luego postear los cambios.


3. Creen que se pueda combinar el estilo que yo uso con este otro para
lo que son las Querys por ejemplo, ya que los ADOQuerys que veo en ese
tutorial ahorran mucho trabajo (que yo hacía usando ciclos y cosas así
x_X)

Puedes asignarle a un datasource una query, incluso, sin tener que trabajar con tablas ya

Prueba de hacer, siendo q una TAdoQuery,
Código Delphi [-]
...
q.Active := false;
q.SQL.Text := 'SELECT Sum(Depositos) AS suma, Count(*) as numero_registros from BANCO';
q.Active := true;
ShowMessage(FormatFloat('0.00',q.FieldByName('suma').Asfloat));
ShowMessage(q.FieldByName('numero_registros').Asstring);
...

Estos campos quedaran en la query hasta que se haga una nueva consulta: al seleccionar, estas seleccionando esos 2 campos (suma y numero_registros) y ninguno mas en ese momento,por lo que seria como tener una tabla con solo dos campos creados a partir de BANCOS.

en ese contexto, distinctrow estaria mal. Aqui un tutorial SQL basico

Última edición por coso fecha: 17-08-2008 a las 16:13:43.
Responder Con Cita