Variablenwert Bestandteil einer Menge ? wie Zeitkritisch ???

[richard_boderich]

jungens, hilfe, nicht alles auf einmal, das ist zuviel fuer mich

also ich komme ueberhaupt nich mehr mit, deswegen erklare ich jetz nochmal was ich machen, will.
ich glaube ihr versteht mich falsch, das ganze ist eigentlich sehr einfach

also, ich hab ein array of byte, dort stehen dezimale bytewerte drin,
diese stelle ich in der procedure ausgabe in einem stringrid dar mit ner for next und stringgrid.cells [x,y]:=char("arraywert");

if x in charset[i] then stringgrid.cells [x,y]:=char("arraywert"); da ich aber verschiedene formate bei der darstellung will, z.b Bigendien, ascii 7-bit oder macintosh
muss ich verschieden charsets haben, diese brauchen nur einmal definiert werden und sollen nicht geaendert werden

z.b in formcreate:

Delphi-Quellcode:

var
charset1,charset2,charset3: set of byte;

...

begin
charset1:=[46..255]; //sets initialisieren
charset2:=[21..200];
charset3:=[0..12];

jetz hab ich ein menu mit verschiedenen menupunkten

die routinen sehen so aus

Delphi-Quellcode:

tform1.menupunkt1.click
begin
   
   i:=0;   // charset 0 setzen
   ausgabe // stringgrid mit geaenderten zeichsatz fuellen

end;

tform1.menupunkt2.click
begin
   
   i:=1;   // charset 1 setzen
   ausgabe // stringgrid mit geaenderten zeichsatz fuellen

end;

will also nur das ensprechen charsetz auswaehlen, und rufe dann die procedure ausgabe nochmal auf um den gridinhalt zu aktualisieren