🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #14903

Re: Delphi incompatible types

#14903
From: // Matthijs
Date: Sat, 30 Dec 2000 11:13
23 lines
1391 bytes
According to Shadow,
> > Wat is "string30" voor iets?
> 
> type
>   String30 = array[0..29] of char;

 String30 = array[1..30] of char;

lijkt mij een betere keuze. Strings beginnen ook bij karakter nummer 1.

> 
> > Hoe ziet de regel eruit waar Delphi een fout aangeeft?
> 
> ID3tag.Title := efTitle.Text; {editfield}
> 
> Het is een array omdat als je een string inleest hij het eerste karakter
> niet inleest

CopyMemory(@j[0], @Edit1.Text[1], 30);

// Matthijs;
-- 
WinAmp playing Steve Vai - I Would Love To
Technical Details
Message-ID: <MPG.14b7e1bb137f091498969e@newszilla.xs4all.nl>
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-xit-03!supernews.com!news.tele.dk!194.109.6.150!transit.news.xs4all.nl!newszilla.xs4all.nl!not-for-mail
References: <O1N26.10958$CK.480731@afrodite.telenet-ops.be> <MPG.14b6a0d285b29ff98969c@newszilla.xs4all.nl> <%Y236.2111$MA1.82141@afrodite.telenet-ops.be>

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,a777372a2253f464
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2000-12-30 03:13:26 PST
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-xit-03!supernews.com!news.tele.dk!194.109.6.150!transit.news.xs4all.nl!newszilla.xs4all.nl!not-for-mail
From: // Matthijs <matthijslaan@cia-agent.nospam-remove.com>
Newsgroups: be.comp.programming
Subject: Re: Delphi incompatible types
Date: Sat, 30 Dec 2000 12:13:20 +0100
Message-ID: <MPG.14b7e1bb137f091498969e@newszilla.xs4all.nl>
References: <O1N26.10958$CK.480731@afrodite.telenet-ops.be> <MPG.14b6a0d285b29ff98969c@newszilla.xs4all.nl> <%Y236.2111$MA1.82141@afrodite.telenet-ops.be>
X-Newsreader: MicroPlanet Gravity v2.30
Lines: 23
NNTP-Posting-Host: 194.109.191.172
X-Trace: 978174805 dreader2.news.xs4all.nl 321 194.109.191.172