+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : تقطيع نص مدخل (/showthread.php?tid=2554)
تقطيع نص مدخل - شمس الغروب - 07-11-2010
السلام عليكم
كيف استطيع ان اقطع النص المدخل الى جمل بالاعتماد على النقطة التي تفصل بين جملة واخرى؟
تقطيع نص مدخل - hanipino - 07-11-2010
وعليكم السلام
استعمل الدالة
PHP كود :
Classes.ExtractStrings();
تقطيع نص مدخل - شمس الغروب - 07-11-2010
السلام عليكم
هل اضع هذا الكود في الbutton
تقطيع نص مدخل - format82 - 08-11-2010
هذا كود اخر
كود :
var
words: TStringList;
s: string;
i: integer;
begin
s:='Delphi.is.my.world.and.i.like.it';
words := TStringList.Create;
try
words.text := StringReplace(s,'.', #13#10, [rfReplaceAll]);
for i := 0 to pred(words.count) do
memo1.Lines.Add(words[i]);
finally
words.free;
end;تقطيع نص مدخل - شمس الغروب - 08-11-2010
شكرا جزيلا على هذا الكود الرائع ساجربه حالا
تقطيع نص مدخل - شمس الغروب - 08-11-2010
السلام
لقد جربته لكنه يعترض على
words.text := StringReplace(s,'.', #13#10, [rfReplaceAll]) بانه غير معرفة بحثت عن هذة الاداة لاضعها لكني لم استطيع معرفتها(StringReplace) لكي اضعها على الفورم علما اني قد وضعت button ,memo
ماهي العناصر التي اضعها على الفورم عند استخدام النهج اعلاه؟
ولماذا يعترض علىfor i := 0 to pred(words.count) do
تقطيع نص مدخل - format82 - 11-11-2010
قم بوضع Memo و Button في الفورم و اكتب الكود اعلاه في Button
تقطيع نص مدخل - شمس الغروب - 16-11-2010
شكرا لك على هذا الكود الجميل