دوال التحويل من الى
2 مشترك
دلفي تعليم :: منتديات البرمجة :: دلفي
صفحة 1 من اصل 1
دوال التحويل من الى
بسم الله الرحمن الرحيم
الصلاة والسلام على أشرف المرسلين سيدنا محمد صلى الله عليه وسلم وعلى آله وصحبه أجمعين
دوال التحويل من الى
تحويل من عدد صحيح الى سلسلة حرفية
عدد صحيح الى سلسلة حرفية
IntToStr ==> Integer to String
مثال :
Edit1.Text := IntToStr(12);
-----------------------------------------------------------
عدد صحيح الى ستة عشر
IntToHex ==> Integer to hexadécimal : Renvoie la représentation en hexadécimal d'un entier.
مثال :
الصلاة والسلام على أشرف المرسلين سيدنا محمد صلى الله عليه وسلم وعلى آله وصحبه أجمعين
دوال التحويل من الى
تحويل من عدد صحيح الى سلسلة حرفية
عدد صحيح الى سلسلة حرفية
IntToStr ==> Integer to String
مثال :
Edit1.Text := IntToStr(12);
-----------------------------------------------------------
عدد صحيح الى ستة عشر
IntToHex ==> Integer to hexadécimal : Renvoie la représentation en hexadécimal d'un entier.
مثال :
- الكود:
var
i: Integer;
begin
Label1.Caption := '';
for i := 1 to Length(Edit1.Text) do
begin
try
Label1.Caption := Label1.Caption + IntToHex(ord(Edit1.Text[i]),2) + ' ';
except
Beep;
end;
end;
end;
أدخل 1 2 3 تحصل على 31 32 33
--------------------------------
سلسلة حرفية الى عملة أي عملة متداولة أو نقدية
StrToCurr ==> String To Currency
مثال :
var cr: currency;
begin
cr := StrToCurr('550.25');
---------------------------------------
سلسلة حرفية الى تاريخ
StrToDate ==> String To Date
مثال :
var dt: tdate;
begin
dt := StrToDate('20/06/2013');
-----------------------------
سلسلة حرفية الى وقت
StrToTime ==> String to Time
مثال :
var tm: TTime;
begin
tm := StrToTime('12:20:00');
------------------------------
سلسلة حرفية الى تاريخ ووقت
StrToDateTime ==> String To Date and Time
مثال :
------------------------------
سلسلة حرفية الى عدد حقيقي
StrToFloat ==> String To Real
مثال :
var rl: real;
begin
rl := StrToFloat('10.15');
---------------------------
سلسلة حرفية الى عدد صحيح
StrToInt ==> String to Integer
مثال :
var int: real;
begin
int := StrToInt('10');
---------------------------
تاريخ الى سلسلة حرفية
DateToStr ==> Date to string
مثال :
edit1.Text := DateToStr(date);
------------------------
وقت الى سلسلة حرفية
TimeToStr ==> Tame to string
مثال :
edit1.Text := TimeToStr(time);
------------------------------------
تاريخ ووقت الى سلسلة حرفية
DateTimeToStr ==>
Date and Time To String
مثال :
edit1.Text := DateTimeToStr(now);
-------------------------------------
عدد حقيقي الى سلسلة حرفية
FloatToStr ==> Float To String
مثال :
edit1.Text := FloatToStr(10.15);
--------------------------------
عملة الى سلسلة حرفية
CurrToStr ==> Currency to string
مثال :
edit1.Text := CurrToStr(10.15);
--------------------
ملاحظة
يستعمل في عملة نقدية متداولة
Currency
منتدى دلفي تعليم يرحب بكم
delph.forumalgerie.net
.
عدل سابقا من قبل mah11 في 24/5/2015, 3:22 pm عدل 2 مرات (السبب : تنسيق الموضوع)
دلفي تعليم :: منتديات البرمجة :: دلفي
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى