5 dicas rápidas para usar no Delphi

Estou programando usando Delphi Pascal e aqui algumas dicas para os leitores:

1-Tutorial de GLScene (bilbioteca gráfica 3d- free):

http://www.lordzero.co.nr/files/GLScene-Tutorial01.pdf
http://www.lordzero.co.nr/files/GLScene-Tutorial02.pdf
http://www.lordzero.co.nr/files/GLScene-Tutorial03.pdf

2-Para reduzir drasticamente o flicker (piscada) no Delphi quando fizer animações usando GDI:

no evento oncreate do Form, use: doublebuffered:=true; 

3-Para inverter rapidamente uma imagem na horizontal use:

Procedure Flip1Click(Sender: TObject);

Var
   DummyImage          : TImage;
   X,Y                 : Integer;
   SrcRect,DstRect     : TRect;

Begin
//coloque a imagem no componente  imagem1
X := Image1.Picture.Width;
Y := Image1.Picture.Height;
SrcRect := Rect(0,0,X,Y);
DstRect := Rect(X,0,0,Y);
//aqui o truque!
DummyImage := TImage.Create(Self);
DummyImage.Width := X;
DummyImage.Height := Y;
//DummyImage.Canvas.CopyMode := cmSrcCopy
DummyImage.Canvas.CopyRect(DstRect,Image1.Canvas,SrcRect);
//inverte  a imagem
Image1.Picture := DummyImage.Picture;
//copia a imagem de volta
DummyImage.Free;
//libera o espaço do dummy
End;

 4-Saber qual o código ASCII de uma tecla:

{ - Crie um Label no Form (Label1);
  – Mude a propriedade KeyPreview do form para true;
  – Insira o código abaixo no evento OnKeyDown do Form  }

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  Label1.Caption := Format(’O código da tecla : %d’, [Key]);
end;

5-Tabela com códigos das teclas no Delphi , você pode achar neste endereço:

http://delphi.about.com/od/objectpascalide/l/blvkc.htm

Mais dicas em breve..