ما هي طريقة حدف النص والإحتفاظ بالرقم فقط من مكون Memo

[Agmcz]

هذا مثال

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; 


سبق وطرح نفس سؤال ابحث في المنتدى دائما
بالتوفيق