Solved

combining 2 applications together

Posted on 2004-04-02
2
147 Views
Last Modified: 2010-04-05
hi
application that generates buttons by itself and a application that

works a liitle bit diffrent but based on thesame thing but it doesn't generate buttons


thank you

more points will be aval....
0
Comment
Question by:zgeorge_2
  • 2
2 Comments
 
LVL 11

Accepted Solution

by:
shaneholmes earned 245 total points
ID: 10746010
Hi George,

How cam I help!

Shane
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10746175
George,

 You can see from the POS application I wrote for you, how to create an application which generates buttons at runtime.

1.) Declare a Object variable of type TButton

var
 MyButton: TButton

2.) You create a Button, on the owner

 MyButton:= TButton.Create(Panel1);

3.) set the objects parent

 MyButton.Parent:= Panel1;

4.) Set its position and size properties

 MyButton.Left:= 10;
 MyButton.Top:= 10;

 MyButton.Width:= 100;
 MyButton.Height:= 50;

5.) Set any other properties

 MyButton.Caption:= 'Click Me';

6.) Assign it an OnClick event

  MyButton.OnClick:= MyClick;


procedure TForm1.OnCLick(Sender: TObject);
begin
 ShowMessage('You clicked me!');
end;


Shane
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

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

Suggested Solutions

The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
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…

856 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