gedrag, en ik moet contact opnemen met een "à la", d.w.z. een vorm van.Dus ik moet in feite een TLabel maar " tabstopable " en tstatictext in aanmerking komen.Maar het schilderij focusrect niet geconcentreerd.Dit is mijn oplossing, de interface vormen, tstatictext = (stdctrls. Tstatictext), particuliere, programma drawfocusrect;, programma wmsetfocus (VAR nieuws: twmsetfocus); informatie, wm_setfocus; programma wmkillfocus (VAR nieuws: twmsetfocus) wm_killfocus; informatie; en programma wmpaint (VAR nieuws: twmpaint); informatie, wm_paint; einde;, /worden door mijn amendementen, die alle onderdelen van de ///////tstatictext, tdatabrowseform = (platform), label1:tstatictext, ; label2:tstatictext;, particuliere, {} openbare, particuliere en openbare verklaringen {}, het einde... ;,,,, dat de procedure tstatictext... En Dr.Awfocusrect; var, de dc: HDC;,, dc: = GetDC (aan); , proberen, raam. Drawfocusrect (dc, rechthoekig (1, 1, width-1, hoogte - 1)); en, tot slot, , ReleaseDC (aan dc), einde;,; en, tot slot, de tstatictext; programma 's. Wmkillfocus (VAR nieuws: twmsetfocus); erfenis, begint, ; drawfocusrect;,, het einde van de procedure; tstatictext. Wmpaint (VAR nieuws: twmpaint); erfenis, begint, ; als de concentratie, zou drawfocusrect;,, het einde van de procedure; tstatictext wmsetfocus (var. De boodschap: twmsetfocus); erfenis, beginnen, drawfocusrect aan het einde van ;,,,,,
Het wijzigen van een vergadering zonder kinderen
Next Page:Uit de tobjectlist