PDA

View Full Version : چجوری 5 تا label در فرم داریم بصورت رندوم یکشون نمایش داده شود ؟



Valadi
چهارشنبه 01 آذر 1385, 10:01 صبح
چجوری 5 تا label در فرم داریم بصورت رندوم یکشون نمایش داده شود ؟
البته تمام label همه بصورت Visible:=False است

MNosouhi
چهارشنبه 01 آذر 1385, 10:51 صبح
Randomize;
case RandomRange(1,6) of
1:Label1.Show;
2:Label2.Show;
3:Label3.Show;
4:Label4.Show;
5:Label5.Show;
end;
---------------------------------
از تگ کد استفاده کنید

Valadi
چهارشنبه 01 آذر 1385, 10:58 صبح
جناب Pesare_khob اگر امکان داره بیشتر نوضیح بده این کد را کجا قراربدیم

MNosouhi
چهارشنبه 01 آذر 1385, 11:00 صبح
جناب Pesare_khob اگر امکان داره بیشتر نوضیح بده این کد را کجا قراربدیم
هر جایی که قراره به صورت رندوم یکی از لیبلها نمایش داده بشه.

Valadi
چهارشنبه 01 آذر 1385, 11:12 صبح
هر جایی که قراره به صورت رندوم یکی از لیبلها نمایش داده بشه.
جناب Pesare_khob این خطاها را میده

[Error] Unit1.pas(34): Undeclared identifier: 'RandomRange'
[Error] Unit1.pas(42): ';' expected but '.' found
[Error] Unit1.pas(44): Declaration expected but end of file found
[Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit1.pas'

MNosouhi
چهارشنبه 01 آذر 1385, 11:30 صبح
[
Error] Unit1.pas(34): Undeclared identifier: 'RandomRange'
یونیت Math رو Use کنید.

[Error] Unit1.pas(42): ';' expected but '.' found
خودتون یه جایی یک end کم گذاشته اید.

arshia_
چهارشنبه 01 آذر 1385, 11:52 صبح
می تونی از این روش هم استفاده کنی


randomize;
case (random(5)+1) of //random lfrom 1 -- 5
1:Label1.Show;
2:Label2.Show;
3:Label3.Show;
4:Label4.Show;
5:Label5.Show;
end;