45

If Memo1.Lines[2] = 'mojn' then Edit1.Text := 'Hej';

Læg mærke til at det er lines[2], da den første linie er nummer 0

:)

JustinCase

Er det ikke et 15 points spørgsmål :)

jeg skal lige teste

Jo bestemt.

Kan man få lidt af pointene, hvis jeg fortæller hvordan man gør, så den ikke tager højde for store og små bokstaver?

Hvis ja så kik nedenfor, hvis nej så må du ikke læse vidre:)
-------
(uses SysUtils)

If lowercase(Memo1.Lines[2]) = lowercase('mojn') then Edit1.Text := 'Hej';

Tjah, eller :

if pos(lowercase('mojn'),lowercase(Memo1.lines[2])) > 0 then Edit1.Text := 'Hej';

for bare at sikre sig at mojn eksisterer et eller andet sted i linien.

jenspoulsen >> Fordel bar pointene. :)

(Hvis det dog bare var _bar_ point ;))

<LOL>

Så skal der bare så mojn et eller andet sted på linien.. og så vil den også godkende hvis der står "kaMOJNin"?