🚀 go-pugleaf

On Mon, 18 Aug 2003 19:59:42 GMT, "Cliff Beeckman"
<cliffbeeckman@pandora.be> wrote:

>Is het mogelijk via ��n commando(vb. via menu-klik) de gehele inhoud van een
>document(een tekstbestand) te wissen?
>Zo ja, iemand die mij kan verder helpen(VB6)?
>
>Alvast bedankt,
>
>Cliff.
>
bajaat joeng, je delete de file en je creeert 'm opnieuw
en alles is weg

"gd" <geert.demuynck____NOSPAM____@pandorapotdorie.be> wrote in message
news:cnn4kv0ospnbrndq0pc9pncmfguftd6of3@4ax.com...
> On Mon, 18 Aug 2003 19:59:42 GMT, "Cliff Beeckman"
> <cliffbeeckman@pandora.be> wrote:
>
> >Is het mogelijk via ��n commando(vb. via menu-klik) de gehele inhoud van
een
> >document(een tekstbestand) te wissen?
> >Zo ja, iemand die mij kan verder helpen(VB6)?
> >
> >Alvast bedankt,
> >
> >Cliff.
> >
> bajaat joeng, je delete de file en je creeert 'm opnieuw
> en alles is weg
>
>

Nadeel is wel dat de Creation Date of het bestand dan ook aangepast wordt,
je kan het ook op deze manier doen:

Dim f As Integer
    f = FreeFile
    Open "C:\Bestand.txt" For Output As #f
    Close #f

"Billyke" <gert.verstappen@gmx.net> wrote in message
news:bhtrq4$buk$1@reader10.wxs.nl...
>
> "gd" <geert.demuynck____NOSPAM____@pandorapotdorie.be> wrote in message
> news:cnn4kv0ospnbrndq0pc9pncmfguftd6of3@4ax.com...
> > On Mon, 18 Aug 2003 19:59:42 GMT, "Cliff Beeckman"
> > <cliffbeeckman@pandora.be> wrote:
> >
> > >Is het mogelijk via ��n commando(vb. via menu-klik) de gehele inhoud
van
> een
> > >document(een tekstbestand) te wissen?
> > >Zo ja, iemand die mij kan verder helpen(VB6)?
> > >
> > >Alvast bedankt,
> > >
> > >Cliff.
> > >
> > bajaat joeng, je delete de file en je creeert 'm opnieuw
> > en alles is weg
> >
> >
>
> Nadeel is wel dat de Creation Date of het bestand dan ook aangepast wordt,
> je kan het ook op deze manier doen:
>
> Dim f As Integer
>     f = FreeFile
>     Open "C:\Bestand.txt" For Output As #f
>     Close #f
>
>

Nadeel is wel dat de Creation Date *VAN* het bestand dan ook aangepast wordt

"Billyke" <gert.verstappen@gmx.net> schreef in bericht
news:bhts8m$cct$1@reader10.wxs.nl...
>
> "Billyke" <gert.verstappen@gmx.net> wrote in message
> news:bhtrq4$buk$1@reader10.wxs.nl...
> >
> > "gd" <geert.demuynck____NOSPAM____@pandorapotdorie.be> wrote in message
> > news:cnn4kv0ospnbrndq0pc9pncmfguftd6of3@4ax.com...
> > > On Mon, 18 Aug 2003 19:59:42 GMT, "Cliff Beeckman"
> > > <cliffbeeckman@pandora.be> wrote:
> > >
> > > >Is het mogelijk via ��n commando(vb. via menu-klik) de gehele inhoud
> van
> > een
> > > >document(een tekstbestand) te wissen?
> > > >Zo ja, iemand die mij kan verder helpen(VB6)?
> > > >
> > > >Alvast bedankt,
> > > >
> > > >Cliff.
> > > >
> > > bajaat joeng, je delete de file en je creeert 'm opnieuw
> > > en alles is weg
> > >
> > >
> >
> > Nadeel is wel dat de Creation Date of het bestand dan ook aangepast
wordt,
> > je kan het ook op deze manier doen:
> >
> > Dim f As Integer
> >     f = FreeFile
> >     Open "C:\Bestand.txt" For Output As #f
> >     Close #f
> >
> >
>
> Nadeel is wel dat de Creation Date *VAN* het bestand dan ook aangepast
wordt
>
>

En waarom is dat een nadeel?
Ben nog nooit geinteresseerd geweest in de creation date, iedere file wordt
wel ne keer gecreeerd en vanaf
dan wordt die gewijzigd en dat vind ik veel interessanter.  :-)

-- 

MaG

thx, ik zal dit ook es proberen. ik had al een andere code geschreven maar
die is niet zo efficient(zo kort) als die van jou...bedankt vr de tip. ook
een idee hoe ik een lijn volledig op het scherm krijg in een richtextbox
want nu splitst hij die lijn en dat is niet erg handig(horizontale
schuifbalk wil net niet werken)...?

