+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : ما هي طريقة حدف النص والإحتفاظ بالرقم فقط من مكون Memo (/showthread.php?tid=5799)
ما هي طريقة حدف النص والإحتفاظ بالرقم فقط من مكون Memo - sky19 - 18-12-2013
السلام عليكم
ما هي طريقة حدف النص والإحتفاظ بالرقم فقط (القيمة 6230.00)
من Memo1
+CUSD: 0,"Votre credit est de: 6230.00 ",15
ما هي طريقة حدف النص والإحتفاظ بالرقم فقط من مكون Memo - الياس الدويرة - 19-12-2013
ابحث عن قيمة نصية ثابتة تأتي بعد الارقام او قبلها ثم ابحث عن هذه القيمة وبعد ان تعطيك دالة البحث الموقع *الاوفسيت * قم با النسخ على متغير نصي اخر .
ما هي طريقة حدف النص والإحتفاظ بالرقم فقط من مكون Memo - sky19 - 19-12-2013
دالة البحث
ما هي طريقة حدف النص والإحتفاظ بالرقم فقط من مكون Memo - Agmcz - 19-12-2013
هذا مثال
PHP كود :
procedure TForm1.Button1Click(Sender: TObject);
var
S: string;
B, E: Integer;
begin
S := 'CUSD: 0,"Votre credit est de: 6230.00 ",15';
B := Pos('de: ', S) + Length('de: ');
E := Pos(' ",', S);
ShowMessage(Copy(S, B, E - B));
end;
بالتوفيق