FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Asignar a un campo un select max
Buenos dias foristas ¡¡¡¡
Sera que ustedes me pueden ayudar?? lo que pasa es necesito asignarle desde delphi a mi campo item_prod el valor que surge de la siguiente instruccion sql Código:
select max(item_prod) from prod esta instruccion debe quedar aqui: Código:
procedure TForm6.Button1Click(Sender: TObject); begin band := DBLookupComboBox1.KeyValue; IBDataSet1.Append; DBLookupComboBox1.KeyValue := band; IBDataSet1.FieldByName('item_prod').AsInteger := 'select max(item_prod) from prod' end;
__________________
Una forma de alcanzar tus metas es ayudando a otros a alcanzar las suyas Última edición por el_barto fecha: 23-06-2005 a las 18:15:35. |
#2
|
||||
|
||||
tienes que poner u codigo en ibquery
'select max(item_prod) as mayor from prod ' luego abrela.... y por ultimo procedure TForm6.Button1Click(Sender: TObject); begin ibquery.close; ibquery.open; band := DBLookupComboBox1.KeyValue; IBDataSet1.Append; DBLookupComboBox1.KeyValue := band; IBDataSet1.FieldByName('item_prod').AsInteger := ibquery.fieldbyname('mayor'). asInteger; end; |
|
|
|