Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
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
  #5  
Antiguo 19-09-2006
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 26
maeyanes Va por buen camino
En determinado momento podrías usar un TComboBox normal y en el evento BeforePost de la tabla en cuestión agregar el valor de ItemIndex del TComboBox en el campo deseado. Para esto, la propiedad Style debes ponerla en csDropDownList:

Código Delphi [-]

// La propiedad Items del ComboBox tendría:
// Si <--- ItemIndex = 0
// No <--- ItemIndex = 1

procedure TForm1.Tabla1BeforePost(DataSet: TDataSet);
begin
  DataSet.FieldByName('Campo').AsInteger := ComboBox1.ItemIndex
end;

Otra opción sería desde el evento OnChange del TComboBox::

Código Delphi [-]
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  Tabla1.FieldByName('Campo').AsInteger := ComboBox1.ItemIndex
end;

Saludos...
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
Base de datos parecida a access? Torreblanca Conexión con bases de datos 5 02-11-2006 20:23:50
Funcionalidad del TeamSourse jmedina Varios 3 23-02-2005 18:21:11
Mas funcionalidad con Inno Setup alt126 Varios 3 20-12-2004 12:58:03
Crear aplicacion parecida a DataBase desktop aram2r Varios 3 18-05-2004 18:14:06
TBATCHMOVE con ADO o alguna solucion parecida Rigg SQL 0 14-04-2004 16:49:40


La franja horaria es GMT +2. Ahora son las 06:24:27.


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