7. Februar 2014 14:48
Firmendaten.GET;
Firmendaten.CALCFIELDS(Bild);
X[1] := 249;
Y[1] := 231;
Bildbox - Firmendaten.Bild
7. Februar 2014 14:56
7. Februar 2014 15:00
7. Februar 2014 15:25
if type=[sales line.]type::item then begin
if item.get("no.") then
calcfields(item.picture)
else
clear(item);
end;
7. Februar 2014 16:57
IF Verkaufszeile.Art=[??sales line.??] Verkaufszeile.Art::Artikel THEN BEGIN
IF Artikeldaten.GET(Verkaufszeile."Nr.") THEN
CALCFIELDS(Artikeldaten.Bild);
ELSE
clear(Artikeldaten);
END;
7. Februar 2014 17:06
IF Verkaufszeile.Art = Verkaufszeile.Art::Artikel THEN BEGIN
IF Artikeldaten.GET(Verkaufszeile."Nr.") THEN
CALCFIELDS(Artikeldaten.Bild);
ELSE
clear(Artikeldaten);
END;
IF Art = Art::Artikel THEN BEGIN
IF Artikeldaten.GET("Nr.") THEN
CALCFIELDS(Artikeldaten.Bild);
ELSE
clear(Artikeldaten);
END;
7. Februar 2014 17:27
7. Februar 2014 17:30
7. Februar 2014 17:39
ArtikelDaten.Calcfields(Bild);
7. Februar 2014 18:36
IF Verkaufszeile.Art = Verkaufszeile.Art::Artikel THEN BEGIN
IF Artikeldaten.GET(Verkaufszeile."Nr.") THEN
Artikeldaten.CALCFIELDS(Bild)
ELSE
CLEAR(Artikeldaten);
END;