Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#16

Re: Wo höchstes Wachstum, wo geringstes?

  Alt 4. Sep 2003, 09:30
Nicht mal das hier schaffe ich:

Delphi-Quellcode:
  Tabelle : array of record
    Datum: TDate;
    Anzahl : double;
    Delta : Double

procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
  for i:=0 to ListBox1.Count-1 do
  begin
    Tabelle[i].Datum:=StrToDate(ListBox1.Items[i]); //Datum
    Tabelle[i].Anzahl:=StrToFloat(ListBox2.Items[i]); //Population
  end;
end;
  Mit Zitat antworten Zitat