probleme de reouverture dans un comboboxRésolu

Question

Bonjour alors voila j'ai un probleme je dois ouvrir "le monde" dans combobox1 &#224; partir de OK ecrit sur le button1. Voila je l'ouvre une fois donc sa maffiche une autre fiche qui est form2.  Puis quand je ferme Form2 et que je veux reouvrir encore la form2 alors donc je reappui sur OK  et la il me dit qu'l y a une violation du 00..... je sais pas quoi. Alors je ferme le programme et dans la marge de l'editeur il y a une fleche sur la ligne ou j'ai ecrit :

procedure TForm1.FormPaint(Sener: TObject);
begin
Canvas.Draw(0,0,Bmp);
end; <------------------fleche ici

voila et je ne comprend pas pourquoi.

Cirec · Accepted Answer

bon l'image est dans la form2 je suppose?
si c'est le cas alors c'est normal puisque dans l'&#233;v&#232;nement OnClose tu as Bmp.Free; 
donc quand tu r&#233;ouvres la form Bmp n'est plus assign&#233; 

Il te faut donc modifier le code comme suit :

var
  Form2: TForm2;
  bmp : TBitMap;
implementation


{$R *.DFM}



procedure TForm2.FormPaint(Sender: TObject);
begin
  Canvas.Draw(0, 0, Bmp);
end;


Initialization
Bmp := TBitMap.Create;
Bmp.LoadFromFile('Cloud.bmp');
Finalization
Bmp.Free;
end.

@+
Cirec

maxioutils · Answer

le probleme vient certainement du fond de cette form car quand j'essaye cette manipulation avec une form sans imagede fond, &#231;a marche nickel

maxioutils · Answer

Quand j'enleve bmp.Free &#231;a marche mais moi je ne veux pas l'enlever

maxioutils · Answer

ok super &#231;a marche merci

Cirec · Answer

n'oublie pas de cliquer sur R&#233;ponse Accept&#233;e si elle te convient Merci

Probleme de reouverture dans un combobox

5 réponses

Votre réponse

Discussions similaires