PaylaşTR

Geri git   PaylaşTR > EĞİTİM VE ÖĞRETİM DÜNYASI > Programlama > Visual Basic | Delphi | Pascal

Rastgele Kilim Deseni Çıkartma

Visual Basic | Delphi | Pascal
Rastgele Kilim Deseni Çıkartma, Rastgele Kilim Deseni Çıkartma Arkadaşlar Rastgele kilim deseni çıkartma die bi ödev verildi bize Kısmi olarak tamamlamış olsakta sadece dikdörtgen ve oval şekillerle yapabiliyoruz Daha çok şekil için yapmamız gereken nedir bilgisi olan yardımcı olabilirmi? Bizim Kodlar Private Sub Command1_Click() If Option1 Value = True Then Randomize r = (Rnd * (255 - 1) + 1) g = (Rnd * (255 - 1) + 1) b = (Rnd * (255 - 1) + 1) skl ve Rastgele Kilim Deseni Çıkartma delphi rastgele şekiller, desen çikartma, desen çıkarma, halı deseni ödev, halı desenı olusturma, kilim deseni, kilim deseni nedir?, kilim deseni oluşturma, kilim deseni çıkarma, kilim deseni ödevi, kilim desenleri, visual basic de desen yapma, hakkında bilgiler ve daha fazlasını içeriyor.. Devamını Oku...

 
Paylaş
29.11.06 09:47 Yazan: SLiPKoRn
Rastgele Kilim Deseni Çıkartma

Sponsorlu Bağlantılar

Rastgele Kilim Deseni Çıkartma


Arkadaşlar Rastgele kilim deseni çıkartma die bi ödev verildi bize Kısmi olarak tamamlamış olsakta sadece dikdörtgen ve oval şekillerle yapabiliyoruzDaha çok şekil için yapmamız gereken nedir bilgisi olan yardımcı olabilirmi?
Bizim Kodlar

Private Sub Command1_Click()
If Option1Value = True Then
Randomize
r = (Rnd * (255 - 1) + 1)
g = (Rnd * (255 - 1) + 1)
b = (Rnd * (255 - 1) + 1)
skl = (Rnd * (5 - 1) + 1)
dsn = (Rnd * (7 - 1) + 1)
kln = (Rnd * (6 - 1) + 1)
Label2BackColor = RGB(r, g, b)
Shape1Shape = skl
Shape1BorderColor = RGB(b, r, g)
Shape1BorderStyle = kln
Shape1FillColor = RGB(r, g, b)
Shape1FillStyle = dsn


Else



Label2BackColor = RGB(HScroll1Value, HScroll2Value, HScroll3Value)
Shape1Shape = HScroll4Value
Shape1BorderColor = RGB(HScroll3Value, HScroll1Value, HScroll2Value)
Shape1FillColor = RGB(HScroll1Value, HScroll2Value, HScroll3Value)
Shape1FillStyle = HScroll5

End If
End Sub


Sadece çeşitlik şekiller yapmak istiyorumYardımınız için şimdidn teşekkürler

Sponsorlu Bağlantılar




Gitti Gidiyor..
 

WEZ Format +2. Şuan Saat: 05:44.


PaylaşTR Bir Eğlence Ve Bilgi Paylaşım Platformudur. Copyright © 2004-2014

Sitemizdeki içerik,iznimiz olmadan veya kaynak gösterilmeden başka sitelerde kullanılamaz. 5651 Sayılı Kanun'un 8.Maddesine ve T.C.K'nın 125. Maddesine göre Sitemizdeki Üyelerimiz yaptıkları paylaşımlardan sorumludur.Sitemizde bulunan bir içeriğin, kanunlara aykırı olduğunu veya yanıltıcı olduğunu düşünüyorsanız lütfen buradan bize bildirin.

PaylasTR.Org | Since 2004

Powered by vBulletin Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.3.0

Forumumuza kayıtlı Kullanıcı olmadığınız algılandı. Forumun tüm özelliklerini kullanabilmek için buraya tıklayarak ücretsiz üye olabilirsiniz...
Üye olmadan yeni konu açıp soru sorabilirsiniz