+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : جلب عددعلى حسب ترتيبة؟ (/showthread.php?tid=6296)
جلب عددعلى حسب ترتيبة؟ - karika2 - 07-07-2014
بسم الله الله الرحمن الرحيم
عندى سؤال بسيط ان شاء الله
كود :
var
i:integer;
begin
i:=25438;
Edit1.Text:=IntToStr(i)
end;كيف أظهر العدد الثالث فقط .
محدش يجى يعملى كدا edit1.text:='4'
:p
جلب عددعلى حسب ترتيبة؟ - محمد عبد العزيز - 07-07-2014
كود :
var
i:integer;
begin
i:=25438;
Edit1.Text:=Copy(IntToStr(i),3,1);
end;جلب عددعلى حسب ترتيبة؟ - karika2 - 07-07-2014
بارك الله فيك أخ B.M.AbdelAziZ
جلب عددعلى حسب ترتيبة؟ - Agmcz - 07-07-2014
أيضا
PHP كود :
var
I: Integer;
S: string;
begin
I := 25438;
Str(I,S);
Edit1.Text:= S[3];
end;
PHP كود :
var
I: Integer;
begin
I := 25438;
Edit1.Text:= IntToStr(I)[3];
end;
جلب عددعلى حسب ترتيبة؟ - karika2 - 09-07-2014
ghost-dz كتب :أيضا
أوPHP كود :var
i: Integer;
s: String;
begin
i := 25438;
str(i,s);
edit1.text:= s[3];
end;
PHP كود :var
i: Integer;
begin
i := 25438;
edit1.text:= inttostr(i)[3];
end;
الله يفتح عليك ....