Einzelnen Beitrag anzeigen

Gabberjool

Registriert seit: 24. Jul 2006
Ort: schweiz
56 Beiträge
 
#37

Re: [SUCHE] Mentor/Meister /Leherer

  Alt 22. Mär 2009, 12:12
Perfect erklärt danke !! tönt sau logisch aber dan in der ausführung ^^
[edit] Wiso eig nur 1,2,3,4,5,6 oder 7 also geht das nur für die 7zahlen oder würde das halt einfach 1-9 wahr und 0 falsch

Bin gerade mal bei strings Variabeln Integern.. Habe Zwar "meinem mentor" geschriben aber will nimand aussenvor lassen...

sprich stimmt das....

Hallo,
Hab da mal so eine frage zu Variablen, Integer, Strings...
Nehmen wir mal das beispiel:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var zahl1, zahl2, summe : Integer;
begin
  zahl1 := StrToInt(edit1.text);
  zahl2 := StrToInt(edit2.text);
  summe := zahl1+zahl2;
  label1.caption := IntToStr(summe);
end;
Mir ist klar das ich die Variablen „zahl1, zahl2, summe“ für die berechnung brauche, doch verstehe ich das richtig das er durch „StrToInt“ nur den wert des sogenannten „edit1“ feld aussliest ?
Den ich sehe auch das er beim Label1 zwar auch nur den wert aussliest jedoch liest er da ja den wert aus von dem Variabel „summe“ gibt aber den rückgabewert „summe“ als String.

Damit ich das richtig verstehe ein beispiel wie ich nur vorgehen würde:
- 2x Button (Summe, Zsumme)
- 2x Edit felder
- 2x Label (Zsumme,Summe)


Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var check1, check2, Zsumme :Integer;
begin
   check1 := StrToInt(edit1.text);
   check2 := StrToInt(edit2.text);
   Zsumme := check1+check2;
  ZsummenLabel1.Caption := IntToStr(Zsumme);
end;
procedure TForm1.Button2Click(Sender: TObject);
var check1, check2, Zsumme, summe : Integer;
begin
   check1 := StrToInt(edit1.Text);
   check2 := StrToInt(edit2.Text);
   Zsumme := StrToInt(ZsummenLabel1.caption);
   summe := check1+check2+Zsumme;
  SummeLabel1.Caption := IntToStr(summe);
end;
Ist es besser die variabeln pro aufgabe nehme oder ist es besser Sie Global an zugebe ?
Besten dank schonmal hoffe ich versteh das richtig !
Liebe grüsse Wirth Ralf
  Mit Zitat antworten Zitat