Forum archive - testing thecoalman's suggestion of [code=php] test [/code] ... FAILED!

Forum Archive Home -> Test -> testing thecoalman's suggestion of [code=php] test [/code] ... FAILED!

Click here for the original forum topic.

testing thecoalman's suggestion of [code=php] test [/code] ... FAILED!

vhelp posted 2009 Jun 07 19:19

testing syntax highlighting/code color-highlighting/etc ...

[code=php]
procedure TForm1.Button1Click(Sender: TObject);
Var
Center : TPoint;
Bitmap : TBitmap;
begin
Bitmap := TBitmap.Create;
Try
Center.y := (Image.Height div 2)+20;
Center.x := (Image.Width div 2)+0;
RotateBitmap_ads(
Image.Picture.Bitmap, //SourceBitmap : TBitmap;
Bitmap , //DestBitmap : TBitmap;
Center , //Center : TPoint;
Angle );//Angle : Extended): TBitmap;
Angle := Angle + 15;
Image2.Picture.Bitmap.Assign(Bitmap);
Finally
Bitmap.Free;
End;
end;
[/code]

EDIT: nope, didnt' work.

-vhelp 5139

Midzuki posted 2009 Jun 10 01:15

New avatar uploaded successfully.

Avatar update completed.