بما انه غير منطقي هل يوجد كود بدييل 
![[صورة: 489cb7eb18171.png]](http://www.3rbz.com/uploads/489cb7eb18171.png)
delphi4arab منتديات دلفي للعرب
›
منتديات دلفي للعرب التعليمية
›
سؤال و جواب حول دلفي
تصحيح كود الاستبادل
تصحيح كود الاستبادل
|
تصحيح كود الاستبادل
|
24-01-2016, 09:58 AM
(آخر تعديل لهذه المشاركة: 24-01-2016, 09:58 AM بواسطة محمد عبد العزيز.)
إقتباس :بما انه غير منطقي هل يوجد كود بدييل لا اتحدث عن الكود فهذا عليك ان تتعلم بنفسك اتحدث عن الفكرة، تغيير كل حرف a ب x حتى تعمل يجب القيام بالعكس مسبقا وتغيير كل حرف x ب a ما هو غير منطقي ان النص قد يحتوي حرف a قبل التغيير فكيف تفرق بينه وبين حرف x غير الى a ؟
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
كلام صحيح انا افعل هكذا بل vb.net
الان قلي لماذا يحدث الخطأ اعتقد انا ثقلت عليك واخذت من وقتك 
24-01-2016, 10:40 AM
إقتباس :الان قلي لماذا يحدث الخطأأي خطأ ؟ دائما اذكر الخطأ (نص وليس صورة)
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
24-01-2016, 11:45 AM
اخي عندما اضع هذا الكود
uses Windows,functions; يعمل كمبايل بصورة صحيحة وما في اي مشكلة لكن عند تغيره الى uses Windows,SysUtils,functions; لا يعمل الكمبايل ويكون خط احمر كما موضح في الصورة السابقة
24-01-2016, 12:47 PM
يعني الخطأ عند SysUtils ؟ تاكد من ان دلفي مثبت كامل او على الاقل الوجدة SysUtils موجودة
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
نعم كامل والوحدة تعمل جيدااا اذا ما طبقت هذا الكود
كود : unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
xxxxxxxx, zaid : string;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
xxxxxxxx := 'aaaaaaaaaaaaa';
zaid:= StringReplace(xxxxxxxx, 'a', 'x',[rfReplaceAll, rfIgnoreCase]);
ShowMessage(zaid);
end;
end.
25-01-2016, 01:26 AM
[size=medium]لم افهم ؟ [/size]
[size=medium]هل أنت تقوم بتشفير سيرفر او ماشابه ؟ [/size]
25-01-2016, 09:25 AM
إقتباس :هل أنت تقوم بتشفير سيرفر او ماشابه ؟ الاخ يعبث ب LiOn Polymorphic. Crypter
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
|
|
|
يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم