salut à tous
j'ais voulu enlever les bordure de ma form en gardant la possibilité de la redimentionner. j'ais trouver ce code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
procedure TForm1.CreateParams(var Params: TCreateParams) ;
begin
  BorderStyle := bsNone;
 
  inherited;
 
  Params.ExStyle := Params.ExStyle or WS_EX_STATICEDGE;
  Params.Style := Params.Style or WS_SIZEBOX;
end;
mais sa ne marche pas ! peut etre c'est due à la version de delphi ? (la mienne c'est delphi 7 entreprise) ou bien suis je déborder

besoin d'aide merci