- Oroszok csomagolják ki a még be nem mutatott iPad Pro M5-öt
- Íme, a Moto X70 Air, vagyis Motorola Edge 70 minden oldalról
- Akciófigyelő: Komoly kedvezményekkel és ajándékokkal startol a Xiaomi 15T széria
- Bemutatta az Apple a Powerbeats Fit fülhallgatót
- Amikor a fókusz egy stapatelefon óraképernyőjén van
- Apple iPhone 17 - alap
- iPhone topik
- Samsung Galaxy S22 és S22+ - a kis vagány meg a bátyja
- Apple iPhone 17 Pro Max – fennsík
- Samsung Galaxy S25 - végre van kicsi!
- Motorola Edge 50 Neo - az egyensúly gyengesége
- Google Pixel topik
- Merész dizájn és új teleobjektív az iPhone 17 Pro mobilokban
- Végre egy tényleg jó Duotts bringa! - E29 teszt
- Apple iPhone Air - almacsutka
Új hozzászólás Aktív témák
-
zenit
tag
válasz
Drótszamár #456 üzenetére
Bocs, kicsit félreérthető voltam:
úgy értettem, hogy ilyenkor egy nil-t kell átadni neki paraméternek. -
zenit
tag
válasz
Drótszamár #454 üzenetére
A Parent property-t is be kell állítani a szülőre (a Create csak a tulajdonost állítja).
Elképzelhető, hogy a korábban létrehozott kép takarja az újat (de nem biztos!), ekkor használd a BringToFront eljárást.
Szerk: A Create-nek csak akkor adj meg paramétert, ha azt akarod, hogy a tulajdonosa szabadítsa fel, amikor majd ő is felszabadul. Én jobb szeretem az általam létrehozott objektumokat magam felszabadítani, így ekkor elég egy nil-t megadni.
[Szerkesztve] -
-
zenit
tag
A Form az nem egy statikus kép, hogy egyszer kirajzolódik a Show hatására, és aztán úgy marad.
A tényleges rajzolás általában a Windows WM_PAINT esemény hatására történik, ami mindannyiszor meghívódik, ha pl. megváltozik az ablak tartalma (Invalidate) - vagy egyszerűen csak egy másik ablakot elhúzol felette! stb...
Delphi oldalon ezt a mechanizmust az OnPaint eseményben tudod elcsípni, ami mindannyiszor meghívódik, ha a formot újra kell rajzolni. Itt rajzolhatsz pl. hátteret a Formodnak. Használd a TForm.Canvas-t. -
zenit
tag
válasz
#57764352 #111 üzenetére
LNKO és relatív prím algoritmus:
pl. Bővebben: link
vagy: Bővebben: link
[Szerkesztve] -
zenit
tag
A TFileStream a fájl egyszerű bájt-szintű elérésére való, annak minden előnyével és hátrányával. Egyrészt közvetlenül a Windows API-re épül, szóval hatékony - bár ez ma már inkább csak elvi dolog, bár annak nem utolsó
.
Másrészt meg a VCL mindenhol a TStream osztályt használja, ami néhány alapműveletet definiál, a leszármazottai pedig (így a TFileStream is) ezeket implementálják.
Szóval érdemesebb neked is inkább ebbe az irányba haladni, mert később sokat fogod használni őket, ill. ezért nem érdemes már a pascal-os ''file'' típusba jobban belemélyedni. (Talán még a ''Text'' fájltípusnak van egyedül létjogosultsága, mert erre nem létezik elfogadható alternatíva, bár az más kérdés, hogy valóban szükség van-e rá.) -
zenit
tag
Használhatod ezt:
type TItem = array[0..1023] of Char;
Ezzel 1023 karakter hosszú szöveget tudsz tárolni (plusz egy lezáró #0 karakter). Így már mehet a file of TItem, ahol a rekord mérete 1024 bájt lesz.
String (S) -> TItem (Item) konverzió a fájl írásához:
StrLCopy(Item, PChar(S), SizeOf(Item) - 1);
Olvasás után pedig csak egyszerű értékadás kell: S := Item;
Halkan megjegyezném, hogy a file of ... használata Delphi-ben elavult dolognak számít, helyette használj inkább TFileStream-et.
Új hozzászólás Aktív témák
- Apple iPhone 17 - alap
- Kerékpárosok, bringások ide!
- Milyen belső merevlemezt vegyek?
- VGA kibeszélő offtopik
- Robotporszívók
- One otthoni szolgáltatások (TV, internet, telefon)
- Bemutatkozott a Samsung Galaxy Tab A11 és Tab A11+
- Battlefield 6
- urandom0: Kicsit most elfáradtam...
- exHWSW - Értünk mindenhez IS
- További aktív témák...
- Eladó Fitbit Charge 6 /Coral színű
- Asztali PC , i7 13700F , RTX 4070 , 32GB DDR5 , 1TB NVME
- Asztali PC , R7 5700X , RX 5700 XT , 16GB RAM , 512GB NVME , 750GB HDD
- GAMER PC! Ryzen 5700X / 32GB DDR4 / RTX 4060 Ti 16GB / 1TB NVMe / 650w Gold! BeszámítOK
- Apple Watch Ultra Titanium GPS+Cellular 49mm, gyári dobozában! Makulátlan!
- GYÖNYÖRŰ iPhone 13 128GB Starlight- 1 ÉV GARANCIA, Kártyafüggetlen,,MS3434
- HIBÁTLAN iPhone 14 Pro Max 256GB Black -1 ÉV GARANCIA - Kártyafüggetlen, MS3513, 91% Akkumulátor
- HIBÁTLAN iPhone 13 512GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3273, 100% Akkumulátor
- HIBÁTLAN iPhone 14 Pro Max 128GB Space Black -1 ÉV GARANCIA - Kártyafüggetlen, MS3523
- Samsung Galaxy S24+ / GyáriFüggyetlen / 12/256GB / 12Hó Garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest