Smilies im Chat??

[Tobiax]

Hi Sko hab doch noch eine Frage wo soll ich den erken code einfügen

Code:

SucheSmiley(':)',0, Smileys);

und wo bekomm ich JvRichEdit her ???


Danke nochmal

PS: wo soll ich den einfügen

Code:

for i := 0 to 10 do 
  begin 
    SucheSmiley('*:-D*',0, MainForm.Smileys); 
    SucheSmiley('*;-)*',1, MainForm.Smileys); 
    SucheSmiley('*evil*',2, MainForm.Smileys); 
    SucheSmiley('*cry*',3, MainForm.Smileys); 
    SucheSmiley('*cool*',4, MainForm.Smileys); 
    SucheSmiley('*shock*',5, MainForm.Smileys); 
    SucheSmiley('*thumbup*',6, MainForm.Smileys); 
    SucheSmiley('*grübel*',7, MainForm.Smileys); 
    SucheSmiley('*angel*',8, MainForm.Smileys); 
    SucheSmiley('*idea*',10, MainForm.Smileys); 
    SucheSmiley('*->*',11, MainForm.Smileys); 
    SucheSmiley('*!*',12, MainForm.Smileys); 
    SucheSmiley('*?*',13, MainForm.Smileys); 
    SucheSmiley('*freak*',14, MainForm.Smileys); 
    SucheSmiley('*stupid*',15, MainForm.Smileys); 
    SucheSmiley('*:-S*',16, MainForm.Smileys); 
    SucheSmiley('*neutral*',17, MainForm.Smileys); 
    SucheSmiley('*wiejetz*',0, MainForm.Smileys_2); 
    SucheSmiley('*heuldoch*',1, MainForm.Smileys_2); 
    SucheSmiley('*tuichdoch*',2, MainForm.Smileys_2); 
  end;

mfg.Tobiax