- Redmi Note 13 Pro+ - a fejlődés íve
- Apple iPhone 13 - hízott, de jól áll neki!
- Új nyomógombos Nokiák érkeztek
- Milyen okostelefont vegyek?
- Android alkalmazások - szoftver kibeszélő topik
- Samsung Galaxy Watch6 Classic - tekerd!
- Érkezőben a Poco M6 4G
- Telekom mobilszolgáltatások
- Redmi Note 13 Pro 5G - nem százas, kétszázas!
- Honor Magic5 Pro - kamerák bűvöletében
Hirdetés
-
Miniképernyős, VIA-s Epomaker billentyűzet jött a kábelmentes szegmensbe
ph A megfizethető, szivacsokkal jól megpakolt modell ötfajta kapcsolóval és kétféle színösszeállítással/kupakprofillal szerezhető be.
-
A személyre szabott reklám lehet a streaming következő slágere
it A jobb célzott hirdetések érdekében adatplatformot indít a Warner Bros Discovery.
-
Gray Zone Warfare - Napokon belül kiderül, hogy mikor indul a korai hozzáférés
gp A jelentések szerint a zárt tesztek sikeresek voltak, hamarosan még többen belevethetik magukat a programba.
Új hozzászólás Aktív témák
-
VladimirR
nagyúr
a form1.edit1.text-et ne egyben, hanem karakterenkent titkositsd - visszavonva; az i-t kicsereltem j-re, mert igy dolt lett az egesz
valamint a ciklusod is zavaros kicsit
var j:integer;
c:char;
s: tcaption;
t:string;
begin
t:=form1.Edit1.Text;
for j:=1 to length(t) do
begin
c:=chr(255-(ord(t[j])));
s:=s+c;
end.
form1.Edit1.Text:=s;
end;
[Szerkesztve] -
VladimirR
nagyúr
nem pont erre a kerdesre valasz, de tudsz filban ide-oda ugralni
csak nem szovegfileban, hanem tipusos fileban
neked pedig sejtesem szerint rekord tipusu filera van szukseged
type myrec=record
...blablabla...adattipusok...
end;
var f:file of myrec;
[...]
igy tudsz fileba irni, ill a mar benne levo adatokat tudod modositani (bar a kereses lassu szerintem) -
VladimirR
nagyúr
*.dpk package-t hogy installalok delphi 8 ala?
a glscene-rol lenne szo, ha ez segit valami (a sugoban rafinaltan csak annyit irnak, hogy ''install glscene.dpk as usual'' )
koszonom -
VladimirR
nagyúr
válasz granpa_matis #73 üzenetére
naja, csakhogy a 8-as delphi nem dobja fel azt az aranyos kis ablakot, amin a 7-esben volt az compile, meg install (azota megoldottam - visszaraktam a 7-est , de tovabbra is erdekel, hogy mi lehetett a gond)
-
VladimirR
nagyúr
válasz granpa_matis #75 üzenetére
ez a glscene, de ennyire nem lenne kompatibilis, hogy meg sem nyitja normailsan? (szvsz meg lefordulni is lefordulhatna, max nem lehet installalni)
azert kosz a segitseget -
VladimirR
nagyúr
par kerdesem lenne igy hirtelen:
-lehet-e egy file-t modositani, es ha igen, akkor milyen modon, a file ujrairasa nelkul (tehat nem ugy, hogy kiolvasom, majd az egeszet atirom egy masik file-ba, a modositasokkal egyutt, hanem megnyitom, egy 128byte-os blokkot atirok, majd mentem)?
-lehet-e file elejere beszurni (van egy olyen sejtesem, hogy nem)?
-ha a fenti ket kerdesre a valasz nem, akkor hogyan? megnyitom a file-t, kiolvasom, torlom a filet, majd ujrairom?
-tovabba ha a fenti ket kerdesre a valasz nem, akkor mekkora file-t olvashatok be memoriaba? fileopen-nel ugye beolvasom a file-t mondjuk egy Buffer nevu valtozoba - mekkora meretig mukodik ez? 100-150MB-os file-t meg elbir? esetleg tobbet? vagy hasznaljak temp file-okat?
-ha van egy filelistbox-om es a multiselect engedelyezve van ra, akkor hogyan lehet megtudni az osszes kifelolt file nevet?
-ha nem tudom, hogy mekkora reszre van szuksegem a filebol, akkor mi a teendo, hogyan olvassam be? azt tudom, hogy a file legelejerol kell olvasom, csak azt nem, hogy meddig - azaz joesetben a blokknak van egy 10byte-os footer-e, de ez nem biztos (meg at kell ragnom a specifikaciokat)
-lehet keresni valahogy a file-ban, vagy ezt magam kell megoldjam?
koszonom
[Szerkesztve] -
VladimirR
nagyúr
na megint ittvagyok: ki kellene irnom file-ba egy 128byte meretu rekordot, de nem tudom, hogy hogyan lenne a legjobb, ugyanis van benne nehany null-terminated string, amiknek viszont fix merete kellene, hoigy legyen a file-ban
tehat ha pchar-t hasznalok, akkor kisebb esetleg lesz, ha meg string-et, akkor nagyobb, a 0. byte miatt (meg az nem is kell bele)
ugy vegulis meg tudnam csinalni, hogy byte-onkent feltoltom a puffert, amit aztan kiirok, de ez nem valami elegans megoldas
tehat hogyan lehetne ezt megoldani?
koszonom -
VladimirR
nagyúr
na, most nagyon lama vagyok
unit akarmi;
interface
type t_class=class
private
size:byte;
public
function getsize:byte;
end;
implementation
function t_class.getsize;
begin
getsize:=size;
end;
end.
miert all ez le access violationnal annal a sornal, hogy getsize:=size?
meg a watch ablakban miert mondja azt a size-re, hogy unacceptable value? -
-
VladimirR
nagyúr
kesz, feladom, hulye vagyok
itt a kod (Bővebben: link), valaki legyen szives nezzen bele, mondja meg, hogy mi baja van
a kovetkezo sorra mindig acces violationt dob (azaz nem mindig, csak akkor, ha 128byte-nal nagyobb file-t valasztunk ki, mert kisebbekbe nem olvas bele)
value:=newvalue; (ez az u_charray.pas file-ban van, a t_charray.getfile fuggvenyben)
egyszeruen nem ertem, a value es newvalue tipusa megegyezi, nem megy se cim, se ertek szerinti atadassal, fogalmam nincs
elore is koszonom a segitseget
[Szerkesztve] -
VladimirR
nagyúr
válasz VladimirR #596 üzenetére
amit kihagytam (bar egy resze a kodbol ugyis latszik):
az ertekadas ugy sem megy, ha a tomb elemeit egyenkent probalom atadni (eredetileg igy volt a kodban, kinomban irtam at erre, mert value[i]-re azt mondja, hogy inaccessible value -- akar public, akar private, akarmi)
erre csak egyvalamit tudok mondani: wtf? -
VladimirR
nagyúr
Bővebben: link -- igy nezd meg (es elore is koszonom faradozasod)
[Szerkesztve] -
VladimirR
nagyúr
akkor nem ertem
amikor letrehozom a t_handlerv1 peldanyat, akkor a t_charray - hoz nem jon letre peldany? hisz a t_handlerv1-nek van egy t_charray tipusu valtozoja
ha nem tul nagy keres, elmagyaraznad, hogy mit ertek rosszul?
masik: mi az, hogy hypercool a kodolasi stilusom, es miert baj ez?
koszonom -
VladimirR
nagyúr
koszonom a segitseged, viszont ha nem gond kerdeznek meg parat:
-a tform1.displayv1tag metodusban megcsinaltam, hogy handler := t_handlerv1.create;, eddig ok, mukodik -- meg kell ezt szuntetni? ha igen, akkor handler.destroy?
-olyat lehet (elvileg lehet, mert ugy csinaltam es mukodik, inkabb az erdekelne, hogy szabad-e), hogy csinaltam egy constructor t_handlerv1.create-ot, es abban van egy tdata:=t_charray.create; sor (tdata az t_charray tipusu), majd egy data=tdata (ezesetben a t_handlerv1.data lesz)? es akkor igy a t_handlerv1.data akkor most lathato es elerheto lesz, amig meg nem szuntetem? (tehat a creat konstruktoron kivul is)
koszonom
p.s.: haat, a parameterlista hianya engem is zavar idonkent, csak sajnos legtobb esretben annyira atgondolatlanul kezdek bele egy-egy programba, hogy a fuggvenyek (hat meg a parametereik ) eleg surun valtoznak, s miota rajottem, hogy igy eleg egy helyen atrini, ezt hasznalom
mondjuk eleg sokan panaszkodtak, hogy atlathatatanok a pascal kodjaim is -
VladimirR
nagyúr
function FileOpen(const FileName: string; Mode: LongWord): Integer;
ahol mode lehet:
fmCreate = $FFFF;
fmOpenRead = $0000;
fmOpenWrite = $0001;
fmOpenReadWrite = $0002;
fmShareCompat = $0000 platform;
fmShareExclusive = $0010;
fmShareDenyWrite = $0020;
fmShareDenyRead = $0030 platform;
fmShareDenyNone = $0040;