Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Excel erzeigen mit SwissDelphiCenter code geht nicht
1. Dez 2011, 21:14
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;
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|
|
Zitat
|