Delphi-Grundkurs Funktionen und Prozeduren

Praktische Dialoge - Meldungen

ShowMessage

Mit der ShowMessage-Funktion kann man Ausgaben in separaten Fenstern anzeigen lassen.

procedure TForm1.Button1Click(Sender: TObject);
		
var s: String;
		
begin
    	
  s:= 'Meldung';
    	
  ShowMessage(s+#13#10+'zweite Zeile');
		
end;

Man kann auch festlegen, an welcher Stelle des Bildschirms das Meldungsfenster erscheinen soll. Dazu benutzt man dei Funktion ShowMessagePos():

procedure TForm1.Button2Click(Sender: TObject);
		
var s: String;
		
begin
    	
  s:= 'Position';
   	 	
  ShowMessagePos(s+#13#10+'100,100',100,100);
    	
  ShowMessagePos(s+#13#10+'200,200',200,200);
    	
  ShowMessagePos(s+#13#10+'300,300',300,300);
    	
  ShowMessagePos(s+#13#10+'400,400',400,400);
		
end;

In der Namensleiste des Fensters erscheint der Projektname.

ShowMessage

Ich benutze Meldungsfenster gern während des Programmierens, um mir anzeigen zu lassen, ob eine Variable die von mit erwartete Größe auch wirklich enthält. Das Programm wird dann an dieser Stelle unterbrochen, bis ich auf OK geklickt babe. Wenn alles in Ordnung ist, kann ich den Befehl wieder löschen und an anderer Stelle neu einfügen, um dort das Programm zu überprüfen.