Ergebnis der Suchanfrage

• Forum: Software-Projekte der Mitglieder

  AW: Programm "Waren"

   
    by HolgerX, 14. Jan 2017
  Hmm..
  
  OK, fangen wir an zu zerlegen ;)
  
  procedure TWaren.init;
  begin
  FillChar(FWarenbestand,sizeof(FWarenbestand),0);
  FillChar(FWarenverkauf,sizeof(FWarenVerkauf),0);
  FillChar(FaktBestand,sizeof(FaktBestand),0);
  FillChar(FStPreis,sizeof(FStPreis),0);