hinty...

Witam ! mam pytanko czy da sie porgramowo pokazac hinta w danym miejscu...tzn wykonuje sie jakas procedurka i jesli jaki warunek jest spełniony to hist pokazuje sie w miescu o wspolrzednych i o danym tekscie....chodzi mi tylko aby go ukazac bez najezdzania na np buttona myszką :) jesli ktos mozemi pomoc to z gory dzieki

Wybacz BCB - przetłumaczysz sobie.

[code]void __fastcall TForm1::bClick(TObject *Sender)
{AnsiString hint="Teścik";
THintWindow *pomoc;
pomoc = new THintWindow(Form1);
TRect rec;
rec = pomoc->CalcHintRect(100, hint, NULL); //policz rozmiar
OffsetRect(&rec, 100, 80); //przesuń info
pomoc->Canvas->Brush->Color = clInfoBk; //kolor tła
// pomoc->Canvas->Pen->Color = clRed;
pomoc->ActivateHint(rec, hint); //pokaż hint
delay(200); //tu trzebaby wykombinować coś mądrzejszego
pomoc->ReleaseHandle(); //schowaj hint
delete pomoc;
}[/code]