"MaG" <nomail@nowhere.com> schreef in bericht
news:FRv0b.9748$ru7.1576204454@hestia.telenet-ops.be...
>
> "Billyke" <gert.verstappen@gmx.net> schreef in bericht
> news:bhts8m$cct$1@reader10.wxs.nl...
> >
> > "Billyke" <gert.verstappen@gmx.net> wrote in message
> > news:bhtrq4$buk$1@reader10.wxs.nl...
> > >
> > > "gd" <geert.demuynck____NOSPAM____@pandorapotdorie.be> wrote in
message
> > > news:cnn4kv0ospnbrndq0pc9pncmfguftd6of3@4ax.com...
> > > > On Mon, 18 Aug 2003 19:59:42 GMT, "Cliff Beeckman"
> > > > <cliffbeeckman@pandora.be> wrote:
> > > >
> > > > >Is het mogelijk via ��n commando(vb. via menu-klik) de gehele
inhoud
> > van
> > > een
> > > > >document(een tekstbestand) te wissen?
> > > > >Zo ja, iemand die mij kan verder helpen(VB6)?
> > > > >
> > > > >Alvast bedankt,
> > > > >
> > > > >Cliff.
> > > > >
> > > > bajaat joeng, je delete de file en je creeert 'm opnieuw
> > > > en alles is weg
> > > >
> > > >
> > >
> > > Nadeel is wel dat de Creation Date of het bestand dan ook aangepast
> wordt,
> > > je kan het ook op deze manier doen:
> > >
> > > Dim f As Integer
> > >     f = FreeFile
> > >     Open "C:\Bestand.txt" For Output As #f
> > >     Close #f
> > >
> > >
> >
> > Nadeel is wel dat de Creation Date *VAN* het bestand dan ook aangepast
> wordt
> >
> >
>
> En waarom is dat een nadeel?
> Ben nog nooit geinteresseerd geweest in de creation date, iedere file
wordt
> wel ne keer gecreeerd en vanaf
> dan wordt die gewijzigd en dat vind ik veel interessanter.  :-)
>
> --
>
> MaG
>
>

On Tue, 19 Aug 2003 20:59:44 +0000, Cliff Beeckman wrote:

> thx, ik zal dit ook es proberen. ik had al een andere code geschreven maar
> die is niet zo efficient(zo kort) als die van jou...bedankt vr de tip. ook
> een idee hoe ik een lijn volledig op het scherm krijg in een richtextbox
> want nu splitst hij die lijn en dat is niet erg handig(horizontale
> schuifbalk wil net niet werken)...?
> 
> "MaG" <nomail@nowhere.com> schreef in bericht
> news:FRv0b.9748$ru7.1576204454@hestia.telenet-ops.be...
>>
>> "Billyke" <gert.verstappen@gmx.net> schreef in bericht
>> news:bhts8m$cct$1@reader10.wxs.nl...
>> >
>> > "Billyke" <gert.verstappen@gmx.net> wrote in message
>> > news:bhtrq4$buk$1@reader10.wxs.nl...
>> > >
>> > > "gd" <geert.demuynck____NOSPAM____@pandorapotdorie.be> wrote in
> message
>> > > news:cnn4kv0ospnbrndq0pc9pncmfguftd6of3@4ax.com...
>> > > > On Mon, 18 Aug 2003 19:59:42 GMT, "Cliff Beeckman"
>> > > > <cliffbeeckman@pandora.be> wrote:
>> > > >
>> > > > >Is het mogelijk via ��n commando(vb. via menu-klik) de gehele
> inhoud
>> > van
>> > > een
>> > > > >document(een tekstbestand) te wissen? Zo ja, iemand die mij kan
>> > > > >verder helpen(VB6)?
>> > > > >
>> > > > >Alvast bedankt,
>> > > > >
>> > > > >Cliff.
>> > > > >
>> > > > bajaat joeng, je delete de file en je creeert 'm opnieuw en alles
>> > > > is weg
>> > > >
>> > > >
>> > > >
>> > > Nadeel is wel dat de Creation Date of het bestand dan ook aangepast
>> wordt,
>> > > je kan het ook op deze manier doen:
>> > >
>> > > Dim f As Integer
>> > >     f = FreeFile
>> > >     Open "C:\Bestand.txt" For Output As #f Close #f
>> > >
>> > >
>> > >
>> > Nadeel is wel dat de Creation Date *VAN* het bestand dan ook aangepast
>> wordt
>> >
>> >
>> >
>> En waarom is dat een nadeel?
>> Ben nog nooit geinteresseerd geweest in de creation date, iedere file
> wordt
>> wel ne keer gecreeerd en vanaf
>> dan wordt die gewijzigd en dat vind ik veel interessanter.  :-)
>>
>> --
>>
>> MaG
>>
>>
>>


