concatenar dos dbedit para un campo

[gonza_619]

Hola a todos , q tal , bueno miren necesito concatenar o unir dos dbedits para un campo llamado "apellido y nombre".
es decir en un db edit escribir el apellido y en otro dbedit el nombre y luego q se unan para q se coloqen en el campo "apellido y nombre".
lo Necesito para el alta de un registro, ok gracias a todos

[jafera]

Hola, a ver si algo así te sirve:

Código Delphi [-]
APELLIDO||', '||NOMBRE AS NOMBRE_COMPLETO

Saludos

Josep

[ecfisa]

Hola.

En realidad lo que vas a concatenar son los campos (DataField) mostrados por el DBEdit.
Una posibilidad es crear un campo calculado 'ApelNom' por ejemplo, y asignarle la concatenación en el evento OnCalcFields del DataSet.

Código Delphi [-]
procedure TForm1.IBDataSet1CalcFields(DataSet: TDataSet);
begin
  with IBDataSet1 do
    FieldByName('ApelNom').AsString:= FieldByName('Apellido').AsString+'  '+
       FieldByName('Nombre').AsString;
end;

En el ejemplo usé un IBDataSet, pero con pocos cambios funciona para IBQuery, TTable, TQuery, etc.

Saludos.

[gonza_619]

bueno en este caso seria alreves ya que en el campo "apellido y nombre" qiero
llenarlo pero con 2 dbedits, se puede hacer en realidad.
por ej seria asi

APELLIDO: dbedit1

NOMBRE: dbedit2

luego al guardar q se unan los dos dbedits con un espacio entre ellos y se guarden en el campo apellido y nombre.
se puede hacer?

[gonza_619]

o me conviene usar solamente edits? para concatenar?

[ecfisa]

Empezado por gonza_619

bueno en este caso seria alreves ya que en el campo "apellido y nombre" qiero
llenarlo pero con 2 dbedits, se puede hacer en realidad.
por ej seria asi

APELLIDO: dbedit1

NOMBRE: dbedit2

luego al guardar q se unan los dos dbedits con un espacio entre ellos y se guarden en el campo apellido y nombre.
se puede hacer?

Si no te entiendo mal, creo que tenés equivocado el concepto.
Los TDBEdits, para decirlo sencillo, son una representación visual de campos que están en una tabla .
Por eso es necesario asociarlos a un DataSource que los conecta a ella.
Realizá una prueba simple: Creá un proyecto, abrí la pestaña DataControls, poné un DBEdit y ejuta...
No te permite escribir nada y es lógico... por que ¿ en donde estas escribiendo ?.

Si lo que deseas es concatenar dos strings, sin relación con base de datos alguna, sería más adecuado
usar TEdit para ello.

Saludos.

[ecfisa]

Empezado por gonza_619

o me conviene usar solamente edits? para concatenar?

Si, definitivamente.

Saludos.

[gonza_619]

bien si te entiendo, por eso pregunte si era mejor usar tedits, en ese aso como seria ? para concatenarlos y guardarlos en un campo?

[ecfisa]

Te pongo un ejemplo con una variable, si tenés que guardarlo en un campo, reemplazá la variable por el campo receptor.

Código Delphi [-]
var
  ApelNom: string;
begin
  ApelNom:= Edit1.Text + ' ' + Edit2.Text;
end;

Saludos.

[gonza_619]

bien muchas gracias por tu ayuda seria algo asi entonces

Código Delphi [-]
var
  ApelNom: string;
begin
  ApelNom:= Edit1.Text + ' ' + Edit2.Text;
   table1.fieldbyname('apellido y nombre').asstring:=apelnom;
end;

[ecfisa]

En ese caso no es necesaria la variable, podés hacerlo así:

Código Delphi [-]
    Table1.FieldByname('apellido y nombre').Asstring:=  Edit1.Text + ' ' + Edit2.Text;

Saludos.