- sziku69: Szólánc.
- Meggyi001: RTX 5060 - Az új népkártya?
- Luck Dragon: Asszociációs játék. :)
- Geri Bátyó: Megint tahó voltam – SZEMÉLYISÉGFEJLŐDÉS
- sziku69: Fűzzük össze a szavakat :)
- GoodSpeed: AMD Ryzen 7 7700X vs AMD Ryzen 9 9900X Cinebench R23 & R24 Benchmarkokban mérve
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- LordAthis: AI (és másra is használt) Cluster építése - Második Cikk
- koxx: Bloons TD5 - Tower Defense játék
- btz: Internet fejlesztés országosan!
Ú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
- Az AI megeszi a szoftverpiacot?
- Samsung Galaxy A56 - megbízható középszerűség
- Windows 11
- WLAN, WiFi, vezeték nélküli hálózat
- Kerékpársportok
- A fociról könnyedén, egy baráti társaságban
- AMD Navi Radeon™ RX 9xxx sorozat
- GL.iNet Flint 2 (GL-MT6000) router
- Milyen légkondit a lakásba?
- Videó stream letöltése
- További aktív témák...
- Ritkaság! Galaxy Z Flip 6 512GB Olympic Edition, 1 év globális garanciával!
- WD Red Pro 4TB 7200rpm Megbízható archiválás és biztonságos backup! 3év garancia
- WD Black SN770 2TB NVMe PCIe Extra gyors tárhely, friss vásárlás, 2év garanciával!
- Crucial P5 Plus 1TB NVMe PCIe Villámgyors rendszermeghajtó, 1 év garanciával!
- ASUS TUF Gaming GT501 Masszív, jól szellőző, RGB-kompatibilis ház
- Telefon felvásárlás!! Honor 400 Lite, Honor 400, Honor 400 Pro
- HIBÁTLAN iPhone 12 128GB Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3028
- Satechi 200w USB-C 6-port PD GAN - UK / Számla / Garancia /
- HIBÁTLAN iPhone 15 Pro 256GB Natural Titanium -1 ÉV GARANCIA - Kártyafüggetlen, MS3002, 90% Akksi
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7700X 32/64GB RAM RX 7800 XT 16GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: FOTC
Város: Budapest