PopUp Dinamico en un Edit

[[fer21unmsm]]

Empezado por Caral

Hola
Código Delphi [-] QTemp.SQL.Text := 'Select TuCampo From TuTabla';
QTemp.Active := True;
While not QTemp.Eof do begin PopupMenu1.Items.Add(QTemp.Fields[0].Text); QTemp.Next; end;

Saludos

Bueno, creo que en el ejemplo de caral está agregando un texto "QTemp.Fields[0].Text" en vez de un objeto TMenuItem lo cual no es correcto, y en el codigo de chackall, si le pasa a PopupMenu1.Items.add un objeto de tipo TMenuItem.

Saludos
[Edit]
No vi la edicion de arriba
[/Edit]