Delphi Hälfte eines Strings ausgeben

Thema durchsuchen

Ansicht

Themen-Optionen

Hälfte eines Strings ausgeben

Ein Thema von c0mpl3t3 · begonnen am 20. Sep 2009 · letzter Beitrag vom 21. Sep 2009

Vorheriger Beitrag

Nächster Beitrag

sx2008

Registriert seit: 15. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge

Delphi 2007 Professional

Re: Hälfte eines Strings ausgeben

20. Sep 2009, 23:58

Zitat von c0mpl3t3:

ich bin ein ziemlicher Delphi Neuling, wir haben gerade in Informatik damit begonnen.

Ok, Lektion #1:
Globale Variablen sind böse!!!
Vermeide globale Variablen wann immer möglich.

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TProzeduren.halbieren_buttonClick(Sender: TObject);

var // das sind LOKALE Variablen

  text1, text2 : string;

  laenge1 :double;

begin

    text1:=text1_edit.Text;

    text2:=text2_edit.Text;

    laenge1:=Length(text1);

    if odd(laenge1)= true then

.....

end;