Die horizontale schuifbalk.... ik heb daar ook ooit (lang geleden) op gevloekt 
Als ik me niet vergis is dat ergens een property dat je moet instellen in
design time ... moet van iets de breedte invullen of zo ...
Heb geen vb hier op pc staan dus kan niet testen en / of zoeken...
tzou kunnen dat dit compleet ni klopt...ma doorloop toch 'ns al de
properties van die richtextbox en kijk of er iets zou kunnen kloppen aan
mijn beschrijving


mvg sotto

Niet gevonden...kheb al vanalles proberen aanpassen met verschillende
combinaties, lukt allemaal niet. de richtextbox laadt mijn tekstbestand maar
splitst mijn lijnen ondanks het feit dat ik bv. bij de property scrollbars
both(3) heb gekozen...

toch bedankt voor de tip...als het je nog te binnen schiet...laat zeker iets
weten!

"sotto" <junk@sotto.be> schreef in bericht
news:pan.2003.08.19.21.36.30.213205@sotto.be...
> On Tue, 19 Aug 2003 20:59:44 +0000, Cliff Beeckman wrote:
>
> > thx, ik zal dit ook es proberen. ik had al een andere code geschreven
maar
> > die is niet zo efficient(zo kort) als die van jou...bedankt vr de tip.
ook
> > een idee hoe ik een lijn volledig op het scherm krijg in een richtextbox
> > want nu splitst hij die lijn en dat is niet erg handig(horizontale
> > schuifbalk wil net niet werken)...?
> >
> > "MaG" <nomail@nowhere.com> schreef in bericht
> > news:FRv0b.9748$ru7.1576204454@hestia.telenet-ops.be...
> >>
> >> "Billyke" <gert.verstappen@gmx.net> schreef in bericht
> >> news:bhts8m$cct$1@reader10.wxs.nl...
> >> >
> >> > "Billyke" <gert.verstappen@gmx.net> wrote in message
> >> > news:bhtrq4$buk$1@reader10.wxs.nl...
> >> > >
> >> > > "gd" <geert.demuynck____NOSPAM____@pandorapotdorie.be> wrote in
> > message
> >> > > news:cnn4kv0ospnbrndq0pc9pncmfguftd6of3@4ax.com...
> >> > > > On Mon, 18 Aug 2003 19:59:42 GMT, "Cliff Beeckman"
> >> > > > <cliffbeeckman@pandora.be> wrote:
> >> > > >
> >> > > > >Is het mogelijk via ��n commando(vb. via menu-klik) de gehele
> > inhoud
> >> > van
> >> > > een
> >> > > > >document(een tekstbestand) te wissen? Zo ja, iemand die mij kan
> >> > > > >verder helpen(VB6)?
> >> > > > >
> >> > > > >Alvast bedankt,
> >> > > > >
> >> > > > >Cliff.
> >> > > > >
> >> > > > bajaat joeng, je delete de file en je creeert 'm opnieuw en alles
> >> > > > is weg
> >> > > >
> >> > > >
> >> > > >
> >> > > Nadeel is wel dat de Creation Date of het bestand dan ook aangepast
> >> wordt,
> >> > > je kan het ook op deze manier doen:
> >> > >
> >> > > Dim f As Integer
> >> > >     f = FreeFile
> >> > >     Open "C:\Bestand.txt" For Output As #f Close #f
> >> > >
> >> > >
> >> > >
> >> > Nadeel is wel dat de Creation Date *VAN* het bestand dan ook
aangepast
> >> wordt
> >> >
> >> >
> >> >
> >> En waarom is dat een nadeel?
> >> Ben nog nooit geinteresseerd geweest in de creation date, iedere file
> > wordt
> >> wel ne keer gecreeerd en vanaf
> >> dan wordt die gewijzigd en dat vind ik veel interessanter.  :-)
> >>
> >> --
> >>
> >> MaG
> >>
> >>
> >>
>
>
> Die horizontale schuifbalk.... ik heb daar ook ooit (lang geleden) op
gevloekt
> Als ik me niet vergis is dat ergens een property dat je moet instellen in
> design time ... moet van iets de breedte invullen of zo ...
> Heb geen vb hier op pc staan dus kan niet testen en / of zoeken...
> tzou kunnen dat dit compleet ni klopt...ma doorloop toch 'ns al de
> properties van die richtextbox en kijk of er iets zou kunnen kloppen aan
> mijn beschrijving
>
>
> mvg sotto
>

On Wed, 20 Aug 2003 15:21:12 +0000, Cliff Beeckman wrote:

