Laß mich raten,
die Methode mit dem const solltest Du dir zu allererst schenken, besser ist ne Schnittstelle;
Delphi-Quellcode:
procedure InsertSmileyInLB(PartStr: string; smfn: string);
begin
end;
Das hat den Vorteil, das Du beliebig viele smileys einbauen kannst. Aber der Fehler dürfte wohl schlich an der Berechnung des Startpunktes liegen. Das sieht mir irgendwie so aus, als ob der den neuen Smiley auf der selben Zeile zeichnet. Das die übereinander geraten ist wohl eher Zufall.
felice navidad
Es gibt keinen schöneren Tag als den heutigen. Der gestrige ist vorbei und von den kommenden weiß man nicht was sie bringen.