Delphi6 problem 3

zhaozj2021-02-08  219

A very strange phenomenon, try the following code

1. Put a trichedit on Form

2. Put another TLabel

3. Put a TButton

4. Write the following code and execute in the ONLICK event of Button1

Procedure TFORM1.BUTTON1CLICK (Sender: TOBJECT);

Begin

Label1.parent: = richedit1;

Label1.top: = 20;

Label1.Left: = 20;

Richedit1.repaint;

END;

// rock

/ / Repost Please keep this information

转载请注明原文地址:https://www.9cbs.com/read-2792.html

New Post(0)