Jak zrobic w BCB żeby po kliknięciu na Forme Image przesónoł sie w to miejsce ale nie przeteleportował tylko płynnie przeszedł w dany punkt ??
0
0
Wersja najbardziej chamska i totalnie nie zoptymalizowana - podaję raczej jako wskazówkę, a nie jako rozwiązanie.
[code]void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{bool xs = Image1->Left > X, ys = Image1->Top > Y;
for (int x=Image1->Left; x!=X; xs?x--:x++)
{Image1->Left = x;
Sleep(30);
Application->ProcessMessages();
}
for (int y=Image1->Top; y!=Y; ys?y--:y++)
{Image1->Top = y;
Sleep(30);
Application->ProcessMessages();
}
}[/code]
0
Do czego to służy ??
Application->ProcessMessages();
//W tym przypadku chodzi o to, aby program obsłużył komunikaty odpowiedzialne za odświeżenie formy i namalowanie obrazu w nowym miejscu - Marooned
0
Application->ProgressMessages - na chlopski rozum. Jest to funkcja ktora sprawia ze twoj program podczas wykonywania np. jakiej petli jest aktywny tzn. mozesz go przesuwac po pulpicie, minimalizowac itp :D