Het wijzigen van een vergadering zonder kinderen

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  ;,,,,,

sample.gif



Previous:
Next Page: