Excel erzeigen mit SwissDelphiCenter code geht nicht

[Sir Rufo]

Zitat von Bummi:

einfach mal VAR statt Const d'rüberschreiben ?

Das geht nicht

Delphi-Quellcode:

procedure TfrmMain.FormCreate(Sender: TObject);
var Test: array[0..1] of Byte = ($08, $FF); // hier meckert der Compiler
begin
**Test[0] := 10;
end;

[Bummi]

ich bezog mich auf den Originalcode

Delphi-Quellcode:

const
  CXlsBof: array[0..5] of Word = ($809, 8, 00, $10, 0, 0);
  CXlsEof: array[0..1] of Word = ($0A, 00);
  CXlsLabel: array[0..5] of Word = ($204, 0, 0, 0, 0, 0);
  CXlsNumber: array[0..4] of Word = ($203, 14, 0, 0, 0);
  CXlsRk: array[0..4] of Word = ($27E, 10, 0, 0, 0);

hier sind es keine lokalen Variablen/Konstanten


das hier läuft ..

Delphi-Quellcode:

var Test: array[0..1] of Byte = ($08, $FF);

procedure TForm2.FormCreate(Sender: TObject);
begin
  Test[0] := 10;
end;

[himitsu]

siehe Bummi ... der macht es richtig.

Delphi-Quellcode:

procedure TfrmMain.FormCreate(Sender: TObject);
const Test: array[0..1] of Byte = ($08, $FF);
begin
  Test[0] := 10;
end;

Test ist, wenn die zuweisbaren Konstanten aktiviert sind, eine kranke und unübersichtliche Version von globalen Variablen.

Const in Var zu ändern bringt da nichts, da dieses dann nur eine "lokale" Variable ergäbe.

Typisierte Konstanten sind halt "nur" schreibgeschützte Variablen ... "sinnloser" Weise


Was ist erzeigen?

[himitsu]

Leute ab D2009 (wegen Generics) können ja gerne mal dieses ausprobieren.
Wie man es nutzt, sollte hoffentlich ersichtlich sein.

Wenn es läuft, dann läßt sich bestimmt auch noch eine Version ohne die bösen Generics erstellen.


noch vollkommen ungetestet ... ich hof' ich hab alles richtig übersetzt und richtig neu zusammengesetzt

[UliTs]

Zitat von himitsu:

Leute ab D2009 (wegen Generics) können ja gerne mal dieses ausprobieren.
Wie man es nutzt, sollte hoffentlich ersichtlich sein.

Wenn es läuft, dann läßt sich bestimmt auch noch eine Version ohne die bösen Generics erstellen.


noch vollkommen ungetestet ... ich hof' ich hab alles richtig übersetzt und richtig neu zusammengesetzt

Hallo @himitsu, ich hatte Dir eine PN geschickt. Ist sie angekommen?
Viele Grüße Uli

[DaCoda]

Hallo,
vielleicht nützt Euch das ja auch was ??? (Siehe Anhang)

[UliTs]

Zitat von DaCoda:

Hallo,
vielleicht nützt Euch das ja auch was ??? (Siehe Anhang)

Danke. Wenn ich das richtig sehe, funktioniert das aber nur, wenn auch Excel auf dem Rechner installiert ist, oder?