9. Februar 2007 11:14
9. Februar 2007 11:43
9. Februar 2007 11:47
9. Februar 2007 11:53
9. Februar 2007 11:56
9. Februar 2007 14:29
NeueZeilenNr := 0;
IF CONFIRM('Sicher das Sie diesen Artikel aus der Zeile löschen möchten?',TRUE) THEN BEGIN
ModArtZeilen.RESET;
ModArtZeilen.SETFILTER(Shopname, Shopname);
ModArtZeilen.SETFILTER(Kategorie, Kategorie);
ModArtZeilen.SETFILTER(LineNo, '<>%1', LineNo);
IF ModArtZeilen.FIND('-') THEN
REPEAT
NeueZeilenNr := NeueZeilenNr + 1;
ModArtZeilen.Sortiernr := NeueZeilenNr;
ModArtZeilen.MODIFY();
UNTIL ModArtZeilen.NEXT = 0;
END ELSE BEGIN
ERROR('NICHTS GEÄNDERT');
END;
9. Februar 2007 14:30
9. Februar 2007 14:45
Natalie hat geschrieben:Nur aus Neugier: Was hat denn mit dem Shortcut nicht geklappt?