+ Reply to Thread
Results 1 to 2 of 2
Thread
  1. 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

    VHELP's - Sample Clips [last: 12.29.06],
    my YouTube videos
    Quote Quote  

  2. Banned
    Join Date: Jun 2007
    Location: UNREACHABLE
    New avatar uploaded successfully.

    Avatar update completed.

    Quote Quote  




Similar Threads

  1. Testing BBCode "CODE' Tag
    By Frank-0-Video in forum Test
    Replies: 0
    Last Post: 6th Feb 2009, 11:31
  2. Replies: 0
    Last Post: 19th Sep 2008, 04:37
  3. Region Free code for Samsung DVD-R130 (australian code)
    By nicksanders in forum DVD & Blu-ray Recorders
    Replies: 0
    Last Post: 1st Aug 2006, 00:26
  4. testing onmousover withscript code enclosed
    By thecoalman in forum Test
    Replies: 4
    Last Post: 11th Dec 2005, 07:22
About   Advertise   Forum   RSS Feeds   Statistics   Tools