switch (on/off)
 

Hola a todos,

necesito un componente que haga lo mismo que el TSwitch de las RX, es decir tiene 2 bitmapas (on/off) 2 textos (0n/0ff) y cuando clickas pasa de uno a otro.

El de las RX es perfecto, pero no las quiero usar (me dan errores exporadicos al salir del entorno y son demasiados componentes)

ademas he intentado aislar solo ese componente, pero es imposible.

Si alguien sabe de algo, que avise, please.


Sergio

Bajate alguno de los varios que hay freeware en


www.DelphiSpirit.com

Un Saludo desde Canarias.

Pues.....
te agradezco el enlace, pero no he encontrado nada :(

saludos

en algunas ocasiones que he necesitado algo parecido, lo que hago es lo siguiente. pongo un TPanel (sin bordes) y dentro un TImage que contenga un bmp con los dos graficos a mostrar, uno al lado del otro ( por supuesto de igual tamaño ).el TImage lo ajusto left y top a cero y el tpanel de modo que solo se vea un bmp, luego el siguiente codigo

procedure TForm1.Image1Click(Sender: TObject);
begin
if Image1.Left < 0 then
begin
Image1.Left := 0;
//resto de acciones
end
else
begin
Image1.Left := Image1.Left - Round(Image1.Width /2);
//resto de acciones
end;
end;

es muy sencillo, rapido y.. ademas funciona :D