Du könntest z.B. eine PaintBox verwenden, in der du dann im OnPaint sowas machst:
Delphi-Quellcode:
Paintbox.OnPaint()
begin
if (Tomaten in Zutaten)
Canvas.Paintto({tomatenbitmap auf paintbox.canvas})
if (käse in Zutaten)
// Käse auf Paintbox.Canvas malen
end;
So ungefähr