Ga naar inhoud

DELPHI - Hello World


Dark_Basics
 Delen

Aanbevolen berichten

Delphi Programming : HELLO WORLD

-----------------------------------------------

Programma’s : Delphi 7 Second Edition v7.2

Delphi maakt het mogelijk om GUI (Graphical User Interface) of Console (text-only) programma’s te maken samen met vele andere types. We verdiepen ons nu in het meer gewone, moderne, namelijk de GUI toepassing. Delphi doet veel werk voor ons, de programmeur moet enkel klikken, slepen, vergroten, verkleinen,….

Vanuit mijn opzicht is Delphi bijna parallel met VisualBasic 6.0. Nu gaan we onze eerste Delphi programma maken, namelijk een ‘Hello World’ met 2 outputs.

Label

StandardA.gif

Het menu scherm heeft een reeks van grafische items die we in ons form kunnen toevoegen. Deze zijn opgedeeld door middel van tabs, Standard, Additional, Win32, … Teken een ‘Button’ en een ‘Label’ op het form, dit wordt gedaan daar het object te selecteren in de takenbalk en vervolgens over het form te slepen.

Merkop dat het grafisch element zowel de tekst Label1 als aanpasbare hoeken heeft. De tekst in de label noemen we de Caption, dit verschijnt als we de applicatie laten runnen. Deze Caption noemen we ook wel een ‘Property’ of eigenschap van de knop. Het label geeft veel eigenschappen zoals bijvoorbeeld hoogte en breedte maar voor nu kijken we enkel naar de Caption. Eerst moeten we de Caption leegmaken dit doen we door de Object Inspector (View-menu).

LabelCaption.gif

Hetzelfde voor de ‘button’ waar we de Caption ook veranderen.

Ok nu gaan we beginnen coderen. Dubbelklik op de knop. U ziet dat er reeds 3 lijnen aanwezig zijn :

procedure TForm1.Button1Click(Sender: TObject); //Object For Inserting The Code
 begin // Begin Of Code

 end; // End Of Code

Nu voegen we de ‘Hello World’ toe aan de code :

procedure TForm1.Button1Click(Sender: TObject);
 begin
 Label1.Caption :='Hello World';
 end;

Merk op dat we een ; toevoegen aan elke lijn, alle Delphi code eindigt met dit symbool. Het laat ons toe om meerdere lijnen code te schrijven hierdoor vertellen we Delphi ook dat we een commando beëindigt hebben

We laden ons programma door op de 'playbutton' of op F9 te drukken.

label.jpg

Zoals je nu merkt verschijnt er ‘Hello World’ in de caption van het label. Goed gedaan, dit was je eerste toepassing…

MesssageBox

Nu gaan we opnieuw een ‘Hello World’ creëren maar met behulp van een messagebox.

De MessageDlg functie wordt gebruikt door de gebruiker om boodschappen weer te geven. Deze kunnen informatief, waarschuwingen, opmerkingen… zijn. Men heeft een hele vrijheid qua keuze van knoppen die men kan selecteren op de dialog. Bijvoorbeeld, de gebruiker kan een error boodschap zien en kan enkel abort, retry of cancel selecteren. (Meer info over deze functie zie Info)

procedure TForm1.Button1Click(Sender: TObject);
 begin
 MessageDlg('Hello World !!!',mtInformation, mbOKCancel, 0);
 end;

Wanneer we de code afspelen (F9) zal ere en popup venster verschijnen met de befaamde woorden ‘Hello World’

msgbox.jpg

Info

MessageDlg Function

aangepast door kape
Link naar reactie
Delen op andere sites


 Delen

×
×
  • Nieuwe aanmaken...