busquedas en delphi

[ecfisa]

Hola.

No me queda claro si lo que querés es seleccionar el tipo de busqueda (burbuja, inserción, shell, quicksort, etc) mediante los componentes que mencionas o buscar dentro del contenido de ellos.

Si es esto último es muy sencillo en aquellos que tienen la propiedad TStrings.

Te doy algunos ejemplos:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  lb,me,cb: string;
begin
  lb:= ListBox1.Items[ListBox1.Items.IndexOf('hola mundo')];
  cb:= ComboBox1.Items[Combobox1.Items.IndexOf('perro verde')];
  me:= Copy(Memo1.Text,Pos('casa', Memo1.Text), Length('casa'));
  ShowMessage(lb + #10#13 + cb + #10#13 + me);
end;

Pero te juro que no se me ocurre la manera de hacerlo con un CheckBox...
Saludos.