- Kompakt vízhűtés
- Dell notebook topic
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Apple asztali gépek
- HiFi műszaki szemmel - sztereó hangrendszerek
- CPU léghűtés kibeszélő
- Fejhallgató erősítő és DAC topik
- Vezeték nélküli fülhallgatók
- Házimozi belépő szinten
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
Ú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
Hirdetés
- Kompakt vízhűtés
- Autós topik látogatók beszélgetős, offolós topikja
- Dell notebook topic
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Apple asztali gépek
- HiFi műszaki szemmel - sztereó hangrendszerek
- Magisk
- Ingatlanos topic!
- CPU léghűtés kibeszélő
- Fejhallgató erősítő és DAC topik
- További aktív témák...
- Szép! Lenovo Thinkpad T14s G2 Üzleti "Golyóálló" Laptop 14" -60% i5-1135G7 4Mag 16GB /512GB FHD IPS
- Samsung Q80T 55" QLED - 4K 120Hz VRR / FreeSync / HDMI 2.1
- ÚJ HP ENVY 17 Nagyképernyős "Kis Gamer" Laptop -45% 17,3" Brutál i7-13700H 16/1TB Iris Xe FHD IPS
- Legion Go 8APU1
- Gamer PC kompromisszumokkal, de garanciával RX 7800 XT + Ryzen 5 3600 32Gb-DDR4
- Kingston ValueRAM 4GB DDR3 1333MHz KVR1333D3N9
- Xiaomi Redmi Note 13 256GB, Kártyafüggetlen, 1 Év Garanciával
- ÁRCSÖKKENTÉS Lenovo ThinkPad T570, T580, P51s, P52s eredeti Lenovo, belső akkumulátor eladó
- Telefon felvásárlás!! Apple iPhone 16, Apple iPhone 16e, Apple iPhone 16 Plus, Apple iPhone 16 Pro
- BESZÁMÍTÁS! MSI B450 TomaHawk R5 5600X 32GB DDR4 512GB SSD RTX 3060 XC 12GB Rampage SHIVA 600W
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: CAMERA-PRO Hungary Kft
Város: Budapest