• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 269
  • Last Modified:

Tlabel with 3D-Frame

How can I manage that my Tlabel has a 3D-Frame like TEdit ?

I tried to work with TEdit, but there were other problems :

TEdit und enabled=false does not work, because the text is no longer black.
TEDit and readonly=true does not work, because if you click on it, there appears a caret .
 
0
titz
Asked:
titz
  • 2
  • 2
1 Solution
 
dskowronCommented:
TEdit and ReadOnly:=true works. You can change the cursor property for the TEdit. I do it all the time. You can make a TEdit look and behave just like a TLabel.

DS
0
 
dskowronCommented:
Also, you could use a tiny panel to get your borders. There a lots of options for you .
0
 
titzAuthor Commented:
if I have a Tedit and readonly=true, then I can change the appearance of the cursor, - that's correct. But whatever shape the cursor has, if I click on it there is in the text a small caret shown. This I will avoid.

0
 
michaueCommented:
I have one of three things you can do :

1.  Use a normal TLabel with the color property set to white and then add around it a      TBevel (which you can find under the Additional tab) to give the 3D effect.
2.  Use a TPanel with the color property set to white and then change the BevelInner      property to bvNone, BevelOuter to bvRaised, BorderStyle to bsSingle with an      Alignment of taLeftJustify.  Then just change the size to be the same as the normal
     edit box.
3.  Use the TEdit with Readonly = True and in the OnEnter event set the focus to another      control on the form by using <controlname>.SetFocus.

Hope one of them works for you !

Have fun ...

Elfrieda :)
0
 
titzAuthor Commented:
Elfrieda, that is what i was looking for !
Thanks and i wish you a sunny day !
0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

  • 2
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now