当我得到它时,我通常会忽略这个错误并修复导致它的语法错误,但出于好奇,tLABEL在意外的tLABEL中究竟是什么意思?
我试过寻找答案,但只是让很多人试图帮助他们解决错误.
我也发现了这个定义:
tlabel是一个非窗口的VCL控件,它在窗体上显示不可编辑的文本.它在StdCtrls.pas单元中定义.
但我不认为这是一个非常容易理解的定义.
自从将应用程序从XE移植到XE2后,我注意到一个奇怪的错误,只需在ide中打开表单或运行应用程序,屏幕左上角(表单外)就会绘制一个白色方框,远离鼠标或窗户.我将其跟踪到TLabel,只需在表单上删除一个并将Glowsize设置为0就会导致问题.
我重新安装并更新到最后的XE2 update3,问题仍然存在.有人知道发生了什么事吗?



下面显示了字体设置为Arial Regular 16的默认TLabel的简单演示.

单击按钮时的代码是:
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Font.Style := Label1.Font.Style + [fsItalic];
end;
Run Code Online (Sandbox Code Playgroud)
单击该按钮时,最后一个字符将被截断,即:

默认情况下,TLAbel.AutoSize是真的所以这应该没问题吧?这是在XE和Delphi 7中是一样的.这是一个错误吗?
如何使TLabel在Delphi中表现得像超链接?
注意:由于向后兼容性问题,我对使用TLinkLabel不感兴趣.
我正在使用 Delphi7,我正在尝试实现一个 LinkLabel,就像您可以在 Windows Vista 及更高版本的控制面板下找到的那样。
在悬停时更改光标/颜色非常简单,我唯一需要做的就是让 TLabel 接收制表位并在其周围绘制一个焦点矩形。
关于如何做到这一点的任何想法?我知道 TLabel 由于其性质而不会接收标签。还有 TStaticText 可以接收选项卡,但它也没有焦点矩形。
如何在Delphi XE8 firemonkey多设备项目中将TLabel设置为Bold并恢复到正常运行时?
我试过这个,但它不起作用:
label.TextSettings.Font.Style := [TFontStyle.fsBold];
Run Code Online (Sandbox Code Playgroud)
还尝试过:
label.Font.Style := [TFontStyle.fsBold];
Run Code Online (Sandbox Code Playgroud) 我创建了一个TLabel,并向其中动态添加了文本,并且效果很好。但是我需要知道标签是否用文字包裹了文字,因为它对于标签的宽度而言太大,或者是否不需要包装,因为文字比标签的宽度短。
我并不是要知道标签的WordWrap属性设置为true还是false,我想知道它是否包装了文本。
在TLabel有AutoSize和WordWrap属性设置为true,如果该事项。
我正在Delphi XE2中开发一个应用程序,它通过EnumWindows和EnumChildWindows函数检查一个运行应用程序的窗口,该窗口也是用Delphi编写的.
这是主要代码(改编自一个例子:http://www.swissdelphicenter.ch/torry/showcode.php?id = 410)
function EnumChildWindowsProc(Wnd: HWnd; Form: TForm1): Bool; export;
{$ifdef Win32} stdcall; {$endif}
var
Buffer: array[0..99] of Char;
begin
GetWindowText(Wnd, Buffer, 100);
if StrPas(Buffer) = '' then Buffer := 'Empty';
new(AWindows);
with AWindows^ do
begin
WindowHandle := Wnd;
WindowText := StrPas(Buffer);
end;
CNode := Form1.TreeView1.Items.AddChildObject(PNode,
AWindows^.WindowText + ':' +
IntToHex(AWindows^.WindowHandle, 8), AWindows);
if GetWindow(Wnd, GW_CHILD) = 0 then
begin
PNode := CNode;
Enumchildwindows(Wnd, @EnumChildWindowsProc, 0);
end;
Result := True;
end;
function EnumWindowsProc(Wnd: HWnd; …Run Code Online (Sandbox Code Playgroud) 我在delphi表单上有一个TPanel,当我按下一个按钮并将它们放在其他面板中时,我想复制所有与这个TPanel同属的TLabel.有没有办法做到这一点?谢谢.
tlabel ×9
delphi ×8
delphi-xe2 ×2
fonts ×2
autosize ×1
custom-draw ×1
delphi-7 ×1
delphi-xe8 ×1
firemonkey ×1
hyperlink ×1
italic ×1
linklabel ×1
parent ×1
ruby ×1
spy++ ×1
tcombobox ×1
tpanel ×1
word-wrap ×1