19. Mai 2011 12:36
19. Mai 2011 12:42
19. Mai 2011 13:19
Buchstabe:='ABCDEFGHIJKLMNOPQRSTUVWXYZ';
FOR j:=1 TO STRLEN(Buchstabe) DO
FOR i:=1 TO 49 DO
LagerplatzText:='1-'+FORMAT(Buchstabe[j])+'-01-'+FORMAT(i);
19. Mai 2011 13:21
19. Mai 2011 13:24
19. Mai 2011 13:25
FOR c:='A' TO 'Z' DO
19. Mai 2011 15:07