Ik bemerk een merkwaardig fenomeen, Ik heb een kleine database met een veld Category. Die wil ik laten aanpassen dmv een editbox op een ander tabblad (of juist iets anders kiezen uit een listview of handmatig wat anders er van maken)
Als ik de string (category) in een editbox wil aanpassen door een letter erachter te plaatsen dan verdubbeld de string zich(self). Na het toevoegen van 1 letter (" Boodschappend" ) verschijnt er "BoodschappendBoodschappend"
Als ik iets toevoeg middenin de string dan treed dit fenomeen niet op, ook niet als ik bv een letter weghaal aan het einde van de string.
Als de applicatie in windows draai dan doet zich dit niet voor.

om de editbox leeg te maken heb ik de onderstaande code gebruikt;

Code:
procedure TFormToDo.edtCategoryEnter(Sender: TObject);
begin
 if edtCategory.Text = 'vul hier een nieuwe categorie in of kies er 1 van hieronder' then
     begin
       edtCategory.Text := '';
     end;

end;

Heeft iemand een idee waarom dit optreed ?