TIP: Click on subject to list as thread! ANSI
echo: delphi
to: TONY DUNN
from: JEROEN PLUIMERS
date: 1997-07-08 22:47:00
subject: Values for colors

Hello Tony!
Thursday July 03 1997 23:35, Tony Dunn wrote to All:
 > [LabelFont]
 > LabelFontColor=clAqua
 > Label1.font.color := VeejoIni.ReadInteger('LabelFont', 'LabelFontColor',
 > clBlack);
Use a ReadString in stead of ReadInteger. Then from the Graphics unit, use 
the following functions:
function ColorToString(Color: TColor): string;
function StringToColor(S: string): TColor;
Jeroen - jp@dragons.nest.nl - [100013,1443]
--- GEcho 1.01+
---------------
* Origin: Unrecoverable Application Error, Dave - HAL 9000 (2:280/206.1)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.