Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   capturar texto no seleccionado, ComboBox (https://www.clubdelphi.com/foros/showthread.php?t=24147)

sakuragi 10-08-2005 01:47:18

capturar texto no seleccionado, ComboBox
 
hola que tal

alguien sabe como puedo capturar el texto no seleccionado de un combobox?

buenolo que intento es haser esto por el problema que tengo

todos sabemos que cuendo llenas una lista del combobox, si empiesas a escribir un letra, aparese que letras que pones y si lo demas sale sombreado(seleccionado) si la letra es igual a un item de la lista.

entonses yo quiero saber si se puede comparar el texto no seleccionado o sombreado.

por que estoy hasiendo una consulta en tiempo de ejecucion que lo que vaya escirbiendo en el combobox me vaya apareciendo, el problema viene que si me hase la consulta pero me hagarra todo el texto del combobox con ti combreado y pues, no sale como quiero.

voy es cribiendo en el combobox, como si fuera buskeda de clientes

si pongo en el combo box la letra "a" se supone que deben a pareser todos los combres con "a".
pero como el combobox tiene auto completado me va poner el primero de la lista en sombreado, que seria por ejemplo "adrian"

entonses ya la lista donde severia apareser todos los nombres nomas sale "adrian" que es lo que esta en el combobox.


espero haser sido claro =P

saludos
de hante mano gracias

vtdeleon 10-08-2005 04:09:59

Saludos

Utilizando la Funcion Copy y tambien SelStart del combo puede lograr lo qeu quieres.
Algo que se me ocurre rapido es:
Código Delphi [-]
copy(combo.Text,1,combo.SelStart);
Suerte

Lepe 10-08-2005 12:54:29

No sé por qué, pero se me ha venido a la mente este hilo donde se hace lo que dices. jejeje

Un saludo

sakuragi 10-08-2005 23:28:22

bueno gracias taodos por las ideas

alfin me funciono asi



Código Delphi [-]
 procedure TForm1.ComboBox1KeyUp(Sender: TObject; var Key: Word; 
  Shift: TShiftState); 
begin 
       Label1.Caption:=Copy (ComboBox1.Text, 0,          
                                 Length(ComboBox1.Text)-Length(ComboBox1.SelText));
 end; 
 


saludpos


La franja horaria es GMT +2. Ahora son las 06:42:14.

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