TECHNOLOGIES
FORUMS
JOBS
BOOKS
EVENTS
INTERVIEWS
Live
MORE
LEARN
Training
CAREER
MEMBERS
VIDEOS
NEWS
BLOGS
Sign Up
Login
No unread comment.
View All Comments
No unread message.
View All Messages
No unread notification.
View All Notifications
Answers
Post
An Article
A Blog
A News
A Video
An EBook
An Interview Question
Ask Question
Forums
Monthly Leaders
Forum guidelines
Mike Jonson
NA
239
193.4k
Pascal and C#
Dec 6 2012 7:56 AM
Such a problem
To
program in
Pascal (PascalABC.NET)
plug-ins:
using System;
using System.Windows.Forms;
using System.Drawing;
public class AboutBox : Form
{
public String Author = "nfex";
public String AppName = "about dialog";
public String Version = "1.0";
public AboutBox()
{
InitDialog();
}
private void InitDialog()
{
this.ClientSize = new Size(250, 140);
this.Text = "About";
this.FormBorderStyle = FormBorderStyle.FixedDialog;
this.ControlBox = false;
this.MinimizeBox = false;
this.MaximizeBox = false;
Button wndClose = new Button();
wndClose.Text = "OK";
wndClose.Location = new Point(90, 100);
wndClose.Size = new Size(72, 24);
wndClose.Click += new EventHandler(About_OK);
Label wndAuthorLabel = new Label();
wndAuthorLabel.Text = "Author:";
wndAuthorLabel.Location = new Point(5, 5);
wndAuthorLabel.Size = new Size(72, 24);
Label wndAuthor = new Label();
wndAuthor.Text = Author;
wndAuthor.Location = new Point(80, 5);
wndAuthor.Size = new Size(80, 24);
Label wndProdNameLabel = new Label();
wndProdNameLabel.Text = "Product:";
wndProdNameLabel.Location = new Point(5, 30);
wndProdNameLabel.Size = new Size(72, 24);
Label wndProdName = new Label();
wndProdName.Text = AppName;
wndProdName.Location = new Point(80, 30);
wndProdName.Size = new Size(120, 24);
Label wndVersionLabel = new Label();
wndVersionLabel.Text = "Version:";
wndVersionLabel.Location = new Point(5, 55);
wndVersionLabel.Size = new Size(72, 24);
Label wndVersion = new Label();
wndVersion.Text = Version;
wndVersion.Location = new Point(80, 55);
wndVersion.Size = new Size(72, 24);
this.Controls.AddRange(new Control[] {
wndClose,
wndAuthorLabel,
wndProdNameLabel,
wndVersionLabel,
wndAuthor,
wndProdName,
wndVersion
});
this.StartPosition = FormStartPosition.CenterParent;
this.ShowDialog();
}
private void About_OK(Object source, EventArgs e)
{
Control wndCtrl = ((Button)source).Parent;
((Form)wndCtrl).Close();
}
public static void Main()
{
new AboutBox();
}
}
I click
"
Start Debugging,
wrote
: I can not
choose the right
parser
for file
'Aboutbox.cs'
Reply
Answers (
0
)
What is the difference between break and continue statement?
how to load the clicked audio file in to windows media player? using javascript for html page.