Solved

TOutline component

Posted on 1998-09-11
8
618 Views
Last Modified: 2008-02-20
I think this should be an easy one; I need a TOutline component where the elements can have different colors and/or fonts.
I've seen one once, but I deleted it, and I can't seem to loctate it again.

It MUST run on windows 3.1 (Delphi 1).

/Pede

0
Comment
Question by:pede
  • 5
  • 3
8 Comments
 
LVL 8

Expert Comment

by:ZifNab
ID: 1339372
Hi pede,

 this one? (has corrected owner draw event)

 http://sunsite.icm.edu.pl/delphi/ftp/d10free/outlinep.zip

regards, Zif.
0
 
LVL 1

Author Comment

by:pede
ID: 1339373
Sort of. You mean I should ownerdraw the text?

/Pede

0
 
LVL 8

Expert Comment

by:ZifNab
ID: 1339374
Yep, why not?
0
Windows Server 2016: All you need to know

Learn about Hyper-V features that increase functionality and usability of Microsoft Windows Server 2016. Also, throughout this eBook, you’ll find some basic PowerShell examples that will help you leverage the scripts in your environments!

 
LVL 1

Author Comment

by:pede
ID: 1339375
OK, I will draw the text myself, but I dont really know how to start on this. Do you have a small example of a 'OnDrawItem'-procedure? I tried this line -  (Control as TOutline).Canvas.TextRect(Rect, 0,0, 'Test'); - and I expected that 'Test' would be drawn for every item in the tree, but I only got it once (in the top-left corner of the tree-canvas). And what about the lines connecting the items, and the bitmaps? They are all gone.

/Pede
 
0
 
LVL 1

Author Comment

by:pede
ID: 1339376
Is the above the old bug of the TOutline? Maybe my project is still using the old one. I have now removed outline.dcu from /lib and I can still compile without errors. Are the lines (the connecting ones) supposed to be drawn by the control?

/Pede

0
 
LVL 1

Author Comment

by:pede
ID: 1339377
OK, its all working now. Zifnab, please propose an answer so you can get your points ;)

/Pede

0
 
LVL 8

Accepted Solution

by:
ZifNab earned 50 total points
ID: 1339378
Pede,

 I'm just on vacation now, just checking all these q'ns. I see I´ve to answer this one... are you sure? Everything Ok? If not, just say what's wrong, and when I'm back... I´ll try to help you further...

Zif.
0
 
LVL 1

Author Comment

by:pede
ID: 1339379
I've got it all working now. Thank you for your help.

/Pede

0

Featured Post

Netscaler Common Configuration How To guides

If you use NetScaler you will want to see these guides. The NetScaler How To Guides show administrators how to get NetScaler up and configured by providing instructions for common scenarios and some not so common ones.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
This Micro Tutorial will teach you how to censor certain areas of your screen. The example in this video will show a little boy's face being blurred. This will be demonstrated using Adobe Premiere Pro CS6.
Nobody understands Phishing better than an anti-spam company. That’s why we are providing Phishing Awareness Training to our customers. According to a report by Verizon, only 3% of targeted users report malicious emails to management. With compan…

777 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question