Registriert seit: 13. Jan 2005
391 Beiträge
Delphi XE3 Professional
|
Visual Basic Array
20. Apr 2005, 21:08
Hallo,
kann man in VB analog zu Pascal konstante, vordefinierte Arrays angeben?
Also in etwa so:
Delphi-Quellcode:
RawData: array[0..97] of Byte = (
$4D, $5A, $50, $00, $02, $00, $00, $00, $04, $00, $0F, $00, $FF, $FF, $00,
$00, $B8, $00, $00, $00, $00, $00, $00, $00, $40, $00, $1A, $00, $00, $00,
$00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00,
$00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00,
$00, $01, $00, $00, $BA, $10, $00, $0E, $1F, $B4, $09, $CD, $21, $B8, $01,
$4C, $CD, $21, $90, $90, $54, $68, $69, $73, $20, $70, $72, $6F, $67, $72,
$61, $6D, $20, $6D, $75, $73, $74, $20
);
Ich brauch das für eine Export-Funktion die VB-Code erzeugen soll, bisher habe ich
Code:
RawData = Array( _
&H4D, &H5A, &H50, &H00, &H02, &H00, &H00, &H00, &H04, &H00, &H0F, &H00, &HFF, _
&HFF, &H00, &H00, &HB8, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H40, &H00, _
&H1A, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, _
&H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, _
&H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H00, &H01, &H00, &H00, &HBA, _
&H10, &H00, &H0E, &H1F, &HB4, &H09, &HCD, &H21, &HB8, &H01, &H4C, &HCD, &H21, _
&H90, &H90, &H54, &H68, &H69, &H73, &H20, &H70, &H72, &H6F, &H67, &H72, &H61, _
&H6D, &H20, &H6D, &H75, &H73, &H74, &H20 _
)
verwendet, aber VB motzt wenn man zuviele _ macht um die Zeilen fortzusetzen, wenn man große Reihungen definieren möchte.
|