Prawie to samo, co w przypadku 'error LNK2001: unresolved external symbol _main’, jednak tym razem nie została odnaleziona funkcji WinMain. Zajrzyj do wcześniejszego pytania. Autor: Iskar
Archiwa
[Visual C++] Co oznacza błąd 'error LNK2001: unresolved external symbol _main’?
Jeżeli podczas kompilacji natknąłęś się na powyższy błąd, oznacza to, że nie odnaleziono w pliku z kodem źródłowym definicji funkcji main, która wymagana jest w każdej aplikacji konsolowej. Często podczas tworzenia nowego projektu zdarza się pomylić – zamiast wybrać Win32 Application, wybiera się Win32 Console Application, a w źródle umieszcza się definicję funkcji WinMain. Sprawdź, […]
[BCB] Jak zablokować odświeżanie formularza?
Do zablokowania odświeżania formy służy LockWindowUpdate(), gdzie jako parametr wstawiamy uchwyt okna.
1 |
LockWindowUpdate(Form1->Handle); |
Autor: Drazek
[BCB] Jak wyświetlić formularz na środku ekranu bez względu na rozdzielczość?
Aby wyświetlić formatkę na środku ekranu dzielimy rozdzielczość przez 2 i odejmujemy od tego połowę długości, bądź szerokości formularza.
1 2 3 4 5 6 7 8 9 |
void __fastcall TForm1::FormCreate(TObject *Sender) { Form1->Left = (Screen->Width / 2) - (Form1->Width / 2); Form1->Top = (Screen->Height / 2) - (Form1->Height / 2); } |
Autor: Drazek
[BCB] Jak usunąć wszystkie komponenty należące do tej samej klasy?
Ten kod prezentuje usunięcie wszystkich komponentów należących do klasy Tbutton. Tworzmy wskaźnik do którego pętlą przypisujemy kolejne komponenty formy. Jeśli klasa komponentu jest równa z TButton to usuwamy komponent.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
void __fastcall TForm1::Button1Click(TObject *Sender) { TComponent *komponent; for (int i = ComponentCount - 1; i >= 0; i--) { komponent = Components; // przypisuje komopnent z formy if (AnsiString(komponent->ClassName()) == "TButton") delete komponent; } } |
Autor: Drazek
[BCB] Jak stworzyć formularz w kształcie elipsy ?
Aby stworzyć formę w kształcie elipsy użyjemy funkcji CreateEllipticRg(). Następnie procedurą SetWindowRgn() ustawimy otrzymany uchwyt do obszaru o kształcie elipsy.
1 2 3 4 5 6 7 8 9 10 11 |
void __fastcall TForm1::FormCreate(TObject *Sender) { HRGN MyRgn; MyRgn = CreateEllipticRgn(0, 0, ClientRect.Right, ClientRect.Bottom); SetWindowRgn(Handle, MyRgn, true); } |
Autor: Drazek