Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Mysterio08,
21. Mär 2009
Also ich hab das jetzt mal versucht, schaffe es aber nicht. Folgendes habe ich geschrieben:
procedure TForm1.StringGridKeyPress(Sender: TObject; var Key: Char);
var
i: Byte;
begin
for i := 1 to Max do //Max = 12
begin
StringGrid.Cells := Chr(27) //Chr27 ist die ESC-Tase
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Mysterio08,
5. Mär 2009
Und wie genau kann ich das machen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Mysterio08,
5. Mär 2009
OMG, na klar, du hast Recht. Ich habe SetLength mit Length verwechselt.....
Aber ich habe noch eine andere Möglichkeit - eine wie ich finde eine viel einfachere - gefunden:
for i := 1 to 12 do
Gesamtumsatz := Gesamtumsatz + Umsatz
Nur eine Sache ist jetzt noch offen: In meinem StringGrid soll der Nutzer die Umsätze direkt eingeben - die Eigenschaft goEditing in den Options habe ich auf...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Mysterio08,
5. Mär 2009
Nur ich habe mich weder mit dynamischen Arrays beschäftigt, noch mit SetLength. Ich weiß nur, dass man damit Positionen von Strings herausfinden kann, aber das man das auch zum Rechnen nehmen kann, habe ich nicht gewusst.
Könntest du mir das vielleicht mal so posten, würde mich mal interessieren.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Mysterio08,
5. Mär 2009
Guten Tag,
folgende Situation:
Ich möchte, dass man in ein StringGrid Umsätze von einem ganzen Jahr eingeben kann (Januar, Februar...bis Dezember). Dafür habe ich folgende Zeilen geschrieben:
procedure TForm1.Button_BerechnenClick(Sender: TObject);
var
Umsatz: Array of Single;
begin
for i := 1 to 12 do
Umsatz := StrToFloat (StringGrid1.Cells);
end