Hirdetés
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Brogyi: CTEK akkumulátor töltő és másolatai
- Luck Dragon: Asszociációs játék. :)
- GoodSpeed: Márkaváltás sok-sok év után
- Elektromos rásegítésű kerékpárok
- sziku69: Fűzzük össze a szavakat :)
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- koxx: Bloons TD5 - Tower Defense játék
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- potyautas: Levél gyermekemnek
Új hozzászólás Aktív témák
-
^^|CC|^^
tag
Csáóóó!
Most az lenne a problémám, hogy delphiben kéne véletlen neveket létrehoznom...
A kritériumok azok lennének, hogy random hosszúságúak (1 szótagtól 5 szótagig és 1 szótag az egy msh és egy mgh kell, hogy legyen...)
Sajnos nem vagyok túl jártas a programozásban és kéne a segítség...
Nagyon szépen köszönöm a segítségeket...

üdv.:
^^|CC|^^ -
^^|CC|^^
tag
válasz
Gyuri16
#1758
üzenetére
nah megcsináltam eddig nekem így néz ki:
var a,i: integer;
s,nullak: string;
m: byte;
begin
try
a:=strtoint(edit2.text);
if a<0 then raise exception.create('Ne legyen negatív!');
if a=0 then s:='0'
else begin
s:='';
while a>0 do begin
m:= a mod 2;
s:=inttostr(m)+s;
a:=a div 2
end;
nullak:='';
for i:=1 to 4-length(s) mod 4 do
nullak:=nullak+'0';
if length(nullak)=4 then
nullak:='';
s:=nullak+s;
end;
showmessage('Számocska:'+#13+#13+s);
except
showmessage('Hiba!!!');
end;
end;a félkövér amit javasoltál... most legalább már tölti őket 0-kal, de még mindig nem tagolja fel 4sével...

-
^^|CC|^^
tag
csáóóó
Nekem olyan típusú problémám lenne, hogy ugye meg van az, hogy beírok egy edit mezőbe egy számot és ki hozza showmessage-ben a bináris kódját...
Igen ez nem volt olyan nehéz...A problémám ott kezdődik mikor azt kéne megcsinálnom, hogy négyesével legyen tagolva és ha ez nem tudna teljesülni( mivel kisebb szám jött ki) akkor azt meg fel kellene töltenie 0-kal....
pl.: (általam kitalált számok általam kitalált eredményekkel...)
231= 11001011001110110
nah itt van kevesebb, mint 4... és ilyenkor kéne feltöltenie 0-kal: 1 1001 0110 0111 0110
0001 1001 0110 0111 0110 ----> ez a végleges formátuma
annyit biztosan tudok, hogy vagy elöltesztelős ciklussal vagy pedig hátul tesztelős ciklussal kell megcsinálni... de még annyira kezdő vagyok, hogy nem igen akar összejönni nekem...

nagyon szépen köszönöm a segítségeket...

Új hozzászólás Aktív témák
- Elektromos autók - motorok
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Építő/felújító topik
- Androidos tablet topic
- Óra topik
- Formula-1
- Futás, futópályák
- Okos Otthon / Smart Home
- Kerékpárosok, bringások ide!
- AMD Navi Radeon™ RX 9xxx sorozat
- További aktív témák...
- BESZÁMÍTÁS! MSI B450M R5 3600X 16GB DDR4 512GB SSD RTX 2060 Super 8GB GameMax STORM Black 600W
- Bomba ár! HP ProBook 430 G5 - i5-8GEN I 8GB I 128SSD I HDMI I 13,3" FHD I Cam I W11 I Garancia!
- Samsung Galaxy Ring 12mm, 1 Év Garanciával
- OnePlus Nord 2T 128GB, Kártyafüggetlen, 1 Év Garanciával
- Apple iPhone 14 Pro 128GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest







