"P.L." <jessie-peter@get2net.dk> wrote in
news:3b59fade$0$344$edfadb0f@dspool01.news.tele.dk:
> "Harald" <kroning@jyde.dk> skrev i en meddelelse
> news:3b59cd5b$0$394$edfadb0f@dspool01.news.tele.dk...
>> Hej
>>
>> Hvordan får man besked hvis en form bliver flyttet? Jeg har prøvet
>> med OnCanResize men den virker kun hvis windows er sat op til at
>> "Vis indhold i vindue, ,mens der trækkes"
>>
>> Jeg bruger Win2k og Delphi 4
>>
> Hej harald
>
> Jeg har en ide om, at du kan måske bruge onPaint.
> Hvis du laver en variabel (TPoint). Initialitisere denne variable i
> onActivate med left og top. Når så TForm skal 'Paintes' kan du jo
> sammenligne variablen med den aktuelle left og top.
>
> Det kan godt være det ikke kan bruges !!! - det er ikke afprøvet.
>
Jeg ville nok nærmere forsøge at fange en windows message (sådan en må
der jo blive sendt - ikke at jeg lige ved hvilken men det er der nok
andre der gør)
Claus
--
Claus Christiansen, <mailto:cch@unipeople.dk>
personal:
http://www.bigfoot.com/~kruc/; pythia:
http://www.pythia.dk
============================================--------------------------
"Computers are useless. They can only give you answers."
- Pablo Picasso (1881-1973)