Solved

combining 2 applications together

Posted on 2004-04-02
2
150 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
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 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

Introduction The parallel port is a very commonly known port, it was widely used to connect a printer to the PC, if you look at the back of your computer, for those who don't have newer computers, there will be a port with 25 pins and a small print…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
This is a high-level webinar that covers the history of enterprise open source database use. It addresses both the advantages companies see in using open source database technologies, as well as the fears and reservations they might have. In this…
In this video, viewers are given an introduction to using the Windows 10 Snipping Tool, how to quickly locate it when it's needed and also how make it always available with a single click of a mouse button, by pinning it to the Desktop Task Bar. Int…

690 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