also ich habe in memo1.text zum Beispiel "Foto" als Text stehen (immer nur ein wort)
nun wollte ich wenn das wort "Foto" da steht ein Bild zu Foto laden
also
Code: Alles auswählen
procedure TForm1.InfoImage;
begin
if memo1.text ,'Foto' then
image8.Picture.LoadFromFile(GetUserdir + 'Foto.png');
end;
macht er aber nicht..
dann kann es auch sein das da in dem Memo1.Text Feld nicht "Foto" steht sondern "Bild" dann soll er das Bild.png laden
Code: Alles auswählen
procedure TForm1.InfoImage;
begin
if memo1.text ,'Foto' then
image8.Picture.LoadFromFile(GetUserdir + 'Foto.png');
if memo1.text ,'Bild' then
image8.Picture.LoadFromFile(GetUserdir + 'Bild.png');
end;
end;
hat da irgendjemand einen link zu einem Wiki Betrag dazu oder wie kann ich das am besten machen
danke