PDA

Ver la Versión Completa : switch (on/off)


sergisan
17-05-2003, 22:24:18
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

José Luis Garcí
20-05-2003, 16:50:24
Bajate alguno de los varios que hay freeware en


www.DelphiSpirit.com

Un Saludo desde Canarias.

sergisan
20-05-2003, 21:06:25
Pues.....
te agradezco el enlace, pero no he encontrado nada :(

saludos

madriles
14-06-2003, 12:56:57
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