abend,
tja ich hab mir letztens den code von einem programm, das ich geschrieben hat, mal angeschaut und wollte den code n bisschen optimieren, bzw. das programm mal neu machen (strukturieren, etc...), da ich das programm für eine firma warten muss. so viel dazu.
jetzt hab ich mir überlegt, folgende prozedur umzuschreiben (in etwa)
procedure duawos(kind: Byte; wert1, wert2: Shortstring; wert3: Single; wert4: Word; ...);
indem ich für die ganzen variablenangaben
einen pointer verwende.
(die prozedur benutz je nach kind nur manche variablenwerte, da ich nicht 5 prozeduren mit gleichem zweck haben wollte
).
also hab ich jetzt definiert (wobei die typen typ1... für eine bereits definierte struktur stehen):
Delphi-Quellcode:
TDATA = record
typ1: ^TTyp1;
typ2: ^Typ2;
...
end;
jetzt wollte ich die prozedur so umformen:
procedure duawos(kind: Byte; data: TDATA);
und dann jedesmal, wenn die prozedur aufgerufen wird, nur die daten in der entsprechenden (durch kind bestimmt) übergeben - alle anderen pointer-teile werden auf nil gesetzt.
allerdings funktioniert das so nicht!
also: längste rede, kurzer sinn - ist es möglich, das so zu realisieren, wie ich es jetzt beschrieben habe, oder geht das nicht? (außerdem hab ich noch probleme beim zugreifen auf die jeweiligen pointer-"inhalte")
danke für infos,
heiopei