Vergleich Basic DATA Datentyp

[Manfred12037]

Hallo,

ich muß ein kleines Programm in Delphi schreiben, das ein Interpolationspolynom berechnet. Jetzt habe ich ein ganz altes Buch gefunden, wo das Problem mit Basic programmiert wurde. Hier wurde der Datentyp DATA verwendet.Also in der Art: DATA:1,2,3,10,8,9,0.3,...usw. und dann Read....

Wie kann ich eine große Datenmenge im Delphiprogramm auf ähnliche Art eingeben? Ich könnte natürlich auch eine txt Datei erstellen u. diese in ein Array einlesen, aber wenn ich es direkt in Delphi eingebn will, ohne dass ich umständlich definieren muss wieviele Zahlen einzugeben sind (da die Menge der einzugebenden Daten immer verschieden ist)?

[mkinzler]

Sollte als Konstante möglich sein.

[Manfred12037]

und wie genau?

[mkinzler]

Delphi-Quellcode:

const
   Data: Array of Byte[] :=  (... );

[Manfred12037]

Danke----Habe es nun so probiert, u. funktioniert soweit:

procedure TForm1.Button1Click(Sender: TObject);
const
Digits: array[0..1] of Integer = (5,1);
var
a:integer;
begin
a:=Digits[0];
edit1.Text:=IntToStr(a);
end;


Aber ich muß bei Array immer genau die richtige Anzahl eingeben, zb bei 5 Elementen array[0..4]. D.H. ich muss jedesmal abzählen wieviele Daten einzugeben sind (hier z.B. 5). Basic ist zwar alt, aber in diesem speziellen Fall mit dem DATA u. Read Befehl komfortabler.
Aber vielleicht gibts doch noch etwas dies zu bewerkstelligen?

[Deep-Sea]

Zitat:

Zitat von Manfred12037

Aber ich muß bei Array immer genau die richtige Anzahl eingeben, zb bei 5 Elementen array[0..4]. D.H. ich muss jedesmal abzählen wieviele Daten einzugeben sind (hier z.B. 5). Basic ist zwar alt, aber in diesem speziellen Fall mit dem DATA u. Read Befehl komfortabler.
Aber vielleicht gibts doch noch etwas dies zu bewerkstelligen?

Var-Array mit SetLength auf die gewünschte Länge setzen?!

[Manfred12037]

Da muß ich aber weiterhin die Anzahl der einzugebenden Daten wissen?!

[Deep-Sea]

Jain. Wenn du einen Eintrag hinzufügen willst, kannst du das Array um eins vergrößern.
Ist es denn ein Problem, die anzahl zu kennen? Woher kommen die Daten?
(Oder hab ich was verpasst und du hast es bereits erwähnt?)

[Manfred12037]

Die Datenanzahl ist jedesmal anderst. Deshalb müßte ich jedesmal die Anzahl der einzugebenden Daten wissen....

[Deep-Sea]

Ya woher kommen denn die Daten? Und wo sollen sie hin? Schwenk doch mal für mich bitte etwas aus, damit ich nicht 100 einzelne Fragen stellen muss :-D ...