9 replies to this topic

[enecumene]

Pues eso, estoy adaptando un code en Delphi y me encuentro con esta línea:

delphi

if Color < width =" Width)" height =" Height)" width =" Width)" height =" Height)"> Down then begin
Down := D;
Invalidate;
end;

Y al compilarlo me da este error(es):

[Error] BiButton.pas(164): Illegal character in input file: '"' ($22)

Y no logro interpretarlo, ¿quién me da una mano?.

Saludos.

[escafandra]

Pues parece que protesta por el uso de las dobles comillas. ¿El código original es delphi o es otro lenguaje? ¿Que tipos de variable son las del código?

Saludos.

[enecumene]

Pues lo extraño es que también es Delphi, es un componente que estoy adaptando y esa línea vino así, ese es el procedimiento completo:

delphi

procedure TBiButton.Paint;
var
Rect : TRect;
Ha : HDC;
ps : TPaintStruct;
x, y : Integer;
R, rx,
G, gx,
B, bx : Word;
AColor,
LightC,
DarkC : TColor;
begin
Rect := GetClientRect;
InvalidateRgn (Handle, FRegion, False);
try
SetWindowRgn (Self.Handle, FBRegion, True);
except
end;
 
if Color < width =" Width)" height =" Height)" width =" Width)" height =" Height)"> Down then begin
Down := D;
Invalidate;
end;
end;
inherited;
end;

Esas variables vienen de la unidad Controls de Delphi.

Saludos.

[escafandra]

Pues lo extraño es que también es Delphi, es un componente que estoy adaptando...

Pues no tengo suficiente experiencia con la sintaxis de delphi. La ayuda habla de dobles comillas sólo cuando se va a usar String en ensamblador. En ese caso parece que se pueden usar dobles o simples. Claro está que no viene al caso, pero no se el proqué el uso de ese carácter en tu código. 

Saludos.

[enecumene]

   

[Al González]

Hola a todos.

Fernando, parece como si a ese código se le hubiera cruzado algo de HTML.  Tal vez el archivo se encuentra dañado.  ¿Es posible descargarlo de algún sitio en particular?

Saludos.

Al.

[enecumene]

Hola Al, adjunto el .pas completo y gracias por contestar.

Saludos.

[Al González]

Hola Al, adjunto el .pas completo y gracias por contestar.

Saludos.

Ya lo estoy viendo, lo primero que me llama la atención es que no lleva sangrado alguno.

La parte que no compila definitivamente no es sintaxis Delphi, ¿recuerdas la película La Mosca?  Algo así parece haberle pasado a ese archivo.  +o(

Si no es indiscreción, ¿dónde lo obtuviste y para qué lo necesitas?  ¿Venía con otros archivos?  No sé si te sirva en su lugar el TBitBtn nativo. 

[enecumene]

Ah vaya, y sí llegué a ver La Mosca , lo conseguí en la red, se supone que es un botón redondo con efectos similares a los de WMP, ahora ni recuerdo donde lo conseguí, de todos modos gracias Al

Saludos.

[enecumene]

Gracias a Al, me consiguió una versión de ese componente sin ese problema, la cual funciona perfectamente, aquí os dejo el enlace facilitado por mi estimado:

http://www.delphi300...?ArticleID=1172

Saludos.