Ver Mensaje Individual
  #5  
Antiguo 21-06-2007
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.669
Reputación: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
Bueno, más o menos lo normal:
Pones un xxDataBase y le asignas un xxTransaction, luego un xxDataset asociado a la xxDataBase y un xxDataSource asociado al xxDataSet (este último sólo si quieres presentar el resultado en un dbgrid, por ejemplo).
Pones:
xxDatabase.connecte := true;
xxTransaction.active := true;
xxDataSet.Open
y eso es todo.

Código:
DMdoc.QRdocumento.Close;
DMdoc.QRdocumento.SelectSQL.Text := 'select campos from unatabla where condicion';
DMdoc.QRdocumento.Open;
if not DMdoc.QRdocumento.IsEmpty then
    DMdoc.QRdocumento.Edit
else
    DMdoc.QRdocumento.Insert;
Los parámetros para la transaction pueden ser estos:
Cita:
write
nowait
rec_version
read_committed
Aquí estoy para toda la ayuda que puedas necesitas.
Archivos Adjuntos
Tipo de Archivo: zip p22.zip (5,6 KB, 8 visitas)

Última edición por Casimiro Noteví fecha: 21-06-2007 a las 00:50:46.
Responder Con Cita