Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  Mir brauchst du das nicht zu sagen, aber erkläre mal dem Threadersteller, was das ist ;)
  
  Überhaupt würde ich den Taschenrechner eher so wie du programmieren, als so wie der Threadersteller, aber ich bin da flexibel ;)
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  Du machst ein if LabelX.Caption = '+' then
  LabelY.Caption := Strtoint(inttostr(...) + ...);
  else if LabelX.Caption = '-'
  ...
  else if ...;)
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  :wiejetzt:
  
  Ich dachte bis jetzt du wolltest das so machen, dass
  
  - Erst Zahlen eingegeben werden können
  
  - Dann + oder - etc. gedrückt wird
  
  - Daraufhin Zahlen in einem anderen Label eingegeben werden
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  Ausserdem hast du meinen Rat nicht richtig umgesetzt. Ich habe gesagt, du sollt
  
  1. in deinen zig Methoden stattprocedure TForm1.Button7Click(Sender: TObject);
  begin
  Form1.Label1.Caption:= Form1.Label1.Caption + '7';
  end;
  eifach das schreiben:CurrentLabel.Caption:= CurrentLabel.Caption + '7';
  
  Und dasCurrentLabel:=Label5;
  CurrentLabel.Caption:= Form1.Label1.Caption;
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  Has tdu dir üerhaupt meine beiden Beiträge genau durchgelesen ?
  
  Diese if-Kontruktion kann gar nicht funktionieren ...
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  Ach. Eine Fehlermeldung ? Was steht denn drin ?
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  begin
  if (Form1.Label5.Caption= ' ') then
  begin
  Form1.Label5.Caption:= '*blubb*';
  end
  else
  begin
  Form1.Label5.Caption:= ' ';
  end;
  end; // <<< Semikolon fehlte
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  Also, nochmal in Ausführlich:
  
  - Du machst eine globale Variable vom Typ TLabel var
  Form1: TForm1;
  CurrentLabel: TLabel;
  
  Dann ersetzt du in den gazen Prozeduren Label1 durch CurrentLabel also z.B.:procedure TForm1.Button4Click(Sender: TObject);
  begin
  CurrentLabel.Caption:= CurrentLabel.Caption + '4';
  end;
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  Dass sollte aber gewünscht sein - wenn du im Taschenrechner 1 und danach 2 drückst sollte ja auch 12 erscheinen und nicht 3 ;)
• Forum: Sonstige Fragen zu Delphi

  Re: if...then...else

   
    by jfheins, 22. Mai 2006
  Ich würde dir Empfehlen:
  
  Mach eine globale Variable (oder ein private-Member der Form) CurrentLabel vom Typ TLabel.
  
  Im FormCreate dann ein CurrentLabel := Label1;
  
  Alle Eingaben gehen jetzt ins Label 1
  
  In den ButtonXClicks machst du dann: CurrentLabel.Caption := CurrentLabel.Caption + '2';