> Niet gevonden...kheb al vanalles proberen aanpassen met verschillende
> combinaties, lukt allemaal niet. de richtextbox laadt mijn tekstbestand
> maar splitst mijn lijnen ondanks het feit dat ik bv. bij de property
> scrollbars both(3) heb gekozen...
> 
> toch bedankt voor de tip...als het je nog te binnen schiet...laat zeker
> iets weten!
> 
> "sotto" <junk@sotto.be> schreef in bericht
> news:pan.2003.08.19.21.36.30.213205@sotto.be...
>> On Tue, 19 Aug 2003 20:59:44 +0000, Cliff Beeckman wrote:
>>
>> > thx, ik zal dit ook es proberen. ik had al een andere code geschreven
> maar
>> > die is niet zo efficient(zo kort) als die van jou...bedankt vr de tip.
> ook
>> > een idee hoe ik een lijn volledig op het scherm krijg in een
>> > richtextbox want nu splitst hij die lijn en dat is niet erg
>> > handig(horizontale schuifbalk wil net niet werken)...?
>> >
>> > "MaG" <nomail@nowhere.com> schreef in bericht
>> > news:FRv0b.9748$ru7.1576204454@hestia.telenet-ops.be...
>> >>
>> >> "Billyke" <gert.verstappen@gmx.net> schreef in bericht
>> >> news:bhts8m$cct$1@reader10.wxs.nl...
>> >> >
>> >> > "Billyke" <gert.verstappen@gmx.net> wrote in message
>> >> > news:bhtrq4$buk$1@reader10.wxs.nl...
>> >> > >
>> >> > > "gd" <geert.demuynck____NOSPAM____@pandorapotdorie.be> wrote in
>> > message
>> >> > > news:cnn4kv0ospnbrndq0pc9pncmfguftd6of3@4ax.com...
>> >> > > > On Mon, 18 Aug 2003 19:59:42 GMT, "Cliff Beeckman"
>> >> > > > <cliffbeeckman@pandora.be> wrote:
>> >> > > >
>> >> > > > >Is het mogelijk via ��n commando(vb. via menu-klik) de
>> >> > > > >gehele
>> > inhoud
>> >> > van
>> >> > > een
>> >> > > > >document(een tekstbestand) te wissen? Zo ja, iemand die mij
>> >> > > > >kan verder helpen(VB6)?
>> >> > > > >
>> >> > > > >Alvast bedankt,
>> >> > > > >
>> >> > > > >Cliff.
>> >> > > > >
>> >> > > > bajaat joeng, je delete de file en je creeert 'm opnieuw en
>> >> > > > alles is weg
>> >> > > >
>> >> > > >
>> >> > > >
>> >> > > Nadeel is wel dat de Creation Date of het bestand dan ook
>> >> > > aangepast
>> >> wordt,
>> >> > > je kan het ook op deze manier doen:
>> >> > >
>> >> > > Dim f As Integer
>> >> > >     f = FreeFile
>> >> > >     Open "C:\Bestand.txt" For Output As #f Close #f
>> >> > >
>> >> > >
>> >> > >
>> >> > Nadeel is wel dat de Creation Date *VAN* het bestand dan ook
> aangepast
>> >> wordt
>> >> >
>> >> >
>> >> >
>> >> En waarom is dat een nadeel?
>> >> Ben nog nooit geinteresseerd geweest in de creation date, iedere file
>> > wordt
>> >> wel ne keer gecreeerd en vanaf
>> >> dan wordt die gewijzigd en dat vind ik veel interessanter.  :-)
>> >>
>> >> --
>> >>
>> >> MaG
>> >>
>> >>
>> >>
>> >>
>>
>> Die horizontale schuifbalk.... ik heb daar ook ooit (lang geleden) op
> gevloekt
>> Als ik me niet vergis is dat ergens een property dat je moet instellen
>> in design time ... moet van iets de breedte invullen of zo ... Heb geen
>> vb hier op pc staan dus kan niet testen en / of zoeken... tzou kunnen
>> dat dit compleet ni klopt...ma doorloop toch 'ns al de properties van
>> die richtextbox en kijk of er iets zou kunnen kloppen aan mijn
>> beschrijving
>>
>>
>> mvg sotto
>>
>>


heb ff visualbasic vastgepakt...
't is .rightmargin waar ik aan dacht
als ik me niet vergis is dat een breedte in twips uitgedrukt...dus niet
aantal karakters...
anyway... als ge die op een grote eenheid instelt doet het wel wat er
verondersteld wordt van te doen...
Vraag me niet naar de logica hierachter...


Zwier een richtextbox op uw form,
zet scrollbars-property op rtfBoth
en kopieer ff deze code:

private sub form_load()
dim i as integer, j as integer, x as string
me.richtextbox1.rightmargin = 5555555
for j = 1 to 20
  for i = 1 to 80
    x = x & "qsfd "
  next i
  x = x & vbcrlf
next j
me.richtextbox1.text=x
end sub