Leer un edit

[JoseFco]

Gracias egostar, Caral y Delphius.

El codigo de egostar esta trabajando bien.

Código Delphi [-]
 
procedure TForm1.Button1Click(Sender: TObject);
begin  case strtoint(edit1.text) of      
3,4: Shape1.Brush.Color := clRed;     
5,6: Shape1.Brush.Color := clYellow;     
7,8,9,10,11,12: Shape1.Brush.Color := clGreen;     
else Showmessage('Este programa no soporta ese valor');  
end;
end;

Los colores y el shape solo son para poder entender mejor la idea, que es a partir de una costante que se tendra que poner en un edit o en un ComboBox poder selecionar que mandare a algun lugar ( por ejemplo serial port).Que mi programita tome en cuenta que parametros estoy poniendo para el determinar un camino.
Creo que un combobox es mas elegante y de una vez solo pondre los valores que quiro tener, o que soportara mi programita.

Un Saludo y mil gracias por la ayuda.