Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 13-03-2014
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola giulichajarí.

Creo haberte entendido, tal vez te resulte mas simple usar TDBLookupComboBox en lugar de TEdit, por ejemplo:
Código Delphi [-]
...
procedure TForm1.FormCreate(Sender: TObject);
begin
  // Tabla donde se guardará el campo compuesto CARACTERISTICA
  DataSet.Open;

  // Configurar consultas
  with QryNombre do
  begin
    Close;
    SQL.Text:= 'SELECT ID, NOMBRE FROM TU_TABLA ORDER BY NOMBRE';
    Open;
  end;
  with QryMarca do
  begin
    Close;
    SQL.Text:= 'SELECT ID, MARCA FROM TU_??_TABLA ORDER BY MARCA';
    Open;
  end;

  // Configurar DataSources
  dsNombre.DataSet:= QryNombre;
  dsMarca.DataSet:= QryMarca;

  // Configurar DBLookupComboBoxes
  with DBLCBoxNombre do
  begin
    ListSource:= dsNombre;
    ListField := 'NOMBRE';
    KeyField:= 'ID';
  end;
  with DBLCBoxMarca do
  begin
    ListSource:= dsMarca;
    ListField := 'MARCA';
    KeyField:= 'ID';
  end;
end;

procedure TForm1.btnGuardarClick(Sender: TObject);
begin
  // Guardar la composición en el campo "Caracteristica"
  with DataSet do
  begin
    Edit; // (Insert o Append)
    FieldByName('CARACTERISTICA').AsString:= Format('%s %s %s %s',
      [DBLCBoxNombre.KeyValue, EditCaracteristica.Text,
      EditMedida.Text, DBLCBoxMarca.KeyValue]);
    //...
    Post;
  end;
end;
En líneas generales selecciona NOMBRE y MARCA desde la/las tablas definidas en las consultas y concatena estos valores con los de los edits Caracteristica y Medida, guardando este resultado en el campo "CARACTERISTICA" de la tabla X.

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Pegar caracteres en un Edit de otros Programas kurono Varios 14 25-01-2011 03:54:49
bucle entre edit.change y edit.change alremo81 Varios 2 07-04-2008 15:25:39
Unir Edit con Edit Caral Varios 8 17-11-2006 21:37:35
problemas con el el .Edit: qryCONSULTA.Edit McRose Conexión con bases de datos 3 07-06-2005 15:46:39
Crear un pdf a partir de otros pdf barencibia Varios 0 13-06-2004 19:25:08


La franja horaria es GMT +2. Ahora son las 02:32:15.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi