ورود

View Full Version : سوال: در مورد اعداد



سیروس مقصودی
شنبه 28 بهمن 1391, 16:14 عصر
با سلام

آیا در دلفی تابعی وجود دارد که وقتی عددی را به آن تابع میفرستم آن عدد را با Picture خاصی مثلا دورقمی یا سه رقمی برگرداند . مثلا عد 2 را که وارد میکنم اندازه (Picture) عدد 2 را 3 رقمی برگرداند .

با تشکر ...

gholami146
شنبه 28 بهمن 1391, 16:53 عصر
من که نفهمیدم چی میگی ؟
واضح تر بگو ؟

یوسف زالی
شنبه 28 بهمن 1391, 17:19 عصر
سلام.
برای این کار روی Canvas یک شی از نوع BitMap عمل OutText رو انجام بدید.
اما اگر منظورتون فرمت دهی هست از دستور Format با دایرکتیو d% استفاده کنید.

سیروس مقصودی
یک شنبه 29 بهمن 1391, 08:10 صبح
با تشکر از دوست عزیز You-See
آیا امکان دارد یک نمونه بنویسید
و منظور من تعیین اندازه بر متغییر های عددی است من چگونه میتوانم یک متغییر عددی با اندازه ای مشخص تعریف کنم مانند [String[5 که برای متغییرهای کراکتری تعریف میشود

یوسف زالی
یک شنبه 29 بهمن 1391, 10:25 صبح
با تشکر از دوست عزیز You-See

از دکمه استفاده کنید.

شما مثال بزنید ببینم چی می خواهید اصلا شاید اشتباه متوجه شدم.

samani
شنبه 05 اسفند 1391, 16:35 عصر
سلام

منظور من تعیین اندازه بر متغییر های عددی است من چگونه میتوانم یک متغییر عددی با اندازه ای مشخص تعریف کنم مانند [String[5 که برای متغییرهای کراکتری تعریف میشود
اندازه يك متغيير عددي بر اساس نوعي است كه شما تعريف ميكنيد مثل byte, word, smallint, int, largint, ... ثابت است و قابل تغيير نيست چرا كه در زمان كامپايل متغير تبديل به يكي از رجيسترهاي CPU مثل ax, eax ميشه
متغيرهاي string كه ميتونيم طول آن را مشخص كنيم در واقع آرايه اي از كاراكتر است

و اگر شما ميخواهيد طول يك عدد را در برنامه به راحتي كنترل كنيد و اگر از Delphi XE3 استفاده ميكنيد ميتونيد يك Helper براي متغيرهاي Integer بنويسيد

براي مثال:

type
TIntegerHelper = record helper for Integer
public
function asString: string;
function Length : integer;
end;

function TIntegerHelper.asString: string;
begin
Result := IntToStr(Self);
end;

function TIntegerHelper.Length: integer;
begin
Result := System.Length(self.asString);
end;

procedure TForm1.FormCreate(Sender: TObject);
var
x: integer;
begin
x := 123;
if x.Length > 3 then
Caption := x.asString;
end;

سیروس مقصودی
یک شنبه 13 اسفند 1391, 15:48 عصر
با تشکر
من از دلفی 7 استفاده میکنم

MohsenB
پنج شنبه 17 اسفند 1391, 00:18 صبح
با سلام

برای اعداد میتوانید از محدودیت و محدوده های زیر استفاده کنید :


type
TMyNum = 3..20;

var
a : TMyNum;
//Signed int :
a : Int8; {ShortInt}
b : Int16; {SmallInt}
c : Int32; {Integer}
d : Int64;
//UnSigned int :
a : UInt8; {Byte}
b : UInt16; {Word}
c : UInt32; {Cardinal}
d : UInt64;

توضیح اینکه نوعهایی که جلو آنها توضیح آمده در دلفی 7 تعریف نشده اند و می توانید از نام معادل داخل توضیح استفاده کنید .

موفق باشید