Delphi_Tips Issue No# 66 - 27 December 2002

------------------------ Yahoo! Groups Sponsor ---------------------~-->
Get 128 Bit SSL Encryption!
http://us.click.yahoo.com/CBxunD/vN2EAA/xGHJAA/i7folB/TM
---------------------------------------------------------------------~->

*** DelphiCollection.Com ***
http://www.delphicollection.com

Tips For International Delphi Developers
You are receiving this newsletter because you have
requested to be in our Delphi Tips mailing list.

===========================================
Delphi_Tips Issue No# 66 - 27 December 2002
===========================================
===========================================
Special thanks to this weeks sponsor:  JFControls.

JFControls is a powerful integrated group of components
written  for Delphi and C++Builder.

Click here to learn more!
http://www.delphicollection.com/public/JFControls.htm
===========================================
===========================================

Hello all!

We hope the season has been good to you.


Every computer programmer should know about keeping
his or her PC System in good order, here are some
simple tips to help you with this task.


The Mouse

If you get mouse cursor jumping or you cannot
seem to get the mouse cursor to do exactly what
you want it to do, then you might have to clean
your mouse.

First you should remove the mouse ball from the
bottom of the mouse case, this can be done by
sliding or unscrewing a small plastic retaining cover.

With the mouse ball removed you can then use a
vacuum cleaner to suck out any loose dust etc.
The rollers inside the mouse can be cleaned with
a swab soaked in a cleaning fluid.
Sometimes you might have to scrape the rollers
gently if the dust build-up on them is hard to get off.

You should clean the mouse ball with a clean dry
lint-free, soft cloth, just give it a wipe, some
cleaning fluids can have a bad effect on the rubber
coating that is on many mouse balls.
Some PC companies recommend that you should buy a
new mouse every year.
You should also always use the mouse on a clean
surface, if you work in a dusty area you will
have to clean your mouse more often.
Make sure the mouse pad is cleaned often.

You should always consider having a very good
quality mouse, a good mouse can save you money
in the long run and is also helpful in the
prevention of  RSI/OOS.


The CRT Monitor

You can clean the monitor glass with a glass
cleaning fluid applied to a clean lint-free,
soft cloth, but you must make sure you
do not let any of the cleaning solution drip
(run) inside of the case.
The top of the monitor has vents, these should
be free of dust.

Never spray any fluid directly onto your monitor
or any other part of your computer system.

Never let people lean on your monitor.

Do not move a monitor around (move it from its
table etc) while it is turned on, turn the monitor
off first then wait a while for the monitor to
cool down.

A monitor should not be put near a window, because
the condensation could get inside the monitor
through the monitor vents.
Never put anything on top of the monitor, and
never cover the vents with a cloth, no matter
how nice it may look.

If you have to move your monitor try and place
it on a strong table, if it has to go onto the
floor (this is not recommended) then place the
monitor screen so it is facing a wall, this is
so no-one will accidentally kick the monitor screen
or bang it with a chair they are carrying or
something else that could break the screen.
Never place the monitor in a place where people
walk, that is asking for a broken monitor and
probably a broken leg for the person who trips
over the monitor.

Even if a computer monitor has been turned off
for a long period of time and unplugged, it may
still hold enough electricity to be deadly.
Electricity can still be stored in the large
electrolytic capacitors inside a monitor, this
is also the same for power supplies.
So only a qualified electrician should service
a computer monitor.



The links below cover many different areas of Delphi
programming and there may be a link that will
help you with your latest Delphi project.

Make sure you check out the
"Find Of The Week"!

Do you know a good computer/programming
joke? Send it in!

Hey, and don't forget to send your Delphi Tips to:
[email protected]

All the best from
Mr Delphi Tips
James M Sandbrook
[email protected]
The Delphi Collection
Sandbrook Software
===========================================
*************************************************
The Delphi Collection Private Web Site

The Delphi Collection Private Web Site includes:

Over 800 Delphi tips
Delphi tutorials
Tips, secrets and tricks
How to use the Delphi IDE, Code Editor and Form
Designer effectively
Lots of full source code examples links
Graphics - Images you can use in your applications.
Splash screen templates, button images etc.
Lots of Delphi/Programming FAQ links
A years free updates of tips and tutorials

Purchase today for the small investment of only 35$

Very affordable! Click Here To Order Now!
And get yourself the best Delphi tips around.
http://www.delphicollection.com/MainOrdPg.htm

Sincerely,
Mr Delphi Tips
James M Sandbrook
P.S. I'm sure that by now you can see that you won't
find these benefits anywhere else. Not at this price.
Your order is 100% secure!
http://www.delphicollection.com/MainOrdPg.htm
*************************************************
===========================================
Sandbrooks Download Land!
http://www.sandbrooksoftware.com/SDC/index.shtml
*************************************************
===========================================
Delphi Top Sites
http://www.sandbrooksoftware.com/TS/TS2/delphi.shtml
===========================================
**** Delphi Hot Tips ****

Loading Win.ini into a Memo:

procedure TForm1.Button1Click(Sender: TObject);
var WinName : String; WindowsDir : Array[0..Max_Path] of Char;
begin
  GetWindowsDirectory(WindowsDir, Max_Path);
  WinName := StrPas(WindowsDir);
  Memo1.Lines.LoadFromFile(WinName + '\win.ini');
  Label1.Caption := WinName + '\win.ini';
end;
===
ColorToRGB:
[function ColorToRGB(Color: TColor): Longint;]

Unit Graphics - Graphics Utilities

The ColorToRGB function is used to convert a
TColor into a RGB representation of that color.

Example:

procedure TForm1.Button1Click(Sender: TObject);
var B : LongInt;
begin
  B := ColorToRGB(Form1.Color);
  Panel1.Color := B;
end;
===========================================
Tracy and Rachel's Delphi Tips
http://www.specialady.com/TandR/index.html
===========================================
*************************************************
Info Marketing Information:
By Jim Edwards and David Garfinkel
Let's Get One Thing Straight About Being A
Published Author.
Crying For Help Online.
12 Steps to Creating a Business Online.
The Ten Web Page "Commandments".
Simple Survey Leads To Big Profits Online.

http://www.specialady.com/Edwards/index.shtml
*************************************************
===========================================
**** Delphi Hot Tips ****

Using a TFontDialog to change the forms font:

procedure TForm1.Button2Click(Sender: TObject);
begin
  Canvas.TextOut(10, 10, 'Here!');{Current forms font}
  if FontDialog1.Execute then
   Canvas.Font.Assign(FontDialog1.Font);
  Canvas.TextOut(100, 100, 'Here!');{New form font}
end;
===
Try this code to close all Forms except
the Main Form:

procedure TForm1.Button1Click(Sender: TObject);
var I : Integer;
begin
  for I := 0 to Application.ComponentCount - 1 do
   begin
     if Application.Components[I] is TForm then
      begin
        if Application.Components[I] <> Application.MainForm then
        begin
          TForm(Application.Components[I]).Close;
        end;
      end;
   end;
end;
*************************************************
===========================================
SUIPack for Delphi Developers!

Do you want to make your application have MacOS
or WinXP or more COOL themes (Skins)?
Do you want to create a non-rectangular window bases
on a bitmap?
Now you can do it without writing a single line of code!
SUIPack is a suite of enhanced GUI components
for Delphi/BCB to help you to create applications with
cool themes.
Compatible with: Delphi 5/6/7, C++Builder 5/6.

http://www.delphicollection.com/public/SUIPack.htm
===========================================
Open Source Delphi Projects
http://www.delphicollection.com/public/Articles/OpenSource.shtml
===========================================
Creating Custom Components Courseware
http://www.delphicollection.com/Public/GLCC/Intro.htm
===========================================
News:

The WPTools 4 Demos for Delphi (5/6/7),
BCB5 and BCB6 have been updated.

SUIPack - The lastest version : 3.30, update.

"Word Of The Day" Dictionary.

20% discount on all EurekaLog products, as Christmas gift.
Offer lasts until 06 January - 2003.

Judge probes sides in Sun case against Microsoft.

http://www.delphicollection.com/public/Articles/DNews.shtml
===========================================
Commercial Delphi Components/Libraries
http://www.delphicollection.com/public/ComVCL/index.shtml
===========================================
Find Of The Week!

Remember all those great sun and
fun songs from The Beach Boys!

Beach Boys Britain home page
http://www.angelfire.com/la/Beachboysbritain/

The Beach Boys Fan Club
http://www.beachboysfanclub.com/

Founder Brian Wilsons web site
http://www.brianwilson.com/

The Carl Wilson Foundation
http://www.carlwilsonfoundation.org/

===========================================
Joke Of The Week!

A man walks into a pet store in Silicon Valley
he was hoping to buy a monkey.
The store owner points towards 3 monkeys which
all looked the same each one lived in
politically-correct, animal friendly natural
mini-habitats.

After the man asked the pet shop owner about
the monkeys the pet shop owner said "The one on
the left cost $500".

"Why so much?" asks the customer.

"Because this monkey can program in Turbo Pascal."

Impressed the customer asks about the second monkey.

"That one costs $1500 because it knows how to use
Delphi and Object Pascal and even OOP."

The amazed customer then asks about the last monkey.

The pet store owner explains "That one costs $3000."

The stunned customer asks why?

The pet shop owner said "To be honest, I have never seen
it do anything, but it calls itself a consultant."
===========================================
Home Tip

When cutting diseased tree, shrub and plant
branches and flowers do not put them in your
compost bin.
If you do put diseased foliage in your compost
all your compost soil will become infected
with the disease.
===========================================
If you have a Delphi tip that you would like to
see here, please email
[email protected]
with the tip.
===========================================
May the road rise to meet you,
May the wind be always at your back,
May the sun shine warm upon your face,
May the rain fall soft upon your fields,
And until we meet again,
May God hold you in the palm of His hand.
-- Irish Blessing
===========================================
If you know a Delphi developer who you think will find these
Delphi tips useful, then do them a favour, let them know about
this mailing list.

Thank you!

Mr Delphi Tips!
Bringing you Delphi tips from all around the world!
The Delphi Collection Web Site.
http://www.delphicollection.com/public/index.shtml
===========================================
Advertising Information:
For information on advertising in the Delphi_Tips Issues and
the Delphi Collection web site please send an email to:
[email protected]
===========================================
Note: This email is never sent unsolicited.

You are receiving this email because you signed up for
free "Delphi_Tips" from The Delphi Collection.

If you do not wish to receive email from us please
follow the simple removal instructions below.

Subscribe:  [email protected]
Unsubscribe:  [email protected]

Other
List owner:  [email protected]

Our Chat
http://groups.yahoo.com/group/delphi_tips/chat
Our Links Page
http://groups.yahoo.com/group/delphi_tips/links
Our Polls Page
http://groups.yahoo.com/group/delphi_tips/polls
===========================================
© copyright Sandbrook Software 1998 - 2002.




To Unsubscribe, send a blank message to: [email protected]
 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/