Delphi Programming
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
User Name:
Password:
Remember me
Go Back   Dev Shed Forums > Programming Languages - More > Delphi Programming
Reload this Page

Some help, please.

Discuss Some help, please. in the Delphi Programming forum on Dev Shed.
Some help, please. Delphi Programming forum discussing Delphi related topics including Kylix, C++ Builder, and more. Delphi is a high-performance language, originally based on the PASCAL language.

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
« Previous Thread | Next Thread »  
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread Dev Shed Forums Sponsor:
  #1  
Old July 17th, 2004, 02:07 PM
Ruh Ruh is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Jul 2004
Posts: 113 Ruh User rank is Private First Class (20 - 50 Reputation Level)Ruh User rank is Private First Class (20 - 50 Reputation Level) 
Time spent in forums: 1 Day 7 h 53 m 33 sec
Reputation Power: 5
Send a message via MSN to Ruh
Some help, please.
Hi All. I am new at delphi programming and really need some help.
1) How to change the color of titlebar?
2)How to launch mail program or go to website while clicking on a label?
3) How to change the font name of mainmenu.items?

Any help is highly appreciated.

Anar
Reply With Quote
  #2  
Old July 19th, 2004, 03:47 PM
Lightnin Lightnin is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Jul 2004
Posts: 46 Lightnin User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 6
Thumbs up
Quote:
Originally Posted by Ruh
Hi All. I am new at delphi programming and really need some help.
1) How to change the color of titlebar?

2)How to launch mail program or go to website while clicking on a label?

3) How to change the font name of mainmenu.items?

Anar


1. not too sure, proly tweaking aroun with Win32 API.
2. http://delphi.about.com/library/weekly/aa082499.htm
3. not sure, probably through TActionManager. Never used it so cant say much about it.

Good luck!!
Reply With Quote
  #3  
Old July 19th, 2004, 04:12 PM
Scorpions4ever's Avatar
Scorpions4ever Scorpions4ever is offline
Banned ;)
Dev Shed God 7th Plane (8000 - 8499 posts)
  
Join Date: Nov 2001
Location: Glendale, Los Angeles County, California, USA
Posts: 8,100 Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level) 
Time spent in forums: 1 Month 1 Week 1 Day 8 h 54 m 48 sec
Reputation Power: 2059
1. You can change the system's idea of title bar color with code like this:
Code:
const
	MaxItems = 1;
var
	ItemList: array[1..MaxItems] of Integer;
	ColorList: array[1..MaxItems] of TColor;
begin
	ItemList[1] := COLOR_ACTIVECAPTION;
	ColorList[1] := ColorToRGB(clRed);
	SetSysColors(MaxItems, ItemList, ColorList);
end;

See SetSysColors in MSDN for more info on this API call. The trouble is that when you change this color, the title color for every window in the system gets changed. If you want just your window to have a different color, consider using a component from here.
http://www.torry.net/pages.php?id=95
2. Use this code on a label's component.
Code:
uses
    ....rest of files in uses section .... , ShellApi;
...
...
procedure TForm1.Label1DblClick(Sender: TObject);
begin
	ShellExecute(0, 'open', 'http://www.yahoo.com/', Nil, Nil, SW_SHOWNORMAL);
end;

procedure TForm1.Label2DblClick(Sender: TObject);
begin
	ShellExecute(0, 'open', 'mailto:me@somewhere.com', Nil, Nil, SW_SHOWNORMAL);
end;

3. See http://www.torry.net/pages.php?id=149
__________________
Up the Irons
What Would Jimi Do? Smash amps. Burn guitar. Take the groupies home.
"Death Before Dishonour, my Friends!!" - Bruce D ickinson, Iron Maiden Aug 20, 2005 @ OzzFest
Down with Sharon Osbourne
Puzzle of the Month solved by Keath and KevinADC, superior perl programmers of the month
Reply With Quote
  #4  
Old July 22nd, 2004, 12:20 AM
Ruh Ruh is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Jul 2004
Posts: 113 Ruh User rank is Private First Class (20 - 50 Reputation Level)Ruh User rank is Private First Class (20 - 50 Reputation Level) 
Time spent in forums: 1 Day 7 h 53 m 33 sec
Reputation Power: 5
Send a message via MSN to Ruh
Hi Lightnin' & Scorpions4ever,

Thanks for your respond, it really helped me a lot.

Just one thing still confuses me, what is the difference between ShellExecute(0, 'open',... and ShellExecute(handle, 'open',... ? Please make it clear for me.

Anar
Reply With Quote
  #5  
Old August 24th, 2004, 12:47 PM
Ruh Ruh is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Jul 2004
Posts: 113 Ruh User rank is Private First Class (20 - 50 Reputation Level)Ruh User rank is Private First Class (20 - 50 Reputation Level) 
Time spent in forums: 1 Day 7 h 53 m 33 sec
Reputation Power: 5
Send a message via MSN to Ruh
Here goes another question,

How to make Windows XP style ComboBox? Is there any component for this?
Reply With Quote
  #6  
Old August 24th, 2004, 05:29 PM
bom bom is offline
Registered User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Aug 2004
Posts: 2 bom User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 0
combobox xp style
try LMD-Tools a set of 100+ comp, great!!!
http://www.ceberus.com/lmd/

Hi
Reply With Quote
  #7  
Old August 26th, 2004, 10:23 AM
Ruh Ruh is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Jul 2004
Posts: 113 Ruh User rank is Private First Class (20 - 50 Reputation Level)Ruh User rank is Private First Class (20 - 50 Reputation Level) 
Time spent in forums: 1 Day 7 h 53 m 33 sec
Reputation Power: 5
Send a message via MSN to Ruh
Questions follow each other

How to assign all true type fonts into combobox?
Reply With Quote
  #8  
Old September 1st, 2004, 01:57 AM
Ruh Ruh is offline
Contributing User
Dev Shed Newbie (0 - 499 posts)
  
Join Date: Jul 2004
Posts: 113 Ruh User rank is Private First Class (20 - 50 Reputation Level)Ruh User rank is Private First Class (20 - 50 Reputation Level) 
Time spent in forums: 1 Day 7 h 53 m 33 sec
Reputation Power: 5
Send a message via MSN to Ruh
I tried LMD-tools, they are really cool, just u can't use compiled .exe file. It works only at IDE.

I found an answer to my question, used one RichEdit & 1 ComboBox, added ComboBox1.Items:= Screen.Fonts; to onFormCreate event, and RichEdit1.Font.Name:= ComboBox1.Text; on ComboBox onChange event, that works fine for me.

Now, I have 2 items at my combobox, English & Russian. How can I determine the selected item at combobox? For ex. on Button1Click, if the item English is selected then Begin....End, else Begin....End;
Reply With Quote
  #9  
Old September 1st, 2004, 01:12 PM
Scorpions4ever's Avatar
Scorpions4ever Scorpions4ever is offline
Banned ;)
Dev Shed God 7th Plane (8000 - 8499 posts)
  
Join Date: Nov 2001
Location: Glendale, Los Angeles County, California, USA
Posts: 8,100 Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level)Scorpions4ever User rank is General 16th Grade (Above 100000 Reputation Level) 
Time spent in forums: 1 Month 1 Week 1 Day 8 h 54 m 48 sec
Reputation Power: 2059
Check out the free combobox components on torry's site:
http://www.torry.net/pages.php?id=138
http://www.torry.net/pages.php?id=134

This is usually where I head to when I'm looking for components. Better still, quite a few of them are free and some even come with source code.

As for your specific problem, look into the ItemIndex property of the combo box.
Reply With Quote
Reply

Viewing: Dev Shed Forums > Programming Languages - More > Delphi Programming > Some help, please.

« Previous Thread | Next Thread »

Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Linear Mode Linear Mode
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump



 Free IT White Papers!
 
How to Present Effectively Online
This white paper offers practical and actionable advice on the key steps that any presenter should consider as they plan and execute a Webinar or online meeting.
 
Open Source Security Myths
Open Source Software (OSS) is computer software whose source code is available to the general public with relaxed or non-existent intellectual property restrictions (or arrangement such as the public domain), and is usually developed with the input of many contributors.
 
Power and Cooling Capacity Management for Data Centers
This paper describes the principles for achieving power and cooling capacity management.
 
Scalable, Fault-Tolerant NAS for Oracle - The Next Generation
For several years NAS has been evolving as a storage alternative for Oracle databases, and for good reason: NAS is quite often the simplest, most cost-effective storage approach for Oracle. Learn about the benefits that HP's approach to scalable NAS brings to Oracle environments in this comprehensive white paper.
 
Understanding Web Application Security Challenges
This white paper discusses many common threats and preventive measures for Web application security, and explains what you can do to help protect your organization.
 

Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2009 by Developer Shed. All rights reserved. DS Cluster 2 hosted by Hostway. 
Stay green...Green IT