چجوری میتونم تشخیص بدم رشته 1 حاوی رشته 2 هست یا نه؟

[azadeh_1510]

سلام دوستان
ببخشین من یک سوال دارم
چجوری میتونم تشخیص بدم که رشته 1؛ شامل رشته 2 هست یا نه؟
ممنون

[pop123]

شمارشته هاتون رو می ریزید داخل دوتا متغییر بعد بایک شرط چک میکنید که محتواشون برابرند یانه

[Felony]

var
S1, S2: String;
begin
S1:= 'This is a sample text';
S2:= 'a sample';
if Pos(S2, S1) <> 0 then
ShowMessage('S1 contain S2');
end;

[azadeh_1510]

از جوابتون خیلی ممنونم .کمک بزرگی بود.
منتها یک مشکلی که هست اینه که S1 یک رشته نیست بلکه یک Memo
هست که چون S1حداکثر تا 256 کاراکتر قبول میکنه نمیشه از نوع رشته در نظر گرفت.
چکار میتونم انجام بدهم؟

[Felony]

اون ShortString هست که محدودیت 255 کاراکتری داره ، String مدودیت نداره ، در هر صورت :
var
S2: String;
begin
S2:= 'a sample';
if Pos(S2, Memo1.Text) <> 0 then
ShowMessage('S1 contain S2');
end;

[azadeh_1510]

درست شد
خیلی ممنون و متشکرم