Ładny brzuch
Niech ktos mi powie dlaczego gdy jest narysowany jakis obrazek w klasie TCanvas i potem jak otworze jakies okienko (obojetnie jakie) albo zminimalizuje i znow maxymalizuje to cay obrazek znika? Why tak si dzieje? :blink:
Bo go nie odrysowywujesz. Wystarczajca odpowied, czy chciby wiedzie co zrobi, eby tak si nie dziao?
jesli tak to poprostu odrysowywuj go znowu w funkcji OnPaint formy
Bo go nie odrysowywujesz. Wystarczajca odpowied, czy chciby wiedzie co zrobi, eby tak si nie dziao?
jesli tak to poprostu odrysowywuj go znowu w funkcji OnPaint formy
Przykad:
void __fascall TFormMain::Rysuj() { Canvas->TextOut(10, 10, "hello"); //wypisujemy tekst } void __fastcall TFormMain::OnPaint() { Rysuj(); //odmalowywujemy, jeli co nam zamaluje wypisany tekst }
Przykad:
void __fascall TFormMain::Rysuj() { Canvas->TextOut(10, 10, "hello"); //wypisujemy tekst } void __fastcall TFormMain::OnPaint() { Rysuj(); //odmalowywujemy, jeli co nam zamaluje wypisany tekst }
Witam
Tak dla cisoci R@fcio poda kod dla Borland C++ Buildera
W identyczny kod dla Delphi:
//<cut> private procedure Rysuj(); //<cut> procedure TForm1.Rysuj(); begin Canvas.TextOut(10, 10, 'hello'); end; procedure TForm1.FormPaint(Sender: TObject); begin Rysuj; end;
Pozdrawiam
Witam
Tak dla cisoci R@fcio poda kod dla Borland C++ Buildera
W identyczny kod dla Delphi:
//<cut> private procedure Rysuj(); //<cut> procedure TForm1.Rysuj(); begin Canvas.TextOut(10, 10, 'hello'); end; procedure TForm1.FormPaint(Sender: TObject); begin Rysuj; end;
Pozdrawiam
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Bo go nie odrysowywujesz. Wystarczajca odpowied, czy chciby wiedzie co zrobi, eby tak si nie dziao?
jesli tak to poprostu odrysowywuj go znowu w funkcji OnPaint formy
Bo go nie odrysowywujesz. Wystarczajca odpowied, czy chciby wiedzie co zrobi, eby tak si nie dziao?
jesli tak to poprostu odrysowywuj go znowu w funkcji OnPaint formy
Przykad:
void __fascall TFormMain::Rysuj() { Canvas->TextOut(10, 10, "hello"); //wypisujemy tekst } void __fastcall TFormMain::OnPaint() { Rysuj(); //odmalowywujemy, jeli co nam zamaluje wypisany tekst }
Przykad:
void __fascall TFormMain::Rysuj() { Canvas->TextOut(10, 10, "hello"); //wypisujemy tekst } void __fastcall TFormMain::OnPaint() { Rysuj(); //odmalowywujemy, jeli co nam zamaluje wypisany tekst }
Witam
Tak dla cisoci R@fcio poda kod dla Borland C++ Buildera
W identyczny kod dla Delphi:
//<cut> private procedure Rysuj(); //<cut> procedure TForm1.Rysuj(); begin Canvas.TextOut(10, 10, 'hello'); end; procedure TForm1.FormPaint(Sender: TObject); begin Rysuj; end;
Pozdrawiam
Witam
Tak dla cisoci R@fcio poda kod dla Borland C++ Buildera
W identyczny kod dla Delphi:
//<cut> private procedure Rysuj(); //<cut> procedure TForm1.Rysuj(); begin Canvas.TextOut(10, 10, 'hello'); end; procedure TForm1.FormPaint(Sender: TObject); begin Rysuj; end;
Pozdrawiam