From ???@??? Sun Apr 26 13:44:13 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ySlds-00MuZXC>; Fri, 24 Apr 1998 18:48:04 +0200 (MEST)
Received: from TNG.linux.net.eu.org (startrek.de.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA03405;
	Fri, 24 Apr 1998 17:57:14 +0200
Received: from linux.net.eu.org (startrek.de.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C1A39F7; Thu, 23 Apr 1998 17:44:12 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <353F7DEC.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 24 Apr 1998 09:44:34 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Save Bitmap...
X-UIDL: df8526f45192a4ec5ab8601212a28e5b

* List: gfabasic@linux.net.eu.org

I think this might be in the  Sjouke Hamstra book. Not sure. Perhaps Sjouke
will pick up on this. It would be a good routine for the GFAWHE,LP file.

Take care
Dale Bryant

-----Original Message-----

>
>Hi,
>I'm searching a fast code to save (RLE)-bitmaps to disk (it will be used
>for a calendar which is seen on the desktop and have to be updated
>regularely)
>I got code which includes the following lines, but the call in lines (1)
>and (2) are taking some time (each around 0,4 seconds on my computer
>with 1024x768x24Bit). For me it looks like (1) just do the same thing
>like (2), but just for calculating the needed space where to put it into
>the memory. Has anyone an idea how to reduce the hole story into one
>time consuming line ?
>
>- Michael
>
>    :
>    :
>    a% = GetDIBits(_DC(),bmp&,0,height&,0,pinfo%,DIB_RGB_COLORS)   '(1)
>    colu% = {pinfo% + 36}
>    coli% = {pinfo% + 32}
>    IF colu% = 0 && bitpp& <= 8
>      {pinfo% + 32} = 1 << bitpp&
>      {pinfo% + 36} = 1 << bitpp&
>      colu% = {pinfo% + 36}
>    ENDIF
>    IF a%                   //no error
>      qq% = {pinfo% + 20}
>      buf% = MALLOC(qq%)
>      IF buf%
>        a% = GetDIBits(_DC(),bmp&,0,height&,buf%,pinfo%,DIB_RGB_COLORS)
> '(2)
>        //b%=SetDIBitsToDevice(dc&,dx&,dy&,width&,height&,0,0,0,height&,
>buf%,pinfo%,DIB_RGB_COLORS)
>        :
>        :
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 24 17:56:17 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ySk7b-00Mu4HC>; Fri, 24 Apr 1998 17:10:39 +0200 (MEST)
Received: from TNG.linux.net.eu.org (startrek.de.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA02033;
	Fri, 24 Apr 1998 16:19:43 +0200
Received: from linux.net.eu.org (startrek.de.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 570F63023B; Thu, 23 Apr 1998 16:05:27 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <353F66C7.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 22 Apr 1998 17:09:14 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Save Bitmap...
X-UIDL: df4d8c045f6903c77f7ce896e87a9089

* List: gfabasic@linux.net.eu.org

Hi,
I'm searching a fast code to save (RLE)-bitmaps to disk (it will be used
for a calendar which is seen on the desktop and have to be updated
regularely)
I got code which includes the following lines, but the call in lines (1)
and (2) are taking some time (each around 0,4 seconds on my computer
with 1024x768x24Bit). For me it looks like (1) just do the same thing
like (2), but just for calculating the needed space where to put it into
the memory. Has anyone an idea how to reduce the hole story into one
time consuming line ?

- Michael

    :
    :
    a% = GetDIBits(_DC(),bmp&,0,height&,0,pinfo%,DIB_RGB_COLORS)   '(1)
    colu% = {pinfo% + 36}
    coli% = {pinfo% + 32}
    IF colu% = 0 && bitpp& <= 8
      {pinfo% + 32} = 1 << bitpp&
      {pinfo% + 36} = 1 << bitpp&
      colu% = {pinfo% + 36}
    ENDIF
    IF a%                   //no error
      qq% = {pinfo% + 20}
      buf% = MALLOC(qq%)
      IF buf%
        a% = GetDIBits(_DC(),bmp&,0,height&,buf%,pinfo%,DIB_RGB_COLORS)
 '(2)
        //b%=SetDIBitsToDevice(dc&,dx&,dy&,width&,height&,0,0,0,height&,
buf%,pinfo%,DIB_RGB_COLORS)
        :
        :


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:14 1998
Return-Path: <OLuettcke@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ySlmf-00MucEC>; Fri, 24 Apr 1998 18:57:09 +0200 (MEST)
Received: from TNG.linux.net.eu.org (startrek.de.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA03547;
	Fri, 24 Apr 1998 18:06:42 +0200
Received: from linux.net.eu.org (startrek.de.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5CAAE8; Thu, 23 Apr 1998 17:54:03 +0000 (???)
From: OLuettcke <OLuettcke@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <353F803C.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 23 Apr 1998 21:54:07 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=ISO-8859-1

X-Mailer: Windows AOL sub 66
Subject: [GFA] LOADING BITMAPS FROM  _INSTANCE
X-UIDL: bd5f70baf2a527bfdd9de04e0dc11eec

* List: gfabasic@linux.net.eu.org

Hi ,

for an e-mail-greeting I want to develop an slideshow with photos of my
family.
So I scannend some photos and compiled them (with Borland Workshop) in a RES
file.
Then I compiled all in a *.exe (GFA Compiler Version 1.07W).
The slideshow works very good , but only on my PC ! (Win 95)
At other machines the pictures are not good .The colours dont be like as in
original picture .
I tested the program at Windows 3.x and Win 95 with the same result .
With following two lines I load and display the pictures :

  bmp& = LoadBitmap(_INSTANCE,adr_bm$+CHR$(0))
and then
  PUT (BILDBREITE&-Breite&)/2,(BILDHOEHE&-Hoehe&)/2,bmp&,SRCCOPY

I dont know , where the problem is !
I suspect , that I must load a new palette to display the bitmaps correctly.
But how ?

Thanks for every hint !                   Olaf
OLuettcke@AOL.COM

Sorry , bad english ....
________________________________________________________________


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:16 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ySm17-00MufjC>; Fri, 24 Apr 1998 19:12:05 +0200 (MEST)
Received: from TNG.linux.net.eu.org (startrek.de.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA03850;
	Fri, 24 Apr 1998 18:21:46 +0200
Received: from linux.net.eu.org (startrek.de.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C58617B; Thu, 23 Apr 1998 18:08:40 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <353F83A8.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 22 Apr 1998 20:33:18 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: be5322c0f6b1993ac06748723cbdeb13

* List: gfabasic@linux.net.eu.org

<< It looks like your LB_SETITEMHEIGHT is a l% instead of a w&---API calls are
really finicky about how many bytes long each parameter is, since they have no
concept of comma separation >>

Hi Bob,

I was aware of the proper syntax and originally used it.  In a "frustrated"
attempt to figure out what was wrong I tried using LONG instead of WORD
parameters in various locations and inadvertantly copied one of those attempts
to my post as my code segment example.  In other words, using
LB_SETITEMHEIGHT& and LB_GETITEMHEIGHT& (as one should) does not make a
difference ... the APIs still return a 0 height and do nothing to the text
height in the listbox.  There must be some other reason why the SENDMESSAGE
API isn't working in this case.
 
>> Peu a peu means what? <<

"little by little" and you know more french than I do!

James Schumacher
Millennium Software
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:17 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ySmhS-00MubJC>; Fri, 24 Apr 1998 19:55:50 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA00924;
	Fri, 24 Apr 1998 18:59:39 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571CC6B44E; Thu, 23 Apr 1998 18:44:08 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <353F8BF8.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 23 Apr 1998 10:30:17 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] w95 help files
X-UIDL: 6d16933e419320d7d51c7066382e5ca1

* List: gfabasic@linux.net.eu.org

Does anyone have any experience with Windows 95 help files?  I think the
compiled file has the extension of HHM but am not sure.  Also, how to call
the HHM file from GFA would be appreciated.
Dale Bryant

http://ourworld.compuserve.com/homepages/adbryant/index.htm





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:18 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ySpeV-00MubSC>; Fri, 24 Apr 1998 23:04:59 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA03750;
	Fri, 24 Apr 1998 22:09:11 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C508F0B; Thu, 23 Apr 1998 22:02:22 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <353FBA6E.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAA6468
          for <gfabasic@linux.net.eu.org>; Fri, 24 Apr 1998 21:03:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Fri, 24 Apr 1998 21:03:51 +0000
Subject: [GFA] Re: [GFA] LOADING BITMAPS FROM  _INSTANCE
X-UIDL: 6c4310d4dfa8c32a2d627a4d15486f14

* List: gfabasic@linux.net.eu.org

check color resolution of subject comuters.  Also check if compiled w/ v1.07
- w/ coprocessor.  That seems to not work on 386s w/o coprocessors.
<G>
TomR.


At 09:54 PM 23/04/98 EDT, you wrote:
>* List: gfabasic@linux.net.eu.org
>
>Hi ,
>
>for an e-mail-greeting I want to develop an slideshow with photos of my
>family.
>So I scannend some photos and compiled them (with Borland Workshop) in a RES
>file.
>Then I compiled all in a *.exe (GFA Compiler Version 1.07W).
>The slideshow works very good , but only on my PC ! (Win 95)
>At other machines the pictures are not good .The colours dont be like as in
>original picture .
>I tested the program at Windows 3.x and Win 95 with the same result .
>With following two lines I load and display the pictures :
>
>  bmp& = LoadBitmap(_INSTANCE,adr_bm$+CHR$(0))
>and then
>  PUT (BILDBREITE&-Breite&)/2,(BILDHOEHE&-Hoehe&)/2,bmp&,SRCCOPY
>
>I dont know , where the problem is !
>I suspect , that I must load a new palette to display the bitmaps correctly.
>But how ?
>
>Thanks for every hint !                   Olaf
>OLuettcke@AOL.COM
>
>Sorry , bad english ....
>________________________________________________________________
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:20 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ySqii-00MuZkC>; Sat, 25 Apr 1998 00:13:24 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA04286;
	Fri, 24 Apr 1998 23:17:05 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C53ED1F; Thu, 23 Apr 1998 23:10:16 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <353FCA58.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 23 Apr 1998 16:05:03 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] GFA32
X-UIDL: 0e1d6f91e1887aabbbb846d218b9ac11

* List: gfabasic@linux.net.eu.org

Has anyone seen a beta copy of GFA32. Someone hinted that it might be
available

http://ourworld.compuserve.com/homepages/adbryant/index.htm





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:21 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0ySzQu-00MubSC>; Sat, 25 Apr 1998 09:31:36 +0200 (MEST)
Received: from shodan.in-trier.de([198.22.51.3]) (4016 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <recbo@erols.com>) 
	id <m0ySxrK-000EFmC@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Sat, 25 Apr 1998 07:50:46 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #3 built 1998-Mar-25)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id GAA06163;
	Sat, 25 Apr 1998 06:51:59 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5BF022; Fri, 24 Apr 1998 06:45:09 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354034F5.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 01:44:28 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <353F7DEC.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Re: [GFA] Save Bitmap...
X-UIDL: 5106aeb28d486fee2828f0c14c9300d6

* List: gfabasic@linux.net.eu.org

Is that from a GFA example file called savebmp.lst?

It's hard to beat the speed of API calls, if what you're saying is that
getdibits/setdibits is where you're seeing a slowdown. What's slow about those
calls is that you're using compression(RLE) and calling for 32-bits of color
info.

There is another way to get a bitmap, which is to get a non-compressed 256
color bitmap with palette, and throw the palette away. Actually store one
palette, and use it for all windows where bitmaps are blitted to.

Further, if your bitmaps are drawn in 16 nice colors or less FROM a 256 color
palette, you can compress the bitmap bytes(expressing 256 colors) to 4-bits per
pixel instead of 8. 4-bits indexes into the list of 16 colors from the 256
color palette. This works for images more graphical than photorealistic, such
as toolbar icons.

I wrote gfa code to get 256 color bitmaps and palette and store them in source,
with the nasty chars aliased, and using compression. That worked, so I started
working on the compression. I got better compression, but may have ruined the
original code, and haven't finished the next generation utilities.

--Bob

Dale Bryant wrote:

> * List: gfabasic@linux.net.eu.org
>
> I think this might be in the  Sjouke Hamstra book. Not sure. Perhaps Sjouke
> will pick up on this. It would be a good routine for the GFAWHE,LP file.
>
> Take care
> Dale Bryant
>
> -----Original Message-----
>
> >
> >Hi,
> >I'm searching a fast code to save (RLE)-bitmaps to disk (it will be used
> >for a calendar which is seen on the desktop and have to be updated
> >regularely)
> >I got code which includes the following lines, but the call in lines (1)
> >and (2) are taking some time (each around 0,4 seconds on my computer
> >with 1024x768x24Bit). For me it looks like (1) just do the same thing
> >like (2), but just for calculating the needed space where to put it into
> >the memory. Has anyone an idea how to reduce the hole story into one
> >time consuming line ?
> >
> >- Michael
> >
> >    :
> >    :
> >    a% = GetDIBits(_DC(),bmp&,0,height&,0,pinfo%,DIB_RGB_COLORS)   '(1)
> >    colu% = {pinfo% + 36}
> >    coli% = {pinfo% + 32}
> >    IF colu% = 0 && bitpp& <= 8
> >      {pinfo% + 32} = 1 << bitpp&
> >      {pinfo% + 36} = 1 << bitpp&
> >      colu% = {pinfo% + 36}
> >    ENDIF
> >    IF a%                   //no error
> >      qq% = {pinfo% + 20}
> >      buf% = MALLOC(qq%)
> >      IF buf%
> >        a% = GetDIBits(_DC(),bmp&,0,height&,buf%,pinfo%,DIB_RGB_COLORS)
> > '(2)
> >        //b%=SetDIBitsToDevice(dc&,dx&,dy&,width&,height&,0,0,0,height&,
> >buf%,pinfo%,DIB_RGB_COLORS)
> >        :
> >        :
> >
> >
> >---
> >This mailing list is currently running BeroList v2.5.6
> >Report problems to bero@bero-online.ml.org
> >
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:23 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0ySzRQ-00MuIWC>; Sat, 25 Apr 1998 09:32:08 +0200 (MEST)
Received: from shodan.in-trier.de([198.22.51.3]) (3006 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <recbo@erols.com>) 
	id <m0ySy2y-000EHEC@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Sat, 25 Apr 1998 08:02:48 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #3 built 1998-Mar-25)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA11790;
	Sat, 25 Apr 1998 07:04:11 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5BC397; Fri, 24 Apr 1998 06:57:28 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354037D8.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 01:57:29 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <353F83A8.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: b74e0fe488d7d18c53fed401bb3a038e

* List: gfabasic@linux.net.eu.org

James,

SendMessage is the nice way. Using API commands to directly change things in the
Type struct of the window is nasty if sendmessage works. In a case like this there
is no direct API command, so you would have to make one. It would getwindowlong,
go into the struct at that pointer, and change the value. Nasty! It works in
Win16, but more and more the paradigm is COM(SendMessage), direct memory access
across process lines. Of course there is no standard format to the type structs
used by various widgets, but you are dealing with one for which you might be able
to find the struct layout for. It's one that's probably defined in the C++ code
pasted in by Visual C++, so you could look at it and figure out where to peek and
poke. Is it worth it?

--Bob

Peu a peu wrote:

> * List: gfabasic@linux.net.eu.org
>
> << It looks like your LB_SETITEMHEIGHT is a l% instead of a w&---API calls are
> really finicky about how many bytes long each parameter is, since they have no
> concept of comma separation >>
>
> Hi Bob,
>
> I was aware of the proper syntax and originally used it.  In a "frustrated"
> attempt to figure out what was wrong I tried using LONG instead of WORD
> parameters in various locations and inadvertantly copied one of those attempts
> to my post as my code segment example.  In other words, using
> LB_SETITEMHEIGHT& and LB_GETITEMHEIGHT& (as one should) does not make a
> difference ... the APIs still return a 0 height and do nothing to the text
> height in the listbox.  There must be some other reason why the SENDMESSAGE
> API isn't working in this case.
>
> >> Peu a peu means what? <<
>
> "little by little" and you know more french than I do!
>
> James Schumacher
> Millennium Software
> peuapeu@aol.com
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:25 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0ySzRZ-00MuaiC>; Sat, 25 Apr 1998 09:32:17 +0200 (MEST)
Received: from shodan.in-trier.de([198.22.51.3]) (2560 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <recbo@erols.com>) 
	id <m0ySyB4-000EHxC@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Sat, 25 Apr 1998 08:11:10 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #3 built 1998-Mar-25)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA15005;
	Sat, 25 Apr 1998 07:12:13 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C59E35E; Fri, 24 Apr 1998 07:05:36 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354039C0.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 02:05:32 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <353F83A8.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: d6e3209ae7b9595fb464c3d793498596

* List: gfabasic@linux.net.eu.org

>From QUE Windows 3.1 Programmer's Ref:

LB_SETITEMHEIGHT

wParam   the index of the item if LBS_OWNERDRAWVARIABLE style, otherwise 0

lParam    specifies the height, in pixels, of the item

If ownerdrawstyle, sets height of item, if not, sets height of all items in list.

LB_ERR is returned when unsuccessful

--Bob

Peu a peu wrote:

> * List: gfabasic@linux.net.eu.org
>
> << It looks like your LB_SETITEMHEIGHT is a l% instead of a w&---API calls are
> really finicky about how many bytes long each parameter is, since they have no
> concept of comma separation >>
>
> Hi Bob,
>
> I was aware of the proper syntax and originally used it.  In a "frustrated"
> attempt to figure out what was wrong I tried using LONG instead of WORD
> parameters in various locations and inadvertantly copied one of those attempts
> to my post as my code segment example.  In other words, using
> LB_SETITEMHEIGHT& and LB_GETITEMHEIGHT& (as one should) does not make a
> difference ... the APIs still return a 0 height and do nothing to the text
> height in the listbox.  There must be some other reason why the SENDMESSAGE
> API isn't working in this case.
>
> >> Peu a peu means what? <<
>
> "little by little" and you know more french than I do!
>
> James Schumacher
> Millennium Software
> peuapeu@aol.com
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:27 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ySzvK-00Mk02C>; Sat, 25 Apr 1998 10:03:02 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA15376;
	Sat, 25 Apr 1998 09:02:48 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5C15AF; Fri, 24 Apr 1998 08:55:50 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35405396.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 03:56:58 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: da101e87394b910ae7b9c28ea45e5d49

* List: gfabasic@linux.net.eu.org

<< wParam   the index of the item if LBS_OWNERDRAWVARIABLE, otherwise 0
     lParam    specifies the height, in pixels, of the item >>

Bob,

It's still not working.  Here is the short program I'm using to debug this
problem.  Anyone else see why the SENDMESSAGE API is not working as
advertised?  I've tried all sorts of combinations of SENDMESSAGE parameters
without success.

OPENW #1
SizeOfFont& = 30
SETFONT SYSTEM_FONT
FONT HEIGHT SizeOfFont&
FONT TO FntHandle&
SETFONT FntHandle&
LBWidth& = 300
LBHeight& = 300
style% = LBS_HASSTRINGS | WS_VISIBLE | WS_CHILD | WS_BORDER | LBS_NOTIFY
hLB& = FN
myCreateWindow("LISTBOX","",style%,0,0,LBWidth&,LBHeight&,WIN(WIN()),0,_INSTAN
CE,0)
~SendMessage(hLB&,WM_SETFONT,FntHandle&,0)
'
tmp$ = "Test String" + CHR$(0)
~SendMessage(hLB&,LB_ADDSTRING,0,V:tmp$)
'
LB_SETITEMHEIGHT& = $01A0 //416
LB_GETITEMHEIGHT& = $01A1 //417
LBItemHeight% = 80 //make the text this many pixels high
select& = 0 //select LB entire contents
~SendMessage(hLB&,LB_SETITEMHEIGHT&,select&,LBItemHeight%)
height& = SendMessage(hLB&,LB_GETITEMHEIGHT&,select&,0)
~MessageBox(WIN(WIN()),"height&",STR$(height&),MB_OK)
'
DO
  PEEKEVENT
UNTIL MOUSEK > 0 //mouse clicked
'
SETFONT SYSTEM_FONT
FREEFONT FntHandle&
CLOSEW #1
'
FUNCTION
myCreateWindow(classname$,windowname$,style%,X&,Y&,width&,height&,hWndParent&,
hMenu&,hInst&,lpvParam%)
  classname$ = classname$ + CHR$(0) //must be null terminated
  windowname$ = windowname$ + CHR$(0) //must be null terminated
  RETURN
CreateWindow(V:classname$,V:windowname$,style%,X&,Y&,width&,height&,hWndParent
&,hMenu&,hInst&,lpvParam%)
ENDFUNC

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:28 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yT0EH-00MuIWC>; Sat, 25 Apr 1998 10:22:37 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA15495;
	Sat, 25 Apr 1998 09:20:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5D4DFA; Fri, 24 Apr 1998 09:14:04 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354057DD.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 04:15:24 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] [GFA] LOADING BITMAPS FROM  _INSTANCE
X-UIDL: b316cc57110a2a99a60a18fce4df46a2

* List: gfabasic@linux.net.eu.org

Message text written by INTERNET:gfabasic@linux.net.eu.org

>  bmp& = LoadBitmap(_INSTANCE,adr_bm$+CHR$(0))<

Using LoadBitmap() converts a DIB (device independant bitmap) to a DDB
(device dependant bitmap) so any color information is lost; unless the
target computer is running with high colour or greater.

Here's one way to do it;


$LNK RES "d:\leo.res"

// load bitmaps from DLL

@MakeStructures()
t$="Loader for Bitmaps stored in DLL's"
TITLEW #1,t$
OPENW #1,0,0,_X / 6 * 3,_Y / 4 * 3, ~15
@CreateMenu()

ON MENU GOSUB HandleMenu
ON MENU MESSAGE GOSUB MessageHandler
CB -1,0 TO -1,HandleCallBackMess()

DO
  SLEEP
UNTIL MENU(1) = 4
CLOSEW #1
EDIT
PROCEDURE MessageHandler()
 
'==========================================================================
===
  ' Can pick up _Mess (message&)
  '             _Wparam (wparam&)
  '             _Lparam (lparam%)
 
'==========================================================================
===
  SWITCH _Mess
  CASE WM_PAINT
    PUT 0,0,hBitmap&
  ENDSWITCH
RETURN
PROCEDURE HandleMenu()
  SWITCH MENU(0)
  CASE 1
    ret% = @LoadDIB(_DC(1), "BITMAP_1")
    hBitmap& = LOWORD(ret%)
    hpal& = HIWORD(ret%)
    PUT 0,0,hBitmap&

  CASE 2
    @SizeBitmap()
  CASE 3
    @NumColours()
  CASE 4
    @SizeByte()
  CASE 5
    POSTMESSAGE _winId, WM_CLOSE, 0, 0
  ENDSWITCH
RETURN
PROCEDURE CreateMenu()
  LOCAL i&
  DIM m$(20)
  FOR i& = 0 TO 20
    READ m$(i&)
    EXIT IF m$(i&) = "*/"
  NEXT i&
  m$(i&)=""
  MENU m$()
  DATA Test Picture, Leo, SizeBmp, NumCols, SizeByte, Exit,*/
RETURN
PROCEDURE HandleCallBackMess(hWnd&,message&,wparam&,lparam%)
  SWITCH message&
  CASE WM_PALETTECHANGED
    IF wparam& != hWnd&
      ~RealizePalette(_DC(1))
      ~UpdateColors(_DC(1))
      RETVAL 1
    ENDIF
  CASE WM_QUERYNEWPALETTE
    ~SelectPalette(_DC(1),hpal&,FALSE)
    IF ~RealizePalette(_DC(1)) THEN ~InvalidateRect(hWnd&,NULL,TRUE)
  ENDSWITCH
RETURN
FUNCTION LoadDIB(hdc&, adBmName$)
  LOCAL numColour&, pRgb%, hBmpData&, lpBmpData%, lpBits%, ret%
  adBmName$ = adBmName$ + CHR$(0)

  '==============================================================
  ' Load resource and lock it.
  '==============================================================

  hBmpData& = LoadResource(_INSTANCE, FindResource(_INSTANCE, adBmName$,
RT_BITMAP))
  lpBmpData% = LockResource(hBmpData&)

  '==============================================================
  ' Indirection is used to access values from bitmap data
  ' already in memory. Get the number of colours used in DIB.
  ' biClrUsed is used by GFA for size (byte/word/long) and as a pointer.
  '==============================================================

  numColour&       = {lpBmpData%}.biClrUsed
  bmih.biWidth     = {lpBmpData%}.biWidth
  bmih.biHeight    = {lpBmpData%}.biHeight
  bmih.biClrUsed   = {lpBmpData%}.biClrUsed
  bmih.biSizeImage = {lpBmpData%}.biSizeImage

  '======================================================
  ' Create palette: Copy the palette entries from the
  ' DIB color table and create a logical color palette.
  '======================================================

  pRgb% = lpBmpData% + {lpBmpData%}.biSize
  pal% = MALLOC(LEN(LOGPALETTE:) + numColour& * LEN(PALETTEENTRY:))
  {pal%}.palVersion = &H300
  {pal%}.palNumEntries = numColour&
  FOR t% = 0 TO PRED(numColour&)
    {pal% + 4 + t% * 4}.peRed   = {pRgb% + t% * 4}.rgbRed
    {pal% + 4 + t% * 4}.peGreen = {pRgb% + t% * 4}.rgbGreen
    {pal% + 4 + t% * 4}.peBlue  = {pRgb% + t% * 4}.rgbBlue
    {pal% + 4 + t% * 4}.peFlags = 0
  NEXT t%

  hpal& = CreatePalette(pal%)

  '======================================================
  ' Create device dependent bitmap. Call ~SelectPalette()
  ' and ~RealisePalette() before ~CreateDIBitmap()
  '======================================================
  ~SelectPalette(hdc&,hpal&,FALSE)
  ~RealizePalette(hdc&)
  lpBits% = lpBmpData% + {lpBmpData%}.biSize + numColour& * LEN(RGBQUAD:)
  hBitmap& = CreateDIBitmap(hdc&, lpBmpData%, CBM_INIT, lpBits%,
lpBmpData%, DIB_RGB_COLORS)

  '======================================================
  ' Cleanup a bit
  '======================================================
  CARD{V:ret%}   = hBitmap&
  CARD{V:ret% + 2} = hpal&

  ende:

  ~UnlockResource(hBmpData&)
  ~FreeResource(hBmpData&)

  RETURN ret%

ENDFUNC
PROCEDURE FreeDIB(hBitmap&, hpal&)
  ~DeleteObject(hBitmap&)
  ~DeleteObject(hpal&)
  ~MFREE(pal%)
RETURN
PROCEDURE SizeBitmap()
  ~MessageBox(WIN(1), " Width " + DEC$(bmih.biWidth) + " Height " +
DEC$(bmih.biHeight),"Info...",IDOK)
RETURN
PROCEDURE NumColours()
  ~MessageBox(WIN(1), " NumColours " + DEC$(bmih.biClrUsed),"Info...",
IDOK)
RETURN
PROCEDURE SizeByte()
  ~MessageBox(WIN(1), " SizeByte " + DEC$(bmih.biSizeImage),"Info...",IDOK)
RETURN
PROCEDURE MakeStructures()
  '======================================================
  ' Need these structures for some of the code to work!
  '======================================================
  hBitmap& = 0, hpal& = 0 // Globals
  mystr$  = SPACE$(100)
  mystr1$ = SPACE$(100)

  TYPE RECT:
  - WORD left
  - WORD top
  - WORD right
  - WORD bottom
  ENDTYPE
  RECT: rect.

  TYPE BITMAPINFOHEADER: '40 bytes
  - LONG biSize
  - LONG biWidth
  - LONG biHeight
  - WORD biPlanes
  - WORD biBitCount
  - LONG biCompression
  - LONG biSizeImage
  - LONG biXPelsPerMeter
  - LONG biYPelsPerMeter
  - LONG biClrUsed
  - LONG biClrImportant
  ENDTYPE
  BITMAPINFOHEADER: bmih.

  TYPE RGBQUAD:
  - BYTE rgbBlue
  - BYTE rgbGreen
  - BYTE rgbRed
  - BYTE rgbReserved
  ENDTYPE

  TYPE PALETTEENTRY:
  - BYTE  peRed
  - BYTE  peGreen
  - BYTE  peBlue
  - BYTE  peFlags
  ENDTYPE

  TYPE LOGPALETTE:
  - WORD palVersion
  - WORD palNumEntries
  ENDTYPE

RETURN
 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:31 1998
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yT0Nr-00MuOvC>; Sat, 25 Apr 1998 10:32:31 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA15614;
	Sat, 25 Apr 1998 09:33:17 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5D4247; Fri, 24 Apr 1998 09:26:28 +0000 (???)
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35405AC5.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
X-Sender: michael@bonbit.org
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Fri, 24 Apr 1998 22:36:28 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] Program in Win 95 taskbar?
X-UIDL: 7ac0f3ccb1d3800f561c549c4425c432

* List: gfabasic@linux.net.eu.org

Hi there!

I want to add a feature to my program: It should appear in the taskbar, I
think the area is called systray. I have found a short C listing, but my C
knowledge is not that good for transferring it to GFA. I hope it is not too
long to post it to the list.

Is there a chance to concvert it into GFA basic?


M!chael


--- cut here ---

/*
 * Taskbar-Icon unter Win 95
 */

#define WIN32_LEAN_AND_MEAN 1

#include <windows.h>
#include <shellapi.h>

#define WM_ICONNOTIFY WM_USER

static const char szTaskIconMutexName  [] = "TaskIcon95I/R)PPHp@MiMies";
// eindeutigen String oder gar eine GUID nehmen

static const char szAppName  [] = "TaskIcon95";
static HICON hActiveIcon;
static HINSTANCE hInst;
static HWND      hWindow;
static NOTIFYICONDATA NotifyData;


// =================================================================
// HAUPTFENSTER
// =================================================================

LRESULT CALLBACK MainWndProc (HWND   hWnd,
                              UINT   uMsg,
                              WPARAM wParam,
                              LPARAM lParam)
    {
    static BOOL bInDoubleClick = FALSE;
    
    switch (uMsg)
        {
        case WM_CREATE:
            if (! (hActiveIcon = LoadIcon(hInst, "ActiveIcon"))) {
                MessageBox(hWnd, "Icon nicht gefunden, Programm fehlerhaft",
szAppName, MB_ICONSTOP);
                PostMessage(hWnd, WM_DESTROY, 0, 0);
            }

            NotifyData.cbSize = sizeof(NotifyData);
            NotifyData.hWnd = hWnd;
            NotifyData.uFlags = NIF_ICON | NIF_MESSAGE | NIF_TIP;
            NotifyData.uCallbackMessage = WM_ICONNOTIFY;
            NotifyData.hIcon = hActiveIcon;
            lstrcpy(NotifyData.szTip, szAppName);
            NotifyData.uID = 0;
            Shell_NotifyIcon(NIM_ADD, &NotifyData);
            return 0;
            
        case WM_ICONNOTIFY:
            if (wParam == NotifyData.uID) {
                switch (lParam) {
                case WM_LBUTTONDBLCLK:
                case WM_LBUTTONDOWN:
                    SetForegroundWindow(hWnd);
                    if (bInDoubleClick) {
                        MessageBeep(MB_ICONINFORMATION);
                        break;
                    }
                    bInDoubleClick = TRUE;
                    MessageBox(hWnd, "Hallo vom TaskIcon", "TaskIcon95",
MB_ICONINFORMATION);
                    bInDoubleClick = FALSE;
                    break;
                case WM_RBUTTONDBLCLK:
                    PostMessage(hWnd, WM_DESTROY, 0, 0); // beende Programm
                    break;
                } // switch (lParam)
            } // if (wParam == NotifyData.uID)
            return 0;

        case WM_DESTROY:
            Shell_NotifyIcon(NIM_DELETE, &NotifyData);
            PostQuitMessage (0);
            return (LRESULT) 0;
        }
    return DefWindowProc (hWnd, uMsg, wParam, lParam);
    }

// =================================================================
// HAUPTPROGRAMM
// =================================================================

HWND CreateMainWindow (HINSTANCE hInstance,
                       PWNDCLASS pWndClass)
    {
    HWND hWndMain = NULL;

    pWndClass->style         = CS_HREDRAW | CS_VREDRAW;
    pWndClass->lpfnWndProc   = MainWndProc;
    pWndClass->cbClsExtra    = 0;
    pWndClass->cbWndExtra    = 0;
    pWndClass->hInstance     = hInstance;
    pWndClass->hIcon         = LoadIcon (NULL, IDI_APPLICATION);
    pWndClass->hCursor       = LoadCursor (NULL, IDC_ARROW);
    pWndClass->lpszMenuName  = NULL;
    pWndClass->lpszClassName = szAppName;
    pWndClass->hbrBackground = GetStockObject(WHITE_BRUSH);

    if (RegisterClass (pWndClass))
        {
        hWndMain = CreateWindow (szAppName,
                                 szAppName,
                                 WS_OVERLAPPEDWINDOW,
                                 CW_USEDEFAULT,
                                 CW_USEDEFAULT,
                                 CW_USEDEFAULT,
                                 CW_USEDEFAULT,
                                 NULL,
                                 NULL,
                                 hInstance,
                                 NULL);
        }    
    return hWndMain;
    }

// -----------------------------------------------------------------

HWND InitInstance (HINSTANCE hInstance,
                   int       iCmdShow,
                   PWNDCLASS pWndClass)
    {
    HWND hWndMain;
    
    hWndMain = CreateMainWindow (hInstance, pWndClass);
    return hWndMain;
    }

// -----------------------------------------------------------------

int WINAPI WinMain (HINSTANCE hInstance,
                    HINSTANCE hPrevInstance,
                    LPSTR     lpCmdLine,
                    int       nShowCmd)
    {
    WNDCLASS WndClass;
    MSG      Msg;
    HANDLE   hMutex;

    hInst      = hInstance;
    Msg.wParam = 0;

    hMutex = CreateMutex(NULL, TRUE, szTaskIconMutexName);
    if (hMutex == 0 || GetLastError() == ERROR_ALREADY_EXISTS)
        return -1;
        
    if (NULL != (hWindow = InitInstance (hInstance, nShowCmd, &WndClass)))
        while (GetMessage (&Msg, NULL, 0, 0))
            {
            TranslateMessage (&Msg);
            DispatchMessage (&Msg);
            }
    ReleaseMutex(hMutex);
    CloseHandle(hMutex);
    return Msg.wParam;
    }

// =================================================================
// PROGRAMMENDE
// =================================================================



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:33 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yT0l1-00MuaJC>; Sat, 25 Apr 1998 10:56:27 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA15774;
	Sat, 25 Apr 1998 09:54:40 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5BDA39; Fri, 24 Apr 1998 09:47:47 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35405FC3.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 04:49:00 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: bfd8a62440d5be957d15c96d2a3972ad

* List: gfabasic@linux.net.eu.org

Message text written by INTERNET:gfabasic@linux.net.eu.org

>It's still not working.  Here is the short program I'm using to debug this
problem.  Anyone else see why the SENDMESSAGE API is not working as
advertised?  I've tried all sorts of combinations of SENDMESSAGE parameters
without success.
<

I've not done what you are trying but the SDK says about LB_GETITEMHEIGHT; 

This parameter is used only if the list box has the LBS_OWNERDRAWVARIABLE
style; otherwise, it should be set to zero. 


Regards,

John Findlay

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:35 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yT1SH-00MuNYC>; Sat, 25 Apr 1998 11:41:09 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA15998;
	Sat, 25 Apr 1998 10:38:44 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C52EFDF; Fri, 24 Apr 1998 10:31:12 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354069F0.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 05:31:02 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <35405396.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: 5ed5c6940050caf7c699eeac1f937ede

* List: gfabasic@linux.net.eu.org

I agree that you're doing everything. Try using a dummy variable instead of zero
everywhere you are using an API command, such as SendMessage(). I've found that
lots of API commands only take variables, never literals.

Other than that, I would start researching the struct that you could get a pointer
to with GetWindowLong, so you could set up a type struct to read from it and write
to it.

--Bob

Peu a peu wrote:

> * List: gfabasic@linux.net.eu.org
>
> << wParam   the index of the item if LBS_OWNERDRAWVARIABLE, otherwise 0
>      lParam    specifies the height, in pixels, of the item >>
>
> Bob,
>
> It's still not working.  Here is the short program I'm using to debug this
> problem.  Anyone else see why the SENDMESSAGE API is not working as
> advertised?  I've tried all sorts of combinations of SENDMESSAGE parameters
> without success.
>
> OPENW #1
> SizeOfFont& = 30
> SETFONT SYSTEM_FONT
> FONT HEIGHT SizeOfFont&
> FONT TO FntHandle&
> SETFONT FntHandle&
> LBWidth& = 300
> LBHeight& = 300
> style% = LBS_HASSTRINGS | WS_VISIBLE | WS_CHILD | WS_BORDER | LBS_NOTIFY
> hLB& = FN
> myCreateWindow("LISTBOX","",style%,0,0,LBWidth&,LBHeight&,WIN(WIN()),0,_INSTAN
> CE,0)
> ~SendMessage(hLB&,WM_SETFONT,FntHandle&,0)
> '
> tmp$ = "Test String" + CHR$(0)
> ~SendMessage(hLB&,LB_ADDSTRING,0,V:tmp$)
> '
> LB_SETITEMHEIGHT& = $01A0 //416
> LB_GETITEMHEIGHT& = $01A1 //417
> LBItemHeight% = 80 //make the text this many pixels high
> select& = 0 //select LB entire contents
> ~SendMessage(hLB&,LB_SETITEMHEIGHT&,select&,LBItemHeight%)
> height& = SendMessage(hLB&,LB_GETITEMHEIGHT&,select&,0)
> ~MessageBox(WIN(WIN()),"height&",STR$(height&),MB_OK)
> '
> DO
>   PEEKEVENT
> UNTIL MOUSEK > 0 //mouse clicked
> '
> SETFONT SYSTEM_FONT
> FREEFONT FntHandle&
> CLOSEW #1
> '
> FUNCTION
> myCreateWindow(classname$,windowname$,style%,X&,Y&,width&,height&,hWndParent&,
> hMenu&,hInst&,lpvParam%)
>   classname$ = classname$ + CHR$(0) //must be null terminated
>   windowname$ = windowname$ + CHR$(0) //must be null terminated
>   RETURN
> CreateWindow(V:classname$,V:windowname$,style%,X&,Y&,width&,height&,hWndParent
> &,hMenu&,hInst&,lpvParam%)
> ENDFUNC
>
> James Schumacher
> peuapeu@aol.com
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Apr 26 13:44:47 1998
Return-Path: <spot11@bluewin.ch>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yT5oz-00MuaJC>; Sat, 25 Apr 1998 16:20:53 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id PAA17164;
	Sat, 25 Apr 1998 15:24:48 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C504315; Fri, 24 Apr 1998 15:17:44 +0000 (???)
From: "Peter Friedli" <spot11@bluewin.ch>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3540AD18.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 16:04:10 +0200
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] GFA Mailing
X-UIDL: 6b2cbb12d6090b83f9a3f5d21feb0458

This is a multi-part message in MIME format.

------=_NextPart_000_008E_01BD7063.C8D64240
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

From ???@??? Sun Apr 26 13:44:49 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yT6mA-00MubmC>; Sat, 25 Apr 1998 17:22:02 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA17584;
	Sat, 25 Apr 1998 16:20:09 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5B9C07; Fri, 24 Apr 1998 16:13:01 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3540BA0D.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 25 Apr 1998 17:17:11 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] AW: [GFA] Re: [GFA] Re: [GFA] Save Bitmap...
X-UIDL: 44f858d2c81c86680e67a0cc24f36d36

* List: gfabasic@linux.net.eu.org

You are two time right (at least), its from the savebmp.lst and non-RLE
coding is much faster...
But the non compressed files are "nicely" big.
I do not want to find a GFA replacement for the coding itself, but the
slow code is done TWICE and I'm not sure if it's possible to do in with
just one "compression" call.

Maybe it will work with brute force ?!
- Reservating memory of an uncompressed picture
- Calling the GetDIBits to put the compressed picture into that memory
- Free the memory

But who knows ?



>----------
>Von: 	Bob Dodds[SMTP:recbo@erols.com]
>Gesendet: 	Samstag, 25. April 1998 10:44
>An: 	gfabasic@linux.net.eu.org
>Betreff: 	[GFA] Re: [GFA] Re: [GFA] Save Bitmap...
>
>* List: gfabasic@linux.net.eu.org
>
>Is that from a GFA example file called savebmp.lst?
>
>It's hard to beat the speed of API calls, if what you're saying is that
>getdibits/setdibits is where you're seeing a slowdown. What's slow about
>those
>calls is that you're using compression(RLE) and calling for 32-bits of color
>info.
>
>There is another way to get a bitmap, which is to get a non-compressed 256
>color bitmap with palette, and throw the palette away. Actually store one
>palette, and use it for all windows where bitmaps are blitted to.
>
>Further, if your bitmaps are drawn in 16 nice colors or less FROM a 256 color
>palette, you can compress the bitmap bytes(expressing 256 colors) to 4-bits
>per
>pixel instead of 8. 4-bits indexes into the list of 16 colors from the 256
>color palette. This works for images more graphical than photorealistic, such
>as toolbar icons.
>
>I wrote gfa code to get 256 color bitmaps and palette and store them in
>source,
>with the nasty chars aliased, and using compression. That worked, so I
>started
>working on the compression. I got better compression, but may have ruined the
>original code, and haven't finished the next generation utilities.
>
>--Bob
>
>Dale Bryant wrote:
>
>> * List: gfabasic@linux.net.eu.org
>>
>> I think this might be in the  Sjouke Hamstra book. Not sure. Perhaps Sjouke
>> will pick up on this. It would be a good routine for the GFAWHE,LP file.
>>
>> Take care
>> Dale Bryant
>>
>> -----Original Message-----
>>
>> >
>> >Hi,
>> >I'm searching a fast code to save (RLE)-bitmaps to disk (it will be used
>> >for a calendar which is seen on the desktop and have to be updated
>> >regularely)
>> >I got code which includes the following lines, but the call in lines (1)
>> >and (2) are taking some time (each around 0,4 seconds on my computer
>> >with 1024x768x24Bit). For me it looks like (1) just do the same thing
>> >like (2), but just for calculating the needed space where to put it into
>> >the memory. Has anyone an idea how to reduce the hole story into one
>> >time consuming line ?
>> >
>> >- Michael
>> >
>> >    :
>> >    :
>> >    a% = GetDIBits(_DC(),bmp&,0,height&,0,pinfo%,DIB_RGB_COLORS)   '(1)
>> >    colu% = {pinfo% + 36}
>> >    coli% = {pinfo% + 32}
>> >    IF colu% = 0 && bitpp& <= 8
>> >      {pinfo% + 32} = 1 << bitpp&
>> >      {pinfo% + 36} = 1 << bitpp&
>> >      colu% = {pinfo% + 36}
>> >    ENDIF
>> >    IF a%                   //no error
>> >      qq% = {pinfo% + 20}
>> >      buf% = MALLOC(qq%)
>> >      IF buf%
>> >        a% = GetDIBits(_DC(),bmp&,0,height&,buf%,pinfo%,DIB_RGB_COLORS)
>> > '(2)
>> >        //b%=SetDIBitsToDevice(dc&,dx&,dy&,width&,height&,0,0,0,height&,
>> >buf%,pinfo%,DIB_RGB_COLORS)
>> >        :
>> >        :
>> >
>> >
>> >---
>> >This mailing list is currently running BeroList v2.5.6
>> >Report problems to bero@bero-online.ml.org
>> >
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Apr 27 19:05:58 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTVg0-00MuP9C>; Sun, 26 Apr 1998 19:57:20 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA00835;
	Sun, 26 Apr 1998 19:02:05 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5CC73E; Sat, 25 Apr 1998 18:51:47 +0000 (???)
From: Roland <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354230C4.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de (Unverified)
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Sun, 26 Apr 1998 14:09:23 +0000
In-Reply-To: <353F8BF8.BeroList-2.5.6@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Re: [GFA] w95 help files
X-UIDL: 073d99d0a15732c8801cfc39e8a5fb14

* List: gfabasic@linux.net.eu.org

At 10:30 23.04.1998 -0700, you wrote:

>Does anyone have any experience with Windows 95 help files?  I think the
>compiled file has the extension of HHM but am not sure.  Also, how to call
>the HHM file from GFA would be appreciated.

Don't confuse Win95 help files (WinHelp 4) and the "HTML" help.
The "HTML" help is one of the crazy new ideas of Microsoft to
kill competitors.
I made some tests with it and as I remember (?) there is a way
do call an EXE to open such a "HTML help file". But as the normal
way You shall give an own window handle where the help text is to
display (because then you don't have an own task).

I can not test it in this moment because I have deinstalled the
Microsoft Internet explorer - and you need it to display the new
"HTML help".

Roland Walter
Berlin, Germany

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Apr 27 19:05:59 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTXcZ-00MqNcC>; Sun, 26 Apr 1998 22:01:55 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA01810;
	Sun, 26 Apr 1998 21:06:52 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5E073E; Sat, 25 Apr 1998 20:57:52 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35424E51.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 26 Apr 1998 12:57:54 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: 1cea516945b7476791f79f4178b8b87e

* List: gfabasic@linux.net.eu.org

Thanks Roland,
I am aware that the two formats are different. HTML help .chm FILE (compiled
help) and it can be called with the exec command in GFA.  It seems to
display OK but I'm sure the must be a better way of calling HH.EXE.
note. to correct previous message compiled HTML help files have a .CHM
extension

Thanks
Dale

-----Original Message-----
From: Roland <alibaba@zedat.fu-berlin.de>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Sunday, April 26, 1998 10:57 AM
Subject: [GFA] Re: [GFA] w95 help files


>* List: gfabasic@linux.net.eu.org
>
>At 10:30 23.04.1998 -0700, you wrote:
>
>>Does anyone have any experience with Windows 95 help files?  I think the
>>compiled file has the extension of HHM but am not sure.  Also, how to call
>>the HHM file from GFA would be appreciated.
>
>Don't confuse Win95 help files (WinHelp 4) and the "HTML" help.
>The "HTML" help is one of the crazy new ideas of Microsoft to
>kill competitors.
>I made some tests with it and as I remember (?) there is a way
>do call an EXE to open such a "HTML help file". But as the normal
>way You shall give an own window handle where the help text is to
>display (because then you don't have an own task).
>
>I can not test it in this moment because I have deinstalled the
>Microsoft Internet explorer - and you need it to display the new
>"HTML help".
>
>Roland Walter
>Berlin, Germany
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Apr 27 19:06:07 1998
Return-Path: <101.117769@germanynet.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTbdB-00Mu4bC>; Mon, 27 Apr 1998 02:18:49 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id BAA03486;
	Mon, 27 Apr 1998 01:24:07 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5BE765; Sun, 26 Apr 1998 01:15:45 +0000 (???)
From: "Panagiotis Plytas" <101.117769@germanynet.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35428AC1.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 27 Apr 1998 02:15:59 +0200
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Fw: Subscribe
X-UIDL: ba28049fb7f74da92c0f02882252f4c3

This is a multi-part message in MIME format.

------=_NextPart_000_0008_01BD7182.6B01A900
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printab  

From ???@??? Mon Apr 27 19:06:10 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTeZi-00Mu4bC>; Mon, 27 Apr 1998 05:27:26 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id EAA04247;
	Mon, 27 Apr 1998 04:33:05 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C563832; Sun, 26 Apr 1998 04:25:22 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3542B732.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 26 Apr 1998 23:24:32 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <354230C4.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: 52b92e97d4ce539eff2d5cf706eaf6b8

* List: gfabasic@linux.net.eu.org

An "HTML" file that was not *.html--viewable by any html viewer--would be like
java that's not java.

--Bob

Roland wrote:

> >Does anyone have any experience with Windows 95 help files?  I think the
> >compiled file has the extension of HHM but am not sure.  Also, how to call
> >the HHM file from GFA would be appreciated.
>
> Don't confuse Win95 help files (WinHelp 4) and the "HTML" help.
> The "HTML" help is one of the crazy new ideas of Microsoft to
> kill competitors.
> ......
>
> Roland Walter
> Berlin, Germany




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Apr 27 19:06:11 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTlgM-00MucKC>; Mon, 27 Apr 1998 13:02:46 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA14819;
	Mon, 27 Apr 1998 12:08:50 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5EBCF5; Sun, 26 Apr 1998 11:59:58 +0000 (???)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354321BF.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 26 Apr 1998 11:59:49 +0000 (???)
Subject: [GFA] subsribe spot11@bluewin.ch
X-UIDL: f29bdc5863cd9bcbafa0f009d7de8f8d

* List: gfabasic@linux.net.eu.org



+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft
E-Mail:
gfa@bero-online.ml.org    GFA Support
root@bero-online.ml.org   technical questions regarding the server only
gfasoft@compuserve.com    GFA related questions


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Apr 27 19:06:13 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTptE-00MubQC>; Mon, 27 Apr 1998 17:32:20 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA16615;
	Mon, 27 Apr 1998 16:38:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5681B2; Sun, 26 Apr 1998 16:29:50 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354360FE.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 27 Apr 1998 08:29:40 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: ed330fbc8b0e955815efb5c630304ca8

* List: gfabasic@linux.net.eu.org

Compiled HTML help files have an extension of .CHM.  You can use Microsoft's
Help p Workshop to compile them.

-----Original Message-----
From: Bob Dodds <recbo@erols.com>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Sunday, April 26, 1998 8:27 PM
Subject: [GFA] Re: [GFA] Re: [GFA] w95 help files


>* List: gfabasic@linux.net.eu.org
>
>An "HTML" file that was not *.html--viewable by any html viewer--would be
like
>java that's not java.
>
>--Bob
>
>Roland wrote:
>
>> >Does anyone have any experience with Windows 95 help files?  I think the
>> >compiled file has the extension of HHM but am not sure.  Also, how to
call
>> >the HHM file from GFA would be appreciated.
>>
>> Don't confuse Win95 help files (WinHelp 4) and the "HTML" help.
>> The "HTML" help is one of the crazy new ideas of Microsoft to
>> kill competitors.
>> ......
>>
>> Roland Walter
>> Berlin, Germany
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Apr 27 19:06:15 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTqDk-00MuIZC>; Mon, 27 Apr 1998 17:53:32 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA16832;
	Mon, 27 Apr 1998 16:59:51 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C5E9FEC; Sun, 26 Apr 1998 16:51:15 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35436604.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 27 Apr 1998 08:50:42 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: 592a2c00cb61d97c5887381813df5dbf

* List: gfabasic@linux.net.eu.org

Roland,
The new  Microsoft HTML help files use and externsion of .CHM and are
displayed by HH,EXE. Being an admirer of your programming skills If you come
up with calling it from GFA without using the EXEC command I would love to
see it.
Thanks,
Dale Bryant

-----Original Message-----
From: Roland <alibaba@zedat.fu-berlin.de>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Sunday, April 26, 1998 10:57 AM
Subject: [GFA] Re: [GFA] w95 help files


>* List: gfabasic@linux.net.eu.org
>
>At 10:30 23.04.1998 -0700, you wrote:
>
>>Does anyone have any experience with Windows 95 help files?  I think the
>>compiled file has the extension of HHM but am not sure.  Also, how to call
>>the HHM file from GFA would be appreciated.
>
>Don't confuse Win95 help files (WinHelp 4) and the "HTML" help.
>The "HTML" help is one of the crazy new ideas of Microsoft to
>kill competitors.
>I made some tests with it and as I remember (?) there is a way
>do call an EXE to open such a "HTML help file". But as the normal
>way You shall give an own window handle where the help text is to
>display (because then you don't have an own task).
>
>I can not test it in this moment because I have deinstalled the
>Microsoft Internet explorer - and you need it to display the new
>"HTML help".
>
>Roland Walter
>Berlin, Germany
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Apr 28 16:40:37 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTx2Z-00MuI4C>; Tue, 28 Apr 1998 01:10:27 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA21411;
	Tue, 28 Apr 1998 00:16:42 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C654D9F; Mon, 27 Apr 1998 00:05:46 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3543CBDA.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 27 Apr 1998 19:06:56 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: b94d3921cdbbd0ff1bab058c1c8191a2

* List: gfabasic@linux.net.eu.org

Hi,

I found the problem in my SendMessage example.  Turns out that the values

LB_SETITEMHEIGHT = 1057
LB_GETITEMHEIGHT = 1058

make the SendMessage calls work correctly.   I found these values by adding
the delta that Microsoft gives for the difference between them and
LB_GETCOUNT, to the value GFA stores internally for LB_GETCOUNT.  I originally
defined them as $01A0 and $01A1 per the Microsoft documentation.  I guess that
is not correct.

James Schumacher
Millennium Software
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Apr 28 16:40:39 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTyvc-00Mua0C>; Tue, 28 Apr 1998 03:11:24 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA22274;
	Tue, 28 Apr 1998 02:17:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C637BC3; Mon, 27 Apr 1998 02:09:29 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3543E8D9.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 27 Apr 1998 21:09:09 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <3543CBDA.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: 8b0fe1ee0795f625259a17000d916d81

* List: gfabasic@linux.net.eu.org

Little by little,

The big honcho coders at MS who teach the teachers and write the books, they aim
to avoid Swiss Army knives. Sometimes that conflicts with the goal of keeping the
list of API commands as short as possible, so they kick out into another dimension
of functionality--multiple inheritance. I'd just be interested to know what
documentation you found. Two of us came up with the same basic first-generation
info, and make that three including you, then it took a later generation of
documentation to get it right.

--Bob

Peu a peu wrote:

> * List: gfabasic@linux.net.eu.org
>
> Hi,
>
> I found the problem in my SendMessage example.  Turns out that the values
>
> LB_SETITEMHEIGHT = 1057
> LB_GETITEMHEIGHT = 1058
>
> make the SendMessage calls work correctly.   I found these values by adding
> the delta that Microsoft gives for the difference between them and
> LB_GETCOUNT, to the value GFA stores internally for LB_GETCOUNT.  I originally
> defined them as $01A0 and $01A1 per the Microsoft documentation.  I guess that
> is not correct.
>
> James Schumacher
> Millennium Software
> peuapeu@aol.com
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Apr 28 16:40:40 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yTzDc-00MubgC>; Tue, 28 Apr 1998 03:30:00 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA22412;
	Tue, 28 Apr 1998 02:36:30 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6773A3; Mon, 27 Apr 1998 02:28:21 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3543ED45.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 27 Apr 1998 21:27:26 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <35436604.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: 9c63def9fcd533f1c278a84229be406b

* List: gfabasic@linux.net.eu.org

Dale,

Can you look at *.CHM with a text editor?

I think there is a help file tool that takes *.html and "compiles" them to
execute faster, adding a stub to interpret byte code. If that has been
Walmart'ed by MS there should be some SDK/MFC type calls to access *.chm. I
don't know.

--Bob

Dale Bryant wrote:

> * List: gfabasic@linux.net.eu.org
>
> Roland,
> The new  Microsoft HTML help files use and externsion of .CHM and are
> displayed by HH,EXE. Being an admirer of your programming skills If you come
> up with calling it from GFA without using the EXEC command I would love to
> see it.
> Thanks,
> Dale Bryant


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Apr 28 16:40:41 1998
Return-Path: <hans@tttronic.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yU78O-00MucEC>; Tue, 28 Apr 1998 11:57:08 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA00420;
	Tue, 28 Apr 1998 11:03:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6CF92C; Mon, 27 Apr 1998 10:54:30 +0000 (???)
From: Hans "Trnqvist" <hans@tttronic.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354463E7.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
  by angel.algonet.se with SMTP; 28 Apr 1998 07:46:35 -0000
Date: Tue, 28 Apr 1998 09:46:14 +0100
Organization: TT Tronic Data AB
X-Mailer: Mozilla 3.01Gold [sv] (Macintosh; I PPC)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Subject: [GFA] Listbox font
Content-Transfer-Encoding: 7bit
X-UIDL: 75c5991986d7693d4fb8caeba11c6568

* List: gfabasic@linux.net.eu.org

HI,
Can anyone send me an example of changing font in listboxes.

Hans


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Apr 29 22:14:20 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yUCmR-00Muh0C>; Tue, 28 Apr 1998 17:58:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA03046;
	Tue, 28 Apr 1998 17:05:33 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6BE24A; Mon, 27 Apr 1998 16:56:11 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3544B8AB.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 28 Apr 1998 08:56:07 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: 34f67a2e0d9f450342296138597e14b7

* List: gfabasic@linux.net.eu.org


-----Original Message-----
From: Bob Dodds <recbo@erols.com>


>Dale,
>
>Can you look at *.CHM with a text editor?
>
I don't kno Bob. If you are running Win95 do a search for *.chm and try it>
I will try it also.

>I think there is a help file tool that takes *.html and "compiles" them to
>execute faster, adding a stub to interpret byte code. If that has been
>Walmart'ed by MS there should be some SDK/MFC type calls to access *.chm. I
>don't know.
>
>--Bob
>
Microsoft Help Workshop is one. Yesterday I received a upgrade to Help
Magician Pro version 4.5. It has all the tools necessary to create HTML
help. In fact, a WINHELP file and a HTLM help file can be created with the
same source. Although I have not had time to do extensive testing on the
program it seems to be quite stable.
Although I can display a .chm (compiled HTML help) using the Exec command in
GFA like you I do not believe this is the correct way to call ,CHM files.
h$=HH,EXE (path)
f$=CHM file path
a%=Exec(h$,f$)
Seems to work OK but I do believe it is correct.

Dale





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Apr 29 22:14:29 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yUD2K-00MuOvC>; Tue, 28 Apr 1998 18:15:16 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA03316;
	Tue, 28 Apr 1998 17:22:07 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C626DB6; Mon, 27 Apr 1998 17:12:35 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3544BC83.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 28 Apr 1998 12:13:40 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] Re: [GFA] ListBox/SendMessage question
X-UIDL: 562a670440509b36c8efd307300182d4

* List: gfabasic@linux.net.eu.org

>> I'd just be interested to know what documentation you found. <<

Hi Bob,

I downloaded this off MSDN after doing a search for LB_GETITEMHEIGHT:

WM.C
/*****************************************************************************
*\ 
*       This is a part of the Microsoft Source Code Samples.  
*       Copyright (C) 1993-1997 Microsoft Corporation. 
*       All rights reserved.  
*       This source code is only intended as a supplement to  
*       Microsoft Development Tools and/or WinHelp documentation. 
*       See these sources for detailed information regarding the  
*       Microsoft samples programs. 
\*****************************************************************************
*/ 
/*****************************************************************************
\ 
* 
* Module: wm.c 
* 
<<snip>>
   { "LB_ADDSTRING", LB_ADDSTRING,                         // 0x0180 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_INSERTSTRING", LB_INSERTSTRING,                   // 0x0181 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_DELETESTRING", LB_DELETESTRING,                   // 0x0182 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SELITEMRANGEEX", LB_SELITEMRANGEEX,               // 0x0183 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_RESETCONTENT", LB_RESETCONTENT,                   // 0x0184 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETSEL", LB_SETSEL,                               // 0x0185 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETCURSEL", LB_SETCURSEL,                         // 0x0186 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETSEL", LB_GETSEL,                               // 0x0187 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETCURSEL", LB_GETCURSEL,                         // 0x0188 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETTEXT", LB_GETTEXT,                             // 0x0189 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETTEXTLEN", LB_GETTEXTLEN,                       // 0x018A 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETCOUNT", LB_GETCOUNT,                           // 0x018B 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SELECTSTRING", LB_SELECTSTRING,                   // 0x018C 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_DIR", LB_DIR,                                     // 0x018D 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETTOPINDEX", LB_GETTOPINDEX,                     // 0x018E 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_FINDSTRING", LB_FINDSTRING,                       // 0x018F 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETSELCOUNT", LB_GETSELCOUNT,                     // 0x0190 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETSELITEMS", LB_GETSELITEMS,                     // 0x0191 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETTABSTOPS", LB_SETTABSTOPS,                     // 0x0192 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETHORIZONTALEXTENT", LB_GETHORIZONTALEXTENT,     // 0x0193 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETHORIZONTALEXTENT", LB_SETHORIZONTALEXTENT,     // 0x0194 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETCOLUMNWIDTH", LB_SETCOLUMNWIDTH,               // 0x0195 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_ADDFILE", LB_ADDFILE,                             // 0x0196 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETTOPINDEX", LB_SETTOPINDEX,                     // 0x0197 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETITEMRECT", LB_GETITEMRECT,                     // 0x0198 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETITEMDATA", LB_GETITEMDATA,                     // 0x0199 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETITEMDATA", LB_SETITEMDATA,                     // 0x019A 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SELITEMRANGE", LB_SELITEMRANGE,                   // 0x019B 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETANCHORINDEX", LB_SETANCHORINDEX,               // 0x019C 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETANCHORINDEX", LB_GETANCHORINDEX,               // 0x019D 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETCARETINDEX", LB_SETCARETINDEX,                 // 0x019E 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETCARETINDEX", LB_GETCARETINDEX,                 // 0x019F 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETITEMHEIGHT", LB_SETITEMHEIGHT,                 // 0x01A0 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETITEMHEIGHT", LB_GETITEMHEIGHT,                 // 0x01A1 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_FINDSTRINGEXACT", LB_FINDSTRINGEXACT,             // 0x01A2 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETLOCALE", LB_SETLOCALE,                         // 0x01A5 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_GETLOCALE", LB_GETLOCALE,                         // 0x01A6 
        MTF_TYPE_LB, DecodeGeneric }, 
    { "LB_SETCOUNT", LB_SETCOUNT,                           // 0x01A7 
        MTF_TYPE_LB, DecodeGeneric }, 
<< snip >>

I believe I found one other downloaded file that had this information but I
can't seem to find it at the moment. I guess my names are too cryptic! <g>

James Schumacher
Millennium Software
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Apr 29 22:15:28 1998
Return-Path: <karsten.mueller2@main-rheiner.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yUce2-00MucCC>; Wed, 29 Apr 1998 21:35:54 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA23781;
	Wed, 29 Apr 1998 20:43:13 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6CB619; Tue, 28 Apr 1998 20:28:38 +0000 (???)
From: "Karsten Mller" <karsten.mueller2@main-rheiner.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35463BF7.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Wed, 29 Apr 1998 21:31:06 +0200
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Compilerproblem
X-UIDL: eb2cbe908b7407b2ab9a03e09c492948

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Thu Apr 30 16:35:08 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0yUuMr-00MugaC>; Thu, 30 Apr 1998 16:31:21 +0200 (MEST)
Received: from shodan.in-trier.de([198.22.51.3]) (2963 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <Peuapeu@aol.com>) 
	id <m0yUgeP-000GMCE@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Thu, 30 Apr 1998 01:52:33 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #3 built 1998-Mar-25)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA26114;
	Thu, 30 Apr 1998 00:56:55 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C69F22C; Wed, 29 Apr 1998 00:44:48 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35467800.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 29 Apr 1998 19:45:45 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] Problems With Pentium II or Sony PCs?
X-UIDL: b495b3bc8ce394dc56b7ae6be32f0da4

* List: gfabasic@linux.net.eu.org

Hi,

I have a customer with a 4 month old Sony PCV-200 (233 MHz) Pentium II.  He
has reported seeing some very odd behavior with my program.  Noone else (out
of about 150 Windows 95 users so far) has reported these *highly* noticeable
problems (in fact noone has reported any problems with the latest version of
my program) nor have I seen anything peculiar on either of my two development
machines (a Dell and a Compaq).  I suspect the user has a hardware/bios
problem.  One reason is that I have had two other customers in the past who
reported very strange behavior and in both cases it turned out to be a
hardware/bios problem.  In one, the user eventually admitted seeing funny
behavior with other programs and then returned the HP PC and bought a Mac
instead <g>.  In the other case, the user's operating system completely
crashed some time after giving up and removing my program (which, by the way,
does not alter ANY files on the users computer).  That operating system, by
the way, was an upgrade from W3.1 to W95, which I have been told by several
people is just asking for trouble.

So ... my first question is whether anyone has had any bad experiences with
Sony PCs when running software produced with GFABasic or software outside the
software that is bundled with the computer?  Since this may be my first
Pentium II customer, my second question is whether anyone has notice problems
running GFA compiled applications on Pentium IIs?  Is this possibly happening
because computer manufacturers nowadays are tweeking the bundled software to
make it run on their hardware/bios instead of tweeking the hardware/bios to
run unmodified big-name commercial applications?  Then, when a little guy like
me comes along with perfectly fine software, their hardware/bios hiccups.  Is
this possible/reasonable?

Thanks,

James Schumacher
Millennium Software
peuapeu@aol.com  

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 01 18:24:02 1998
Return-Path: <hherzog@student.uni-kl.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0yUucO-00MuglC>; Thu, 30 Apr 1998 16:47:24 +0200 (MEST)
Received: from shodan.in-trier.de([198.22.51.3]) (1515 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <hherzog@student.uni-kl.de>) 
	id <m0yUmJF-000SgbE@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Thu, 30 Apr 1998 07:55:05 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #3 built 1998-Mar-25)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id GAA30904;
	Thu, 30 Apr 1998 06:59:41 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C613B1F; Wed, 29 Apr 1998 06:47:31 +0000 (???)
From: "Holger Herzog [EI]" <hherzog@student.uni-kl.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3546CD03.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          30 Apr 98 7:48 MET DST
Date: Thu, 30 Apr 1998 07:48:33 +0200 (CETDST)
In-Reply-To: <3544B8AB.BeroList-2.5.6@linux.net.eu.org>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: 72539ac790673fc27e1ff5935d9af7af

* List: gfabasic@linux.net.eu.org

Hi Dale,

On Tue, 28 Apr 1998, Dale Bryant wrote:

> Microsoft Help Workshop is one. Yesterday I received a upgrade to Help
> Magician Pro version 4.5. It has all the tools necessary to create HTML
> help. In fact, a WINHELP file and a HTLM help file can be created with the
> same source.

Why don't you use UDO (Universal DOcument)?

Holger


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 01 18:24:04 1998
Return-Path: <hherzog@student.uni-kl.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0yUucb-00MufpC>; Thu, 30 Apr 1998 16:47:37 +0200 (MEST)
Received: from shodan.in-trier.de([198.22.51.3]) (1513 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <hherzog@student.uni-kl.de>) 
	id <m0yUmMT-000SgsE@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Thu, 30 Apr 1998 07:58:25 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #3 built 1998-Mar-25)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA00422;
	Thu, 30 Apr 1998 07:03:06 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6A09D3; Wed, 29 Apr 1998 06:51:20 +0000 (???)
From: "Holger Herzog [EI]" <hherzog@student.uni-kl.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3546CDE8.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          30 Apr 98 7:52 MET DST
Date: Thu, 30 Apr 1998 07:52:25 +0200 (CETDST)
In-Reply-To: <3544B8AB.BeroList-2.5.6@linux.net.eu.org>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: d870f953113e4db200df31cfc070808d

* List: gfabasic@linux.net.eu.org

Hi Dale!

On Tue, 28 Apr 1998, Dale Bryant wrote:
> Microsoft Help Workshop is one. Yesterday I received a upgrade to Help
> Magician Pro version 4.5. It has all the tools necessary to create HTML
> help. In fact, a WINHELP file and a HTLM help file can be created with the
> same source.
Why don't you use UDO (Universal DOcument)?

Holger


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 01 18:24:06 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yUwSm-00MuhEC>; Thu, 30 Apr 1998 18:45:36 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA07724;
	Thu, 30 Apr 1998 17:53:15 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C67E1EC; Wed, 29 Apr 1998 17:40:43 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3547661B.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 30 Apr 1998 09:39:31 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: 501d99f1f123fcbaf477963a0d45d590

* List: gfabasic@linux.net.eu.org


>
>Hi Dale,
>
>On Tue, 28 Apr 1998, Dale Bryant wrote:
>
>Why don't you use UDO (Universal DOcument)?
>
I am not familiar with UDO. Want to explain it a little>





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 01 18:24:08 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yUz28-00MucDC>; Thu, 30 Apr 1998 21:30:16 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA09257;
	Thu, 30 Apr 1998 20:37:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C64F96C; Wed, 29 Apr 1998 20:25:13 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35478CA9.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 30 Apr 1998 21:29:03 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Keyboard-Log ?
X-UIDL: 3286a84b6448b0f6bd4cb771bc4a3ea4

* List: gfabasic@linux.net.eu.org

Hi,
  I'd try to make a program which tries to log all pressed keys of all
applications (For checking, if anyone has used my computer and what this
person has entered)
  When my program waits for the WM_CHAR event this will be done only if
a key is pressed within the actual application.
  There is also a function which puts the actual state of all keys into
an array - but if I analyze this, it is to slow to get all entered
characters of a fast typer (and also here the key state is not shoen of
all windows).
  Can anyone help ?


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 01 18:24:18 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVEX9-00Mu3RC>; Fri, 1 May 1998 14:03:19 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA23296;
	Fri, 1 May 1998 13:11:43 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6BAED6; Thu, 30 Apr 1998 12:57:26 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35487536.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAA18264
          for <gfabasic@linux.net.eu.org>; Fri, 1 May 1998 02:01:25 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 1 May 1998 02:01:25 +0000
Subject: [GFA] text limits   6004xx1-
X-UIDL: dc3566e3fa1930d66df18196a4716289

* List: gfabasic@linux.net.eu.org

30/04/98 8:50:48 PM   text limits   6004xx1-

Am having fun (boo hoo) trying to arrive at a text editor that will handle
files of (essentially) unlimited length.  Am being defeated by a 32,000 byte
limitation.  Presently have files of 0.5M (7,200 lines of text), but may
encounter 1M or more.

As I understand it, the editors are loading a single string - hense the
32,000 byte limit because of that being the limit of a string in GFA-W.  I
am decidely not clever enough to load a short string at a time, dropping
earlier strings as later strings are loaded (if necessary), altho that seems
a plausible way to go.

Would appreciate guidance.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 01 18:24:21 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVHLK-00MubkC>; Fri, 1 May 1998 17:03:18 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA24536;
	Fri, 1 May 1998 16:09:05 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6BF227; Thu, 30 Apr 1998 15:55:41 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35489EFE.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 01 May 1998 10:55:41 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <35487536.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] text limits   6004xx1-
X-UIDL: f522bc0ad0f98956874df47c393b414f

* List: gfabasic@linux.net.eu.org

Tom,

The first thing you could do with text is use an unlimitted size of sbig$()
string array, any single line or element of which could not be longer than 32k.
Are your lines going to be longer than that?

near beginning of file, outside of any procedure or function, compiler command--

$ABIG *big*

then dim your s_any_big$() array

gfaw can handle any size array, and you can access it, but you can't qsort it.
You would have to write or borrow a coded qsort to operate beyond 64k of data.
It's 32k string length, 64k of data, I think. Actually I think you may have
trouble with some other functions that operate on arrays, too.

If you were going to load binary files, then you would use pointers and
_huge(ptr%,offset%).

--Bob

Tom Record wrote:

> * List: gfabasic@linux.net.eu.org
>
> 30/04/98 8:50:48 PM   text limits   6004xx1-
>
> Am having fun (boo hoo) trying to arrive at a text editor that will handle
> files of (essentially) unlimited length.  Am being defeated by a 32,000 byte
> limitation.  Presently have files of 0.5M (7,200 lines of text), but may
> encounter 1M or more.
>
> As I understand it, the editors are loading a single string - hense the
> 32,000 byte limit because of that being the limit of a string in GFA-W.  I
> am decidely not clever enough to load a short string at a time, dropping
> earlier strings as later strings are loaded (if necessary), altho that seems
> a plausible way to go.
>
> Would appreciate guidance.
>
> <G>
> TomR.
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:45:49 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVLFs-00MugmC>; Fri, 1 May 1998 21:13:56 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA26404;
	Fri, 1 May 1998 20:22:19 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6835A5; Thu, 30 Apr 1998 20:09:47 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3548DA8B.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Fri, 1 May 1998 12:08:57 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] ICONS
X-UIDL: f0cc4a8453d75eddb5b3586646932242

* List: gfabasic@linux.net.eu.org

I am looking for some good program icons. A web search on icons always show
gif collections. I need .ico icons. Any pointers appreciated.

From ???@??? Sun May 03 17:45:51 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVLV4-00MuglC>; Fri, 1 May 1998 21:29:38 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA26600;
	Fri, 1 May 1998 20:38:17 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C617455; Thu, 30 Apr 1998 20:26:04 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3548DE5C.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAA9507
          for <gfabasic@linux.net.eu.org>; Fri, 1 May 1998 19:27:35 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 1 May 1998 19:27:35 +0000
Subject: [GFA] Re: [GFA] Re: [GFA] text limits   6004xx1-
X-UIDL: 8c54124cd9e816df5d6b11119915a2c0

* List: gfabasic@linux.net.eu.org

Sir Bob
Consideration: the whole thing is still far over my head, most definitely
NOT MSBasicII or LibertyBasic (that couldn't handle it anyway).

Line length is ~78-80 char text, so not a real problem.  The fact that it's
columnare would make for easy sort, but... the first/2nd gap is NOT uniform
for some reason.

I am beginning to think that a DIM bef$(10000),aft$(10000) - open "i"... -
for z%=1 to EOF(#)/LOF(#) - line input bef$(z%) - X2, of course - will load
both into arrays (I think) & I can compare'em for differences, then print
*those* to a texteditor.  The differences are few, 100 or less, so no size
limitations.

I have trouble keeping EOF/LOF straight - they're not handled in GFAW as I'm
accustomed, so always have to refer to notes & the manuals.

I appreciate your input - points out more of my weaknesses w/ GFAW.  There
are plenty of those to contend with <G>.  I might also attempt to construct
some kind of "manual" sort of my own once I successfully get'em into arrays
(something else I have yet to master in GFAW).

My in-depth experience is in MSBasicII - years ago on a RatShak TRS-80 Model
4.  Man, what you could once do w/ only 64K of RAM!!!  Progress - SNORT!!

I may attempt to incorporate a DB *.dll & simply load each line into a DB to
start with - I don't know... there are so many ways to go & I'm NOT master
of *any* of them.

Thanks for responding!  Getting help w/ difficulties is almost non-existant
& I have nobody to discuss these things with (the cat & dog are totally
disinterested!).

<G>
TomR.


At 10:55 AM 01/05/98 -0700, you wrote:
>* List: gfabasic@linux.net.eu.org
>
>Tom,
>
>The first thing you could do with text is use an unlimitted size of sbig$()
>string array, any single line or element of which could not be longer than 32k.
>Are your lines going to be longer than that?
>
>near beginning of file, outside of any procedure or function, compiler
command--
>
>$ABIG *big*
>
>then dim your s_any_big$() array
>
>gfaw can handle any size array, and you can access it, but you can't qsort it.
>You would have to write or borrow a coded qsort to operate beyond 64k of data.
>It's 32k string length, 64k of data, I think. Actually I think you may have
>trouble with some other functions that operate on arrays, too.
>
>If you were going to load binary files, then you would use pointers and
>_huge(ptr%,offset%).
>
>--Bob
>
>Tom Record wrote:
>
>> * List: gfabasic@linux.net.eu.org
>>
>> 30/04/98 8:50:48 PM   text limits   6004xx1-
>>
>> Am having fun (boo hoo) trying to arrive at a text editor that will handle
>> files of (essentially) unlimited length.  Am being defeated by a 32,000 byte
>> limitation.  Presently have files of 0.5M (7,200 lines of text), but may
>> encounter 1M or more.
>>
>> As I understand it, the editors are loading a single string - hense the
>> 32,000 byte limit because of that being the limit of a string in GFA-W.  I
>> am decidely not clever enough to load a short string at a time, dropping
>> earlier strings as later strings are loaded (if necessary), altho that seems
>> a plausible way to go.
>>
>> Would appreciate guidance.
>>
>> <G>
>> TomR.
>>
>> ---


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:45:52 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVLYq-00Mu4JC>; Fri, 1 May 1998 21:33:32 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA26685;
	Fri, 1 May 1998 20:42:07 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6415B2; Thu, 30 Apr 1998 20:29:40 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3548DF34.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAA24176
          for <gfabasic@linux.net.eu.org>; Fri, 1 May 1998 19:31:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 1 May 1998 19:31:17 +0000
Subject: [GFA] Re: [GFA] ICONS
X-UIDL: b58fa17775a10ce23edd5d4960c22aba

* List: gfabasic@linux.net.eu.org

Sir Dale
How many do you want?  In *.dlls OK?  Have many, but some aren't Win3-766Byte.
Name receiving adrs.
<G>
TomR.



At 12:08 PM 01/05/98 -0700, you wrote:
>* List: gfabasic@linux.net.eu.org
>
>I am looking for some good program icons. A web search on icons always show
>gif collections. I need .ico icons. Any pointers appreciated.
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:45:54 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVPck-00MuPCC>; Sat, 2 May 1998 01:53:50 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA28148;
	Sat, 2 May 1998 00:59:55 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C67088B; Fri, 01 May 1998 00:47:50 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35491BB6.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 1 May 1998 16:42:51 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: b40b0d20673d237a544477f30682be6a

* List: gfabasic@linux.net.eu.org


Thanks Roland,
I am looking for a way to call a .    CHM (Windows HTML Help) Without using
the GFA Exec command


>* List: gfabasic@linux.net.eu.org
>
>At 10:30 23.04.1998 -0700, you wrote:
>
>>Does anyone have any experience with Windows 95 help files?  I think the
>>compiled file has the extension of HHM but am not sure.  Also, how to call
>>the HHM file from GFA would be appreciated.
>
>Don't confuse Win95 help files (WinHelp 4) and the "HTML" help.
>The "HTML" help is one of the crazy new ideas of Microsoft to
>kill competitors.
>I made some tests with it and as I remember (?) there is a way
>do call an EXE to open such a "HTML help file". But as the normal
>way You shall give an own window handle where the help text is to
>display (because then you don't have an own task).
>
>I can not test it in this moment because I have deinstalled the
>Microsoft Internet explorer - and you need it to display the new
>"HTML help".
>
>Roland Walter
>Berlin, Germany
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:45:55 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVUxc-00MuZnC>; Sat, 2 May 1998 07:35:44 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id GAA29327;
	Sat, 2 May 1998 06:42:07 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C62FA75; Fri, 01 May 1998 06:30:29 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35496C05.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 02 May 1998 01:30:11 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <3548DE5C.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] text limits
X-UIDL: a1840231fc52ad4bca488407e5b45cf3

* List: gfabasic@linux.net.eu.org

Tom,

'string or integer arrays greater than 64k, 32k line(element) length on string
array.
$ABIG *big*

You could read up the whole file with one GFAW command:

dim sbig$ ( 10000 )
Open "i" , #1 , "C:\TEST.TXT"
Recall #1 , sbig$ () , -1 , l_ReportLinesRead% ' see help Recall and Store

After you do your trimming of the data using gfa string ops, you could
use gfa bput or bsave or even use the Borland database engine, included
in gfa package.

qsort won't work on >64k arrays. I have coded sorts and selects that do
work on any size, and sort/select from/to, and sort/select on records in a
string array, even some limitted boolean and regex. I don't have the same
thing for binary db, but those functions might be in Borland.

For starters, try recall/store. Then try qsort on arrays <64k.

--Bob

Tom Record wrote:

> * List: gfabasic@linux.net.eu.org
>
> Sir Bob
> Consideration: the whole thing is still far over my head, most definitely
> NOT MSBasicII or LibertyBasic (that couldn't handle it anyway).
>
> Line length is ~78-80 char text, so not a real problem.  The fact that it's
> columnare would make for easy sort, but... the first/2nd gap is NOT uniform
> for some reason.
>
> I am beginning to think that a DIM bef$(10000),aft$(10000) - open "i"... -
> for z%=1 to EOF(#)/LOF(#) - line input bef$(z%) - X2, of course - will load
> both into arrays (I think) & I can compare'em for differences, then print
> *those* to a texteditor.  The differences are few, 100 or less, so no size
> limitations.
>
> I have trouble keeping EOF/LOF straight - they're not handled in GFAW as I'm
> accustomed, so always have to refer to notes & the manuals.
>
> I appreciate your input - points out more of my weaknesses w/ GFAW.  There
> are plenty of those to contend with <G>.  I might also attempt to construct
> some kind of "manual" sort of my own once I successfully get'em into arrays
> (something else I have yet to master in GFAW).
>
> My in-depth experience is in MSBasicII - years ago on a RatShak TRS-80 Model
> 4.  Man, what you could once do w/ only 64K of RAM!!!  Progress - SNORT!!
>
> I may attempt to incorporate a DB *.dll & simply load each line into a DB to
> start with - I don't know... there are so many ways to go & I'm NOT master
> of *any* of them.
>
> Thanks for responding!  Getting help w/ difficulties is almost non-existant
> & I have nobody to discuss these things with (the cat & dog are totally
> disinterested!).
>
> <G>
> TomR.
>
> At 10:55 AM 01/05/98 -0700, you wrote:
> >* List: gfabasic@linux.net.eu.org
> >
> >Tom,
> >
> >The first thing you could do with text is use an unlimitted size of sbig$()
> >string array, any single line or element of which could not be longer than 32k.
> >Are your lines going to be longer than that?
> >
> >near beginning of file, outside of any procedure or function, compiler
> command--
> >
> >$ABIG *big*
> >
> >then dim your s_any_big$() array
> >
> >gfaw can handle any size array, and you can access it, but you can't qsort it.
> >You would have to write or borrow a coded qsort to operate beyond 64k of data.
> >It's 32k string length, 64k of data, I think. Actually I think you may have
> >trouble with some other functions that operate on arrays, too.
> >
> >If you were going to load binary files, then you would use pointers and
> >_huge(ptr%,offset%).
> >
> >--Bob
> >
> >Tom Record wrote:
> >
> >> * List: gfabasic@linux.net.eu.org
> >>
> >> 30/04/98 8:50:48 PM   text limits   6004xx1-
> >>
> >> Am having fun (boo hoo) trying to arrive at a text editor that will handle
> >> files of (essentially) unlimited length.  Am being defeated by a 32,000 byte
> >> limitation.  Presently have files of 0.5M (7,200 lines of text), but may
> >> encounter 1M or more.
> >>
> >> As I understand it, the editors are loading a single string - hense the
> >> 32,000 byte limit because of that being the limit of a string in GFA-W.  I
> >> am decidely not clever enough to load a short string at a time, dropping
> >> earlier strings as later strings are loaded (if necessary), altho that seems
> >> a plausible way to go.
> >>
> >> Would appreciate guidance.
> >>
> >> <G>
> >> TomR.
> >>
> >> ---
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:45:57 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVZS4-00Mub4C>; Sat, 2 May 1998 12:23:28 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA06232;
	Sat, 2 May 1998 11:29:56 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C653E35; Fri, 01 May 1998 11:18:12 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3549AF74.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 2 May 1998 06:18:53 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] [GFA] text limits
X-UIDL: c1fca09f96acda24e1d5e25a1ccfb5ef

* List: gfabasic@linux.net.eu.org

Message text written by Tom Record

>Am having fun (boo hoo) trying to arrive at a text editor that will handle
files of (essentially) unlimited length.  Am being defeated by a 32,000
byte
limitation.  Presently have files of 0.5M (7,200 lines of text), but may
encounter 1M or more. <

Tom,

I've found that an easy way to deal with large text files is to load them
into a LISTBOX. One listbox can take 32K lines. If you need more than that
you can use multiple listboxes.

As a tester I loaded a 1.4M text file into two listboxes.

To add the string to the listbox use ~SendMessage(listboxhandle&,
LB_ADDSTRING, 0, V:your_string$) make sure that the string is NULL
terminated first;

  WHILE NOT(EOF(#1)
    LINE INPUT #1, a_string$
    a_string$ = a_string$ + CHR$(0)
    ~SendMessage(listboxhandle&, LB_ADDSTRING, 0, V:a_string$)

To retrieve the string from the listbox use;

  ~SendMessage(listboxhandle&, LB_GETTEXT, linenumbar&, V:a_string$)

make sure a_string$ is large enough to hold the string, and then get rid of
the NULL termination with a_string$ = ZTRIM$(a_string$) and then display
your string.

To retrieve the number of lines use;

Items& = SendMessage(listboxhandle&, LB_GETCOUNT, 0, 0)

You can find out the text len with;

textlen& = SendMessage(listboxhandle&, LB_GETTEXTLEN, linenumber&, 0)

You can sort the listbox, insert, delete lines etc.

Regards,

John Findlay

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:45:58 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVZbF-00MubSC>; Sat, 2 May 1998 12:32:57 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA06342;
	Sat, 2 May 1998 11:39:22 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C699FBD; Fri, 01 May 1998 11:27:43 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3549B1AF.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 2 May 1998 06:28:42 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] [GFA] text limits
X-UIDL: 5eefcf50f9370b9d394b5b846a6d623d

* List: gfabasic@linux.net.eu.org

Tom,

I forgot to say that when your have created the listbox, hide it, then it
acts like a store with no display.

  LISTBOX "", ID&, 0, 0, 0, 0, style%
  ~ShowWindow(GetDlgItem(WIN(1), ID&), SW_HIDE)

Regards,

John Findlay

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:45:59 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVagF-00MugGC>; Sat, 2 May 1998 13:42:11 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA06729;
	Sat, 2 May 1998 12:48:39 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6C0105; Fri, 01 May 1998 12:36:55 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3549C1E7.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 2 May 1998 07:35:12 -0400
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Re: [GFA] text limits   6004xx1-
X-UIDL: 7a41a15e9d36c0b635e84c6e15104803

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Sun May 03 17:46:01 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVaph-00MubSC>; Sat, 2 May 1998 13:51:57 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA06858;
	Sat, 2 May 1998 12:58:27 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C63D273; Fri, 01 May 1998 12:46:54 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3549C43E.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 2 May 1998 07:39:58 -0400
MIME-Version: 1.0
Content-Type: multipart/signed;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Re: [GFA] Re: [GFA] ICONS
X-UIDL: 65f8a028e45b13e094fff5476723c593

This is a multi-part message in MIME format.

------=_NextPart_000_003E_01BD759D.83113460
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_003A_01BD759D.82F743C0"------=_NextPart_000_003A_01BD759D.82F743C0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bitHi:

Sorry to jump in on this one but I seemed to have missed some messages.
Dale, if you are looking for some Icon libraries, I've been collecting them
for a while (got about 40 or so with couple of hundred icons in each).
They're yours if you want them.                                                        -->Bev<--

    -----Original Message-----
    From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
    To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
    Date: Friday, May 01, 1998 14:36
    Subject: [GFA] Re: [GFA] ICONS    * List: gfabasic@linux.net.eu.org    Sir Dale
    How many do you want?  In *.dlls OK?  Have many, but some aren't
Win3-766Byte.
    Name receiving adrs.
    <G>
    TomR.
    At 12:08 PM 01/05/98 -0700, you wrote:
    >* List: gfabasic@linux.net.eu.org
    >
    >I am looking for some good program icons. A web search on icons always
show
    >gif collections. I need .ico icons. Any pointers appreciated.
    >    ---
    This mailing list is currently running BeroList v2.5.6
    Report problems to bero@bero-online.ml.org------=_NextPart_000_003A_01BD759D.82F743C0
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD>

<META content=3Dtext/html;charset=3Diso-8859-1 =
http-equiv=3DContent-Type>
<META content=3D'"MSHTML 4.72.2106.6"' name=3DGENERATOR>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT color=3D#000000 face=3D"Times New Roman" =
size=3D4>Hi:</FONT></DIV>
<DIV><FONT color=3D#000000 face=3D"Times New Roman" =
size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>Sorry to jump in on this =
one but I=20
seemed to have missed some messages. Dale, if you are looking for some =
Icon=20
libraries, I've been collecting them for a while (got about 40 or so =
with couple=20
of hundred icons in each). They're yours if you want them.</FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3D"Times New Roman"=20
size=3D4>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
--&gt;Bev&lt;--</FONT></DIV>
<DIV><FONT color=3D#000000 face=3D"Times New Roman" =
size=3D4></FONT>&nbsp;</DIV>
<BLOCKQUOTE=20
style=3D"BORDER-LEFT: #000000 solid 2px; MARGIN-LEFT: 5px; PADDING-LEFT: =
5px">
    <DIV><FONT face=3DArial size=3D2><B>-----Original =
Message-----</B><BR><B>From:=20
    </B>Tom Record &lt;<A=20
    =
href=3D"mailto:tiger.genealogical.rescue@worldnet.att.net">tiger.genealog=
ical.rescue@worldnet.att.net</A>&gt;<BR><B>To:=20
    </B><A =
href=3D"mailto:gfabasic@linux.net.eu.org">gfabasic@linux.net.eu.org</A>=20
    &lt;<A=20
    =
href=3D"mailto:gfabasic@linux.net.eu.org">gfabasic@linux.net.eu.org</A>&g=
t;<BR><B>Date:=20
    </B>Friday, May 01, 1998 14:36<BR><B>Subject: </B>[GFA] Re: [GFA]=20
    ICONS<BR><BR></DIV></FONT>* List: <A=20
    =
href=3D"mailto:gfabasic@linux.net.eu.org">gfabasic@linux.net.eu.org</A><B=
R><BR>Sir=20
    Dale<BR>How many do you want?&nbsp; In *.dlls OK?&nbsp; Have many, =
but some=20
    aren't Win3-766Byte.<BR>Name receiving=20
    adrs.<BR>&lt;G&gt;<BR>TomR.<BR><BR><BR><BR>At 12:08 PM 01/05/98 =
-0700, you=20
    wrote:<BR>&gt;* List: <A=20
    =
href=3D"mailto:gfabasic@linux.net.eu.org">gfabasic@linux.net.eu.org</A><B=
R>&gt;<BR>&gt;I=20
    am looking for some good program icons. A web search on icons always =    show<BR>&gt;gif collections. I need .ico icons. Any pointers=20
    appreciated.<BR>&gt;<BR><BR><BR>---<BR>This mailing list is =
currently=20
    running BeroList v2.5.6<BR>Report problems to <A=20
    =
href=3D"mailto:bero@bero-online.ml.org">bero@bero-online.ml.org</A><BR></=
BLOCKQUOTE></BODY></HTML>

------=_NextPart_000_003A_01BD759D.82F743C0--------=_NextPart_000_003E_01BD759D.83113460
Content-Type: application/x-pkcs7-signature;
	name="smime.p7s"

Content-Disposition: attachment;
	filename="smime.p7s"

Attachment Converted: "c:\programme\eudora\attach\smime.p7s"
------=_NextPart_000_003E_01BD759D.83113460--
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:46:04 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVaxb-00MubSC>; Sat, 2 May 1998 14:00:07 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA06996;
	Sat, 2 May 1998 13:09:15 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C617A3B; Fri, 01 May 1998 12:57:04 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3549C6A0.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 2 May 1998 07:57:33 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] [GFA] text limits  6004xx1 -
X-UIDL: a4398a98aba49e476b4335c104b853a6

* List: gfabasic@linux.net.eu.org

Hi Tom:

I wrote (& rewrote many times <g>) a program called WFEd (Windows File
Editor) that uses DIM/Strings to do exactly what you ask; to be truthful, I
wrote the original code back on the Atari & converted to a DOS version, then
a Windows version on the PC so it has been a long time since I have looked
at that part (it hasn't changed much). If you want I'll send you a copy
directly so that you can play with it.

                                                                    -->Bev<-





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:46:11 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVzsF-00MuZSC>; Sun, 3 May 1998 16:36:15 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA24113;
	Sun, 3 May 1998 16:35:56 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0B1D0FC; Sat, 02 May 1998 15:29:06 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354B3BC3.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAB8636
          for <gfabasic@linux.net.eu.org>; Sat, 2 May 1998 23:01:48 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 2 May 1998 23:01:48 +0000
Subject: [GFA] req suggestions   0205zz1-
X-UIDL: 27e08a4a17aef1179c63dcc477aa8503

* List: gfabasic@linux.net.eu.org

02/05/98 5:37:11 PM   req suggestions   0205zz1-

In trying to predict conditions on a typical HD, need to predict a max 
number of entries at any given level.

How does 10 levels of dir/subdir sound to you?

I have 7.

How does a max of 500 entries per dir/subdir sound to you?

I have <300.

Am looking at realistic sorting for comparison.  Info comes in ASCII 
text, lines of about 50 char.  Sorts tend to have limits, so if 
sorting is done at the subdir level, it should fall within the limits.

Other than "forget it" or "stick it" am open to comments & suggestions.

Sure hate getting all those "can't deliver" msgs for dead addrses.

Thanks
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:46:14 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yVzsr-00MugPC>; Sun, 3 May 1998 16:36:53 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA24139;
	Sun, 3 May 1998 16:36:42 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B093D224; Sat, 02 May 1998 15:29:09 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354B3BC5.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAA10713
          for <gfabasic@linux.net.eu.org>; Sun, 3 May 1998 11:33:28 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 3 May 1998 11:33:28 +0000
Subject: [GFA] techie question   0305zz2-
X-UIDL: 7b27e1c25ef815947e2d6d3baa167a14

* List: gfabasic@linux.net.eu.org

03/05/98 6:20:29 AM   techie question   0305zz2-

~DlgDirList(DLG(1),path$,100,0,$0037)

The above will retrieve whatever drive, dir, subdir, & files it is 
aimed at in path$ - this includes ASHR.  One problem... it doesn't get 
the actual attribs, file size or time/date stamps.

The manual doesn't go far enough into detail & the call appears to end 
as above - I haven't run across it in anything else yet.

Is there any means of getting the rest of the file data without 5# of 
code?  File size & time/date stamp are very important to what I'm 
doing.  The only way I see getting them is very long winded.

Any help greatly appreciated.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 03 17:46:26 1998
Return-Path: <OLuettcke@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yW0gm-00MuboC>; Sun, 3 May 1998 17:28:28 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA24369;
	Sun, 3 May 1998 17:28:08 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0AA04AD; Sat, 02 May 1998 16:25:14 +0000 (???)
From: OLuettcke <OLuettcke@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354B48EA.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 3 May 1998 11:26:38 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: Windows AOL sub 66
Subject: [GFA] Re: [GFA] Re: [GFA] LOADING BITMAPS FROM  _INSTANCE
X-UIDL: ee54547afdb278a7ce0aec6d3542dd63

* List: gfabasic@linux.net.eu.org

Hi  !!!
Thanx to everebody for help and hint !
For the moment I cannot check this all ( working for the next 21 days).
But when I free , then I do this .
Thanx                       Olaf



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 14:54:31 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yW1mW-00Mu36C>; Sun, 3 May 1998 18:38:28 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA24891;
	Sun, 3 May 1998 18:38:18 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A7E8D6; Sat, 02 May 1998 17:35:25 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354B595D.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sun, 3 May 1998 09:35:01 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] ICONS
X-UIDL: 70f22f565f4978773e6acba4def5deef

* List: gfabasic@linux.net.eu.org

Bob Dodds sent me a zip with almost 3000 icons. How is that for caring about
others. Thanks Bob
Dale Bryant

http://ourworld.compuserve.com/homepages/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 14:54:37 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yW6bF-00MugmC>; Sun, 3 May 1998 23:47:09 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA26646;
	Sun, 3 May 1998 23:46:34 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A632A8; Sat, 02 May 1998 22:43:21 +0000 (???)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354BA189.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 02 May 1998 22:42:58 +0000 (???)
Subject: [GFA] Re: [GFA] Keyboard-Log ?
X-UIDL: b066beed9448757952f2881d693f9771

* List: gfabasic@linux.net.eu.org

At 21:29 30.04.98 +0200, you wrote:

>Hi,
>  I'd try to make a program which tries to log all pressed keys of all
>applications (For checking, if anyone has used my computer and what this
>person has entered)
>  When my program waits for the WM_CHAR event this will be done only if
>a key is pressed within the actual application.
>  There is also a function which puts the actual state of all keys into
>an array - but if I analyze this, it is to slow to get all entered
>characters of a fast typer (and also here the key state is not shoen of
>all windows).
>  Can anyone help ?

This is a typical job for hook functions. You have to install a WH_KEYBOARD
hook.
To let it look for all keypresses, it must be implemented as a system-wide one,
i.e. written as a DLL.

Yours

GFA Support


+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft
E-Mail:
gfa@bero-online.ml.org    GFA Support
root@bero-online.ml.org   technical questions regarding the server only
gfasoft@compuserve.com    GFA related questions


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 14:54:41 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yW8w7-00Muc8C>; Mon, 4 May 1998 02:16:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA27576;
	Mon, 4 May 1998 02:16:50 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A5EE92; Sun, 03 May 1998 01:14:35 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354BC4FB.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sat, 2 May 1998 18:37:29 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Where
X-UIDL: 7488c75e5253f7e029a4d9e32bcc42b9

* List: gfabasic@linux.net.eu.org

Is Sjouke Hamstra still here? He seems to have disappeared from Compuserve.

http://ourworld.compuserve.com/homepages/adbryant/index.htm





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 14:54:46 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWDFJ-00Mu36C>; Mon, 4 May 1998 06:52:57 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id GAA28749;
	Mon, 4 May 1998 06:53:06 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A73F17; Sun, 03 May 1998 05:50:29 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354C05A5.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 04 May 1998 00:50:26 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <354B3BC3.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] req suggestions   0205zz1-
X-UIDL: 3e94446f0e898f4b68b6b0c3404cee69

* List: gfabasic@linux.net.eu.org

If I was sizing a string array that reads up lines by a function that is
smart enough not
to over-run the end, I would put the read-up in a function which looks at
how many
lines were read in. If that number shows that the array was full, I would
erase the
array, dim a new one larger by 1000 lines, try reading again, making sure
the lines
read turn out to be less than the dim?(). Then the function ends, returning
the number of
lines read. The new dim?() can be found when and wherever needed, using
dim?().

--Bob

Tom Record wrote:

> * List: gfabasic@linux.net.eu.org
>
> 02/05/98 5:37:11 PM   req suggestions   0205zz1-
>
> In trying to predict conditions on a typical HD, need to predict a max
> number of entries at any given level.
>
> How does 10 levels of dir/subdir sound to you?
>
> I have 7.
>
> How does a max of 500 entries per dir/subdir sound to you?
>
> I have <300.
>
> Am looking at realistic sorting for comparison.  Info comes in ASCII
> text, lines of about 50 char.  Sorts tend to have limits, so if
> sorting is done at the subdir level, it should fall within the limits.
>
> Other than "forget it" or "stick it" am open to comments & suggestions.
>
> Sure hate getting all those "can't deliver" msgs for dead addrses.
>
> Thanks
> <G>
> TomR.
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 14:54:48 1998
Return-Path: <hherzog@student.uni-kl.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWEPZ-00MugQC>; Mon, 4 May 1998 08:07:37 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA04876;
	Mon, 4 May 1998 08:07:49 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A9BE69; Sun, 03 May 1998 07:05:31 +0000 (???)
From: "Holger Herzog [EI]" <hherzog@student.uni-kl.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354C173B.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          4 May 98 8:07 MET DST
Date: Mon, 4 May 1998 08:07:01 +0200 (CETDST)
In-Reply-To: <3547661B.BeroList-2.5.6@linux.net.eu.org>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: 1c824ce6852e0593bc3d928e2ecc2c34

* List: gfabasic@linux.net.eu.org

Hi Dale!

> I am not familiar with UDO. Want to explain it a little>

UDO is special textformat and a progam to "convert" files from the
UDO-format to other formats like ASCII, ST-Guide, HTML, RTF, Winhelp, and
so on. UDO can create table of contents, can handle tables and pictures,
can create an index. For HTML-Output you can decide if you want a menu
with the mainchapters on the left (using frames or not).

Big documents are no problem. I am writing the docu for faceVALUE
(GFA-Basic application-builder) with UDO. I can compile german an english
hyps just by setting a flag in the document.

You can get informations about UDO here:
http://members.aol.com/DirkHage/gf/index.html

This pages are german, but they are created with UDO. And it is quite
easy.

Holger


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 14:54:49 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWG1y-00MuOWC>; Mon, 4 May 1998 09:51:22 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA05311;
	Mon, 4 May 1998 09:51:41 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0ADA210; Sun, 03 May 1998 08:49:07 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354C2F84.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 04 May 1998 03:49:11 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <354C173B.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] w95 help files
X-UIDL: b865280e698152cf5a4e60f6e2d35051

* List: gfabasic@linux.net.eu.org

Holger,

Thanks. DH's page is easy to navigate if I don't understand German. I
downloaded UDO in English versions for W3.1 and linux. Also linked and
downloaded PFE free programmer editor.

--Bob

Holger Herzog [EI] wrote:

> * List: gfabasic@linux.net.eu.org
>
> Hi Dale!
>
> > I am not familiar with UDO. Want to explain it a little>
>
> UDO is special textformat and a progam to "convert" files from the
> UDO-format to other formats like ASCII, ST-Guide, HTML, RTF, Winhelp, and
> so on. UDO can create table of contents, can handle tables and pictures,
> can create an index. For HTML-Output you can decide if you want a menu
> with the mainchapters on the left (using frames or not).
>
> Big documents are no problem. I am writing the docu for faceVALUE
> (GFA-Basic application-builder) with UDO. I can compile german an english
> hyps just by setting a flag in the document.
>
> You can get informations about UDO here:
> http://members.aol.com/DirkHage/gf/index.html
>
> This pages are german, but they are created with UDO. And it is quite
> easy.
>
> Holger


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 14:54:51 1998
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWG84-00MuaJC>; Mon, 4 May 1998 09:57:40 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA05446;
	Mon, 4 May 1998 09:57:57 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A372D5; Sun, 03 May 1998 08:55:41 +0000 (???)
From: Reuben Carlsen <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354C310D.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 04 May 1998 17:58:04 +1000
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <354B595D.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] ICONS
X-UIDL: e6b4e30f593d4f3ba72108e9b429020a

* List: gfabasic@linux.net.eu.org

Hey! Rrrrr Dale, it was me who sent the almost 3000 icons!

Reuben Carlsen

Dale Bryant wrote:

> * List: gfabasic@linux.net.eu.org
>
> Bob Dodds sent me a zip with almost 3000 icons. How is that for caring about
> others. Thanks Bob
> Dale Bryant
>
> http://ourworld.compuserve.com/homepages/adbryant/index.htm
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 23:08:37 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWMkB-00MugoC>; Mon, 4 May 1998 17:01:27 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA08242;
	Mon, 4 May 1998 17:01:29 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A59755; Sun, 03 May 1998 15:56:25 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354C93A9.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 4 May 1998 07:56:04 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Re: [GFA] ICONS
X-UIDL: d816d2e30641241896d0fac50aa01ee1

* List: gfabasic@linux.net.eu.org

Rueben,
I humbly beg you forgiveness!  I knew that. Who did I say sent them. I guess
my mind is finally going.  Anyway, thanks again. There are some very  good
ones in the collection. Someday I may get through all of them.(G)

-----Original Message-----
From: Reuben Carlsen <softprod@hartingdale.com.au>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Monday, May 04, 1998 12:58 AM
Subject: [GFA] Re: [GFA] ICONS


>* List: gfabasic@linux.net.eu.org
>
>Hey! Rrrrr Dale, it was me who sent the almost 3000 icons!
>
>Reuben Carlsen
>
>Dale Bryant wrote:
>
>> * List: gfabasic@linux.net.eu.org
>>
>> Bob Dodds sent me a zip with almost 3000 icons. How is that for caring
about
>> others. Thanks Bob
>> Dale Bryant
>>
>> http://ourworld.compuserve.com/homepages/adbryant/index.htm
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 23:08:39 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWMkj-00Mu4HC>; Mon, 4 May 1998 17:02:01 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA08308;
	Mon, 4 May 1998 17:02:15 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0BCF2F5; Sun, 03 May 1998 15:59:17 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354C9456.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 4 May 1998 07:59:18 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] w95 help files
X-UIDL: f4d7eac821a79662cebe66a2c1211846

* List: gfabasic@linux.net.eu.org

Thanks Holger,
I will have to take a look at it. If I recall, Joe Hurst has a link to it on
his web paged.
Dale

-----Original Message-----
From: Holger Herzog [EI] <hherzog@student.uni-kl.de>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Sunday, May 03, 1998 11:07 PM
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] Re: [GFA]
Re: [GFA] w95 help files


>* List: gfabasic@linux.net.eu.org
>
>Hi Dale!
>
>> I am not familiar with UDO. Want to explain it a little>
>
>UDO is special textformat and a progam to "convert" files from the
>UDO-format to other formats like ASCII, ST-Guide, HTML, RTF, Winhelp, and
>so on. UDO can create table of contents, can handle tables and pictures,
>can create an index. For HTML-Output you can decide if you want a menu
>with the mainchapters on the left (using frames or not).
>
>Big documents are no problem. I am writing the docu for faceVALUE
>(GFA-Basic application-builder) with UDO. I can compile german an english
>hyps just by setting a flag in the document.
>
>You can get informations about UDO here:
>http://members.aol.com/DirkHage/gf/index.html
>
>This pages are german, but they are created with UDO. And it is quite
>easy.
>
>Holger
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 23:08:43 1998
Return-Path: <schonema@post6.tele.dk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWOT1-00MuhbC>; Mon, 4 May 1998 18:51:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA09384;
	Mon, 4 May 1998 18:52:05 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A9B6F5; Sun, 03 May 1998 17:48:52 +0000 (???)
From: "Jan Schnemann" <schonema@post6.tele.dk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354CAE04.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
  by mail-in2.inet.tele.dk with SMTP; 4 May 1998 16:50:13 -0000
          (Netscape Mail Server v) with ESMTP id AAA6944
          for <gfabasic@bero-online.ml.org>; Mon, 4 May 1998 18:50:11 +0200
Date: Mon, 04 May 1998 18:49:54 +0200
X-Mailer: Mozilla 4.03 [da] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Subject: [GFA] Mailing list

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id SAA09384
X-UIDL: ebd51865b5f988cabbb74db83a8f1151

* List: gfabasic@linux.net.eu.org

To LLaP
bero
I have been on your mailing list, but I havent recieved anythin for a
while. Has it stopped or have I missed something? Anyway I would like to
be on it again.

I have in addition some questions:
1) Is it possible form GFABASIC/DOS to do something like the SETMOUSE
x,y from GFA-B-Atari?

2) How can i - GFA for WINDOWS- do something like:
OPEN "O",#1,"MID:"
DO
  PRINT #1;CHR$(MAX(MOUSEY,127));
LOOP UNTIL MOUSEK
CLOSE #1

Best Regards

Jan Schnemann, Denmark


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 04 23:08:45 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWQVE-00MuhZC>; Mon, 4 May 1998 21:02:16 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA10282;
	Mon, 4 May 1998 21:02:15 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0ABFA73; Sun, 03 May 1998 19:58:26 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354CCC62.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 4 May 1998 11:58:19 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] gfa32
X-UIDL: b1af27cf861dc8aaf0d29ad7adc64a43

* List: gfabasic@linux.net.eu.org

Anyone have any news on the new GFA32?

http://ourworld.compuserve.com/homepages/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:37 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWTEX-00Muh0C>; Mon, 4 May 1998 23:57:13 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA11926;
	Mon, 4 May 1998 23:57:33 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0ACED4A; Sun, 03 May 1998 22:53:52 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354CF581.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtigwc04.worldnet.att.net (post.office MTA v2.0 0613 )
          with SMTP id AAB11983 for <gfabasic@linux.net.eu.org>;
          Mon, 4 May 1998 21:55:25 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 4 May 1998 21:55:25 +0000
Subject: [GFA] info, please   0405zz1-
X-UIDL: 062ca4aa0ec433deec5ed40fa914ac48

* List: gfabasic@linux.net.eu.org

04/05/98 4:44:45 PM   info, please   0405zz1-

  CONTROL "Text",100,"listbox",$10800048 | WS_VSCROLL,10,10,608,165

I have what I think is a complete set of OEM documentation for GFA-W 
4.38/1.07.  I don't find $10800048 listed anywhere.  All such 
parameters I find are only 4 digits long after "$".

Would someone please let me know where to find this?

I've been unable to get my hands on a copy of Hamstra's book - would 
have to be in English since I can't read German & my translation 
program has proven to be useless for anything but tourist conversation.

Would appreciate hearing where & how much un $US.

In general, I truly like GFA-W, but these little insurmountable details
are certainly making it hard to want to continue.

Thank you.
TomR.
Tiger.Genealogical.Rescue@worldnet.att.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:39 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWTxD-00MubpC>; Tue, 5 May 1998 00:43:23 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA12362;
	Tue, 5 May 1998 00:43:53 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A0E3BC; Sun, 03 May 1998 23:40:43 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354D007B.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 4 May 1998 15:40:36 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] info, please   0405zz1-
X-UIDL: e6f31605ceeeb3e07ec5ffcc47838d6b

* List: gfabasic@linux.net.eu.org

Hi Tom,
I wish I could help you. Sjouke has disappeared from CompuServe. I received
a message Joe Hurst that he has a new job and a new email address. I do not
have the new address but maybe Joe Hurst would have it. Why not email Joe
and see?
If I recall it is JOEHURST@AOL.COM
Dale
http://ourworld.compuserve.com/homepages/adbryant/index.htm
-----Original Message-----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Monday, May 04, 1998 2:56 PM
Subject: [GFA] info, please 0405zz1-


>* List: gfabasic@linux.net.eu.org
>
>04/05/98 4:44:45 PM   info, please   0405zz1-
>
>  CONTROL "Text",100,"listbox",$10800048 | WS_VSCROLL,10,10,608,165
>
>I have what I think is a complete set of OEM documentation for GFA-W
>4.38/1.07.  I don't find $10800048 listed anywhere.  All such
>parameters I find are only 4 digits long after "$".
>
>Would someone please let me know where to find this?
>
>I've been unable to get my hands on a copy of Hamstra's book - would
>have to be in English since I can't read German & my translation
>program has proven to be useless for anything but tourist conversation.
>
>Would appreciate hearing where & how much un $US.
>
>In general, I truly like GFA-W, but these little insurmountable details
>are certainly making it hard to want to continue.
>
>Thank you.
>TomR.
>Tiger.Genealogical.Rescue@worldnet.att.net
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:41 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWa2X-00MugwC>; Tue, 5 May 1998 07:13:17 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA22048;
	Tue, 5 May 1998 07:13:49 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A0C768; Mon, 04 May 1998 06:10:43 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354D5BE3.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 07:14:58 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] AW: [GFA] req suggestions   0205zz1-
X-UIDL: 6408825b293b141e68dd9c6385f09316

* List: gfabasic@linux.net.eu.org

since dos 3.3, the number of entries are only limited within the root
directory (~512)...

>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Sonntag, 03. Mai 1998 01:01
>An: 	gfabasic@linux.net.eu.org
>Betreff: 	[GFA] req suggestions   0205zz1-
>
>* List: gfabasic@linux.net.eu.org
>
>02/05/98 5:37:11 PM   req suggestions   0205zz1-
>
>In trying to predict conditions on a typical HD, need to predict a max 
>number of entries at any given level.
>
>How does 10 levels of dir/subdir sound to you?
>
>I have 7.
>
>How does a max of 500 entries per dir/subdir sound to you?
>
>I have <300.
>
>Am looking at realistic sorting for comparison.  Info comes in ASCII 
>text, lines of about 50 char.  Sorts tend to have limits, so if 
>sorting is done at the subdir level, it should fall within the limits.
>
>Other than "forget it" or "stick it" am open to comments & suggestions.
>
>Sure hate getting all those "can't deliver" msgs for dead addrses.
>
>Thanks
><G>
>TomR.
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:42 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWa4o-00MugwC>; Tue, 5 May 1998 07:15:38 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA22798;
	Tue, 5 May 1998 07:16:16 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0AEF1F7; Mon, 04 May 1998 06:13:30 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354D5C8B.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 07:17:49 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] AW: [GFA] Re: [GFA] Keyboard-Log ?
X-UIDL: 0803ab51761b7e60be8777c884d7da4a

* List: gfabasic@linux.net.eu.org

No, no, no...

1)  I tried it with Keyhook and got hundred of System Messages from
other windows, but NOT WM_CHAR !!!!!!
2) What's about WINSIGHT from Borland, a "simple" Exe which is able to
get even the WM_CHARs of other applications ? (Maybe it uses a DLL, but
then I didn't found it on the disk...)



>----------
>Von: 	GFA[SMTP:gfa@bero-online.ml.org]
>Gesendet: 	Sonntag, 03. Mai 1998 00:42
>An: 	gfabasic@linux.net.eu.org
>Betreff: 	[GFA] Re: [GFA] Keyboard-Log ?
>
>* List: gfabasic@linux.net.eu.org
>
>At 21:29 30.04.98 +0200, you wrote:
>
>>Hi,
>>  I'd try to make a program which tries to log all pressed keys of all
>>applications (For checking, if anyone has used my computer and what this
>>person has entered)
>>  When my program waits for the WM_CHAR event this will be done only if
>>a key is pressed within the actual application.
>>  There is also a function which puts the actual state of all keys into
>>an array - but if I analyze this, it is to slow to get all entered
>>characters of a fast typer (and also here the key state is not shoen of
>>all windows).
>>  Can anyone help ?
>
>This is a typical job for hook functions. You have to install a WH_KEYBOARD
>hook.
>To let it look for all keypresses, it must be implemented as a system-wide
>one,
>i.e. written as a DLL.
>
>Yours
>
>GFA Support
>
>
>+++ How to contact GFA +++
>FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions
>etc.
>WWW: http://ourworld.compuserve.com/homepages/gfasoft
>E-Mail:
>gfa@bero-online.ml.org    GFA Support
>root@bero-online.ml.org   technical questions regarding the server only
>gfasoft@compuserve.com    GFA related questions
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:44 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWdrC-00MuhKC>; Tue, 5 May 1998 11:17:50 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA23988;
	Tue, 5 May 1998 11:17:42 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A1782A; Mon, 04 May 1998 10:13:51 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354D94DF.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 05:14:56 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] [GFA] info, please
X-UIDL: 840f093dcee51c937c91f845cbaf336d

* List: gfabasic@linux.net.eu.org

Message text written by Tom Record

>I don't find $10800048 listed anywhere.<

If I may say, this is why it's a good idea always to use windows constants,
_especially_ when passing code on to others.

This may seem obvious. . . . but <smile>

Even when GFABasic does not support the said constant (most are supported!)
if one uses a meaningful variable name it helps. You can find the Windows
constants in 'windows.h' or a book like the 'Windows API Bible'.

An example of good practice is in Joe Hurst's examples;

    ' new flags for DLG OPEN and DLG SAVE with windows 95
      
     OFN_EXPLORER% = $80000             
     OFN_NODEREFERENCELINKS% = $100000     ' Node Reference Links... (???)
     OFN_LONGNAMES% = $200000              ' long names for
windows-3.x-programms

Once they are defined one can use the OR operator to combine them;

  flag% = OFN_LONGNAMES% | OFN_EXPLORER% | OFN_NODEREFERENCELINKS%


Regards,

John Findlay

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:45 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWdrf-00MuhVC>; Tue, 5 May 1998 11:18:19 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA24044;
	Tue, 5 May 1998 11:18:04 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0B5C3A0; Mon, 04 May 1998 10:14:12 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354D94F4.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 05:14:52 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Re: Mr. Hamstra
X-UIDL: f53284b8238ab3eae0c7c2ba81e2ad11

* List: gfabasic@linux.net.eu.org

Dale, and anyone else

Sjouke's new address is  >  shamstra@gelrevision.nl


Regards,

John Findlay

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:46 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWdzB-00MKXiC>; Tue, 5 May 1998 11:26:05 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA24194;
	Tue, 5 May 1998 11:26:10 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A4C145; Mon, 04 May 1998 10:22:52 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354D96FC.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 05:24:37 -0400
MIME-Version: 1.0
Content-Type: multipart/signed;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Re: [GFA] info, please   0405zz1-
X-UIDL: 04c6e905e6167ffeb6b9fc2b8e4bed1b

This is a multi-part message in MIME format.

------=_NextPart_000_0011_01BD77E6.1994AF80
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_000D_01BD77E6.198B87C0"------=_NextPart_000_000D_01BD77E6.198B87C0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bitTom:

> CONTROL "Text",100,"listbox",$10800048 | WS_VSCROLL,10,10,608,165According to the PROGRAMMER'S GUIDE 2:$10000000 - WS_VISIBLE
$00800000 - WS_BORDER

btw, WS_VSCROLL is $00200000 & the only reason I can think for not putting
it in as a number is that whoever did it did not realize that you add
numbers if they occur in the same column (ie: in this case, '8' and '2'
would become 'A'). Personally, I use the words not the numbers; it;s a
helluva lot easier to understand. Hope this helps,                                                        -->Bev<--
------=_NextPart_000_000D_01BD77E6.198B87C0
Content-Type: text/html;
	charset="iso-8859-1"


<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html><META content=3Dtext/html;charset=3Diso-8859-1 =
http-equiv=3DContent-Type>
<META content=3D'"MSHTML 4.72.2106.6"' name=3DGENERATOR>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3D"Times New Roman" size=3D4>Tom:</FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>&gt; CONTROL=20
&quot;Text&quot;,100,&quot;listbox&quot;,$10800048 |=20
WS_VSCROLL,10,10,608,165<BR></FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>According to the =
PROGRAMMER'S GUIDE=20
2:</FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>$10000000 - =
WS_VISIBLE</FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>$00800000 - =
WS_BORDER</FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>btw, WS_VSCROLL is =
$00200000 &amp; the=20
only reason I can think for not putting it in as a number is that =
whoever did it=20
did not realize that you add numbers if they occur in the same column =
(ie: in=20
this case, '8' and '2' would become 'A'). Personally, I use the words =
not the=20
numbers; it;s a helluva lot easier to understand. Hope this =
helps,</FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4></FONT><FONT face=3D"Times =
New Roman"=20
size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT face=3D"Times New Roman"=20
size=3D4>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
--&gt;Bev&lt;--</FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>&nbsp;&nbsp;&nbsp;=20
</FONT></DIV></BODY></HTML>

------=_NextPart_000_000D_01BD77E6.198B87C0--------=_NextPart_000_0011_01BD77E6.1994AF80
Content-Type: application/x-pkcs7-signature;
	name="smime.p7s"

Content-Disposition: attachment;
	filename="smime.p7s"

Attachment Converted: "c:\programme\eudora\attach\smime1.p7s"
------=_NextPart_000_0011_01BD77E6.1994AF80--
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:51 1998
Return-Path: <schonema@post6.tele.dk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWeuQ-00MuhAC>; Tue, 5 May 1998 12:25:14 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA24654;
	Tue, 5 May 1998 12:23:42 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0AA2CBD; Mon, 04 May 1998 11:20:08 +0000 (???)
From: "Jan Schnemann" <schonema@post6.tele.dk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354DA468.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  by post-relay2.inet.tele.dk with SMTP; 5 May 1998 10:19:40 -0000
          (Netscape Mail Server v) with ESMTP id AAA53974
          for <gfabasic@linux.net.eu.org>; Tue, 5 May 1998 12:19:39 +0200
Date: Tue, 05 May 1998 12:19:21 +0200
X-Mailer: Mozilla 4.03 [da] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Subject: [GFA] MIDI programming

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id MAA24654
X-UIDL: b4ae91d8f2bf61614ea2ff0006f226de

* List: gfabasic@linux.net.eu.org

I have some questions:
1) Is it possible form GFABASIC/DOS to do something like the SETMOUSE
x,y from GFA-B-Atari?

2) How can i - GFA for WINDOWS- do something like:
OPEN "O",#1,"MID:"
DO
  PRINT #1;CHR$(MAX(MOUSEY,127));
LOOP UNTIL MOUSEK
CLOSE #1

Best Regards

Jan Schnemann, Denmark






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 05 13:16:53 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWfLt-00MubSC>; Tue, 5 May 1998 12:53:37 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA25041;
	Tue, 5 May 1998 12:54:07 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A18673; Mon, 04 May 1998 11:49:57 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354DAB65.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 05 May 1998 06:49:37 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <354CF581.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] info, please   0405zz1-
X-UIDL: f186d97ac5ca2dd399abecd063ca8c10

* List: gfabasic@linux.net.eu.org

Tom,

GFAW knows lots of WM's and LBS's constants. I got some for you from Dennis
Osrow's Power Programming in Windows using GFA Basic, po box 16609, w palm
beach, fl 33416.

LBS_SORT & LBS_HASSTRINGS & LBS_MULTIPLESEL    multiple selection

..and if GFAW doesn't have the information from a *.h "header file", it
will print 0 if you do a OPENW #1, print LBS_WHATEVER. Then you have to go
to ftp.microsoft.com or www and look up a number.

--Bob

Tom Record wrote:

> * List: gfabasic@linux.net.eu.org
>
> 04/05/98 4:44:45 PM   info, please   0405zz1-
>
>   CONTROL "Text",100,"listbox",$10800048 | WS_VSCROLL,10,10,608,165
>
> I have what I think is a complete set of OEM documentation for GFA-W
> 4.38/1.07.  I don't find $10800048 listed anywhere.  All such
> parameters I find are only 4 digits long after "$".
>
> Would someone please let me know where to find this?
>
> I've been unable to get my hands on a copy of Hamstra's book - would
> have to be in English since I can't read German & my translation
> program has proven to be useless for anything but tourist conversation.
>
> Would appreciate hearing where & how much un $US.
>
> In general, I truly like GFA-W, but these little insurmountable details
> are certainly making it hard to want to continue.
>
> Thank you.
> TomR.
> Tiger.Genealogical.Rescue@worldnet.att.net
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:43:55 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWfvr-00MubSC>; Tue, 5 May 1998 13:30:47 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA25400;
	Tue, 5 May 1998 13:31:09 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A4138E; Mon, 04 May 1998 12:27:18 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354DB426.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 05 May 1998 07:27:01 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <354D94DF.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] [GFA] info, please
X-UIDL: b8c34563af421a87cad59554a3bb2f51

* List: gfabasic@linux.net.eu.org

John,

That's "no de-reference links". I thinks like no expanding of variables and
pathnames--no reading up of what is at the pointer or referencing the link.
It's when you want to preserve the connection to live changing data, instead of
sampling it at that point in time.

--Bob

John Findlay wrote:

>      OFN_NODEREFERENCELINKS% = $100000     ' Node Reference Links... (???)
>
> Regards,
>
> John Findlay


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:43:56 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWiiu-00MuhsC>; Tue, 5 May 1998 16:29:36 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA26791;
	Tue, 5 May 1998 16:30:00 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0B4A532; Mon, 04 May 1998 15:26:25 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354DDE21.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAB14876
          for <gfabasic@linux.net.eu.org>; Tue, 5 May 1998 14:27:42 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 5 May 1998 14:27:42 +0000
Subject: [GFA] Re: [GFA] [GFA] info, please
X-UIDL: 17eaa6eafeb4e56d1078eea1c5415040

* List: gfabasic@linux.net.eu.org

Well, ya got me on that one.  Thank you!  I didn't even dream of looking in
windows.h - another one for the chart on the wall.
<G>
TomR.


At 05:14 AM 05/05/98 -0400, you wrote:
>* List: gfabasic@linux.net.eu.org
>
>Message text written by Tom Record
>
>>I don't find $10800048 listed anywhere.<
>
>If I may say, this is why it's a good idea always to use windows constants,
>_especially_ when passing code on to others.
>
>This may seem obvious. . . . but <smile>
>
>Even when GFABasic does not support the said constant (most are supported!)
>if one uses a meaningful variable name it helps. You can find the Windows
>constants in 'windows.h' or a book like the 'Windows API Bible'.
>
>An example of good practice is in Joe Hurst's examples;
>
>    ' new flags for DLG OPEN and DLG SAVE with windows 95
>      
>     OFN_EXPLORER% = $80000             
>     OFN_NODEREFERENCELINKS% = $100000     ' Node Reference Links... (???)
>     OFN_LONGNAMES% = $200000              ' long names for
>windows-3.x-programms
>
>Once they are defined one can use the OR operator to combine them;
>
>  flag% = OFN_LONGNAMES% | OFN_EXPLORER% | OFN_NODEREFERENCELINKS%
>
>
>Regards,
>
>John Findlay
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:43:57 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWij4-00Mui0C>; Tue, 5 May 1998 16:29:46 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA26855;
	Tue, 5 May 1998 16:30:17 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0AB5073; Mon, 04 May 1998 15:26:33 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354DDE29.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAE14876
          for <gfabasic@linux.net.eu.org>; Tue, 5 May 1998 14:27:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 5 May 1998 14:27:51 +0000
Subject: [GFA] Re: [GFA] Re: [GFA] info, please   0405zz1-
X-UIDL: 7fc937afda4a6a5ef14c2ccebc197f6e

* List: gfabasic@linux.net.eu.org

Thank you kind sir.  After being nudged into looking at windows.h, I realized
what I was up against.  I can add'em, but couldn't get that many digits.  I
don't know really, whether I like numbers or words better - my wall is now a
roadmap thru Windows that NOBODY could follow.
Thanks much - I'll remember this step.
<G>
TomR.


At 05:24 AM 05/05/98 -0400, you wrote:
>This is a multi-part message in MIME format.
>
>------=_NextPart_000_0011_01BD77E6.1994AF80
>Content-Type: multipart/alternative;
>
boundary="----=_NextPart_000_000D_01BD77E6.198B87C0"------=_NextPart_000_000
D_01BD77E6.198B87C0
>Content-Type: text/plain;
>	charset="iso-8859-1"
>Content-Transfer-Encoding: 7bitTom:
>
>> CONTROL "Text",100,"listbox",$10800048 |
WS_VSCROLL,10,10,608,165According to the PROGRAMMER'S GUIDE 2:$10000000 -
WS_VISIBLE
>$00800000 - WS_BORDER
>
>btw, WS_VSCROLL is $00200000 & the only reason I can think for not putting
>it in as a number is that whoever did it did not realize that you add
>numbers if they occur in the same column (ie: in this case, '8' and '2'
>would become 'A'). Personally, I use the words not the numbers; it;s a
>helluva lot easier to understand. Hope this helps,
-->Bev<--
>------=_NextPart_000_000D_01BD77E6.198B87C0
>Content-Type: text/html;
>	charset="iso-8859-1"



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:00 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWkcT-00MuhcC>; Tue, 5 May 1998 18:31:05 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA27914;
	Tue, 5 May 1998 18:31:35 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0AB3836; Mon, 04 May 1998 17:26:46 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354DFA56.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtigwc05.worldnet.att.net (post.office MTA v2.0 0613 )
          with SMTP id AAA12605 for <gfabasic@linux.net.eu.org>;
          Tue, 5 May 1998 16:28:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 5 May 1998 16:28:07 +0000
Subject: [GFA] $10800048
X-UIDL: 6d406466d5624b064a2ce89d7fd57e38

* List: gfabasic@linux.net.eu.org

Would someone w/ access to whatever gives listbox styles in an 8-digit 
number please identify this one for me?

> > CONTROL "Text",100,"listbox",$10800048 | WS_VSCROLL,10,10,608,142
> > I don't find $10800048 listed anywhere.<
> You can find the Windows constants in 'windows.h'

/*********************************************************************\
*                                                                    *
* windows.h -   Windows functions, types, and definitions            *
*                                                                    *
*               Version 3.10                                         *
*                                                                    *
*      Copyright (c) 1985-1992, Microsoft Corp. All rights reserved. *
*                                                                    *
**********************************************************************

/****** Listbox control **********************************************/

#ifndef NOCTLMGR

/* Listbox styles */
#ifndef NOWINSTYLES
#define LBS_NOTIFY        0x0001L
#define LBS_SORT          0x0002L
#define LBS_NOREDRAW          0x0004L
#define LBS_MULTIPLESEL       0x0008L
#define LBS_OWNERDRAWFIXED    0x0010L
#define LBS_OWNERDRAWVARIABLE 0x0020L
#define LBS_HASSTRINGS        0x0040L
#define LBS_USETABSTOPS       0x0080L
#define LBS_NOINTEGRALHEIGHT  0x0100L
#define LBS_MULTICOLUMN       0x0200L
#define LBS_WANTKEYBOARDINPUT 0x0400L
#define LBS_EXTENDEDSEL       0x0800L
#if (WINVER >= 0x030a)
#define LBS_DISABLENOSCROLL   0x1000L
#endif  /* WINVER >= 0x030a */
#define LBS_STANDARD          (LBS_NOTIFY | LBS_SORT | WS_VSCROLL | 
WS_BORDER)
#endif  /* NOWINSTYLES */

/* Listbox messages */
#ifndef NOWINMESSAGES
#define LB_ADDSTRING           (WM_USER+1)
#define LB_INSERTSTRING        (WM_USER+2)
#define LB_DELETESTRING        (WM_USER+3)
#define LB_RESETCONTENT        (WM_USER+5)
#define LB_SETSEL          (WM_USER+6)
#define LB_SETCURSEL           (WM_USER+7)
#define LB_GETSEL          (WM_USER+8)
#define LB_GETCURSEL           (WM_USER+9)
#define LB_GETTEXT         (WM_USER+10)
#define LB_GETTEXTLEN          (WM_USER+11)
#define LB_GETCOUNT        (WM_USER+12)
#define LB_SELECTSTRING        (WM_USER+13)
#define LB_DIR             (WM_USER+14)
#define LB_GETTOPINDEX         (WM_USER+15)
#define LB_FINDSTRING          (WM_USER+16)
#define LB_GETSELCOUNT         (WM_USER+17)
#define LB_GETSELITEMS         (WM_USER+18)
#define LB_SETTABSTOPS         (WM_USER+19)
#define LB_GETHORIZONTALEXTENT (WM_USER+20)
#define LB_SETHORIZONTALEXTENT (WM_USER+21)
#define LB_SETCOLUMNWIDTH      (WM_USER+22)
#define LB_SETTOPINDEX         (WM_USER+24)
#define LB_GETITEMRECT         (WM_USER+25)
#define LB_GETITEMDATA         (WM_USER+26)
#define LB_SETITEMDATA         (WM_USER+27)
#define LB_SELITEMRANGE        (WM_USER+28)
#define LB_SETCARETINDEX       (WM_USER+31)
#define LB_GETCARETINDEX       (WM_USER+32)

#if (WINVER >= 0x030a)
#define LB_SETITEMHEIGHT       (WM_USER+33)
#define LB_GETITEMHEIGHT       (WM_USER+34)
#define LB_FINDSTRINGEXACT     (WM_USER+35)
#endif  /* WINVER >= 0x030a */

#endif  /* NOWINMESSAGES */

/* Listbox notification codes */
#define LBN_ERRSPACE        (-2)
#define LBN_SELCHANGE       1
#define LBN_DBLCLK      2
#define LBN_SELCANCEL       3
#define LBN_SETFOCUS        4
#define LBN_KILLFOCUS       5

/* Listbox notification messages */
#define WM_VKEYTOITEM       0x002E
#define WM_CHARTOITEM       0x002F

/* Listbox message return values */
#define LB_OKAY         0
#define LB_ERR          (-1)
#define LB_ERRSPACE     (-2)

#define LB_CTLCODE      0L


<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:03 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWl20-00Mui4C>; Tue, 5 May 1998 18:57:28 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA28214;
	Tue, 5 May 1998 18:57:02 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A6121A; Mon, 04 May 1998 17:53:24 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354E0094.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 12:54:33 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 2.6 for Mac
Subject: [GFA] Maximum font height?
X-UIDL: 5829b5ae3cb98f9e13d636060cff41a8

* List: gfabasic@linux.net.eu.org

Hi,

I've been trying to get my application to work under W3.1 and discovered that
it eventually crashes if I try to set the font height too large.  The segment
of code where the problem occurs draws random characters from random fonts
(all those installed on the computer) repeatedly to the screen in various
heights and boldnesses.  I set the font and height using the "_FONT$ ="
command.  I've also tried setting the font height using the "FONT HEIGHT"
command.  In both cases, if I allow the maximum height to be -100, then
eventually (in a few minutes) the routine crashes the computer (and not on any
particular height).   In other words, it will start out drawing characters to
the screen that are as large as the maximum and it does not crash on any
particular font.  If I set the maximum height to -60, then the routine runs
indefinitely (for hours!) with no sign of a problem.  I have not tried
intermediate numbers.

So ... is there an undocumented maximum allowed font height or is there a
possible bug in SET HEIGHT and _FONT$?

James Schumacher
Millennium Software
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:05 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWlM9-00MuhsC>; Tue, 5 May 1998 19:18:17 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA28555;
	Tue, 5 May 1998 19:16:37 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A2EF5A; Mon, 04 May 1998 18:13:05 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354E0531.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 10:01:06 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Re: [GFA] MIDI programming
X-UIDL: e85a8cde8c32c4c45890f5b923c6062c

* List: gfabasic@linux.net.eu.org

Jan,
If you are interested in using GFA for Midi programming send a email to Mark
Feaver. Mark has done extensive  midi programming in GFA. He sent me a
midi/karoke program that is really great. I think Mark would be willing to
help you. His email address is below.
Dale Bryant
adbryant@msn.com

Mark Feaver
E-mail Address(es):
  mfeaver@s3.sonnet.com

-----Original Message-----
From: Jan Schnemann <schonema@post6.tele.dk>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Tuesday, May 05, 1998 3:22 AM
Subject: [GFA] MIDI programming


>* List: gfabasic@linux.net.eu.org
>
>I have some questions:
>1) Is it possible form GFABASIC/DOS to do something like the SETMOUSE
>x,y from GFA-B-Atari?
>
>2) How can i - GFA for WINDOWS- do something like:
>OPEN "O",#1,"MID:"
>DO
>  PRINT #1;CHR$(MAX(MOUSEY,127));
>LOOP UNTIL MOUSEK
>CLOSE #1
>
>Best Regards
>
>Jan Schnemann, Denmark
>
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:10 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWn1B-00Mu36C>; Tue, 5 May 1998 21:04:45 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA29738;
	Tue, 5 May 1998 21:05:20 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A2C2E6; Mon, 04 May 1998 20:00:13 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354E1E4D.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 15:01:52 -0400
MIME-Version: 1.0
Content-Type: multipart/signed;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Re: [GFA] $10800048
X-UIDL: 1df7d71b9bef0948ae643da9fa9602e1

This is a multi-part message in MIME format.

------=_NextPart_000_0027_01BD7836.BD6630C0
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_0023_01BD7836.BD5567E0"------=_NextPart_000_0023_01BD7836.BD5567E0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bitTom:

$10800048 = WS_VISIBLE | WS_BORDER | LBS_HASSTRINGS | LBS_MULTIPLESEL
then, it seems that a WS_VSCROLL is added on also.                                                        -->Bev<--

ps: these all can be used in LISTBOX; in fact, it seems that you can use any
of the higher digit ones (4-7)) in any of the dialog type------=_NextPart_000_0023_01BD7836.BD5567E0
Content-Type: text/html;
	charset="iso-8859-1"


<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html><META content=3Dtext/html;charset=3Diso-8859-1 =
http-equiv=3DContent-Type>
<META content=3D'"MSHTML 4.72.2106.6"' name=3DGENERATOR>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT color=3D#000000 face=3D"Times New Roman" =
size=3D4>Tom:</FONT></DIV>
<DIV><FONT color=3D#000000 face=3D"Times New Roman" =
size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>$10800048 =3D WS_VISIBLE | =
WS_BORDER |=20
LBS_HASSTRINGS | LBS_MULTIPLESEL </FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4>then, it seems that a =
WS_VSCROLL is=20
added on also.</FONT></DIV>
<DIV><FONT face=3D"Times New Roman" size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3D"Times New Roman"=20
size=3D4>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
--&gt;Bev&lt;--</FONT></DIV>
<DIV>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3D"Times New Roman" size=3D4>ps: these =
all can be used=20
in LISTBOX; in fact, it seems that you can use any of the higher digit =
ones=20
(4-7)) in any of the dialog types.</FONT></DIV>
<DIV><FONT color=3D#000000 face=3D"Times New Roman" =
size=3D4></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3D"Times New Roman"=20
size=3D4></FONT>&nbsp;</DIV></BODY></HTML>

------=_NextPart_000_0023_01BD7836.BD5567E0--------=_NextPart_000_0027_01BD7836.BD6630C0
Content-Type: application/x-pkcs7-signature;
	name="smime.p7s"

Content-Disposition: attachment;
	filename="smime.p7s"

Attachment Converted: "c:\programme\eudora\attach\smime2.p7s"
------=_NextPart_000_0027_01BD7836.BD6630C0--
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:16 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWn3G-00Mu36C>; Tue, 5 May 1998 21:06:54 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA29830;
	Tue, 5 May 1998 21:07:48 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0AAEFDE; Mon, 04 May 1998 20:04:22 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354E1F46.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 May 1998 14:51:28 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] [GFA] $10800048
X-UIDL: 9742d271fc1d86a9a040ecfd3e538c6d

* List: gfabasic@linux.net.eu.org

Message text written by Tom Record

>Would someone w/ access to whatever gives listbox styles in an 8-digit 
number please identify this one for me?

> CONTROL "Text",100,"listbox",$10800048 | WS_VSCROLL,10,10,608,142 <

From 'windows.h'

'LBS_MULTIPLESEL       0x0008L
'LBS_HASSTRINGS        0x0040L
'WS_VISIBLE            0x10000000L
'WS_BORDER             0x00800000L

Tom, it's not just the listbox style, it's also the window style.

Try this in the GFA direct window; ALT+D

PRINT HEX$(WS_BORDER | WS_VISIBLE | LBS_HASSTRINGS | LBS_MULTIPLESEL)

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:24 1998
Return-Path: <schonema@post6.tele.dk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWp2K-00MuhwC>; Tue, 5 May 1998 23:14:04 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA31181;
	Tue, 5 May 1998 23:14:33 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0ABEE91; Mon, 04 May 1998 22:10:53 +0000 (???)
From: "Jan Schnemann" <schonema@post6.tele.dk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354E3CED.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  by post-relay2.inet.tele.dk with SMTP; 5 May 1998 21:12:13 -0000
          (Netscape Mail Server v) with ESMTP id AAA24024
          for <gfabasic@linux.net.eu.org>; Tue, 5 May 1998 23:12:10 +0200
Date: Tue, 05 May 1998 23:12:05 +0200
X-Mailer: Mozilla 4.03 [da] (Win95; I)
MIME-Version: 1.0
References: <354E0531.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=iso-8859-1
Subject: [GFA] Re: [GFA] Re: [GFA] MIDI programming

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id XAA31181
X-UIDL: 90cf6e0a20378b41a135b128ffc45f61

* List: gfabasic@linux.net.eu.org

Hi Dale Bryant
Thanks!

> * List: gfabasic@linux.net.eu.org
>
> Jan,
> If you are interested in using GFA for Midi programming send a email to Mark
> Feaver. Mark has done extensive  midi programming in GFA. He sent me a
> midi/karoke program that is really great. I think Mark would be willing to
> help you. His email address is below.
> Dale Bryant
> adbryant@msn.com
>
> Mark Feaver
> E-mail Address(es):
>   mfeaver@s3.sonnet.com
>
> -----Original Message-----
> From: Jan Schnemann <schonema@post6.tele.dk>
> To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
> Date: Tuesday, May 05, 1998 3:22 AM
> Subject: [GFA] MIDI programming
>
> >* List: gfabasic@linux.net.eu.org
> >
> >I have some questions:
> >1) Is it possible form GFABASIC/DOS to do something like the SETMOUSE
> >x,y from GFA-B-Atari?
> >
> >2) How can i - GFA for WINDOWS- do something like:
> >OPEN "O",#1,"MID:"
> >DO
> >  PRINT #1;CHR$(MAX(MOUSEY,127));
> >LOOP UNTIL MOUSEK
> >CLOSE #1
> >
> >Best Regards
> >
> >Jan Schnemann, Denmark
> >
> >
> >
> >
> >
> >
> >---
> >This mailing list is currently running BeroList v2.5.6
> >Report problems to bero@bero-online.ml.org
> >
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:53 1998
Return-Path: <schonema@post6.tele.dk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWqEK-00Mu36C>; Wed, 6 May 1998 00:30:32 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA32159;
	Wed, 6 May 1998 00:31:25 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A4348D; Mon, 04 May 1998 23:27:48 +0000 (???)
From: "Jan Schnemann" <schonema@post6.tele.dk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354E4EF4.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  by post-relay2.inet.tele.dk with SMTP; 5 May 1998 22:29:16 -0000
          (Netscape Mail Server v) with ESMTP id AAA75182
          for <gfabasic@linux.net.eu.org>; Wed, 6 May 1998 00:29:14 +0200
Date: Wed, 06 May 1998 00:29:10 +0200
X-Mailer: Mozilla 4.03 [da] (Win95; I)
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="------------F259ADD82F29F0EB292A94F2"
Subject: [GFA] [Fwd: [GFA] Re: [GFA] MIDI programming]
X-UIDL: 88c198f0fd5756edcb1fadc7c7c46b05


Message-ID: <354F80A5.858D306D@post6.tele.dk>
Date: Tue, 05 May 1998 23:12:05 +0200
From: "Jan Schnemann" <schonema@post6.tele.dk>
X-Mailer: Mozilla 4.03 [da] (Win95; I)
MIME-Version: 1.0
To: gfabasic@linux.net.eu.org
Subject: Re: [GFA] Re: [GFA] MIDI programming
References: <354E0531.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=iso-8859-1

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id AAA32159

Hi Dale Bryant
Thanks!

> * List: gfabasic@linux.net.eu.org
>
> Jan,
> If you are interested in using GFA for Midi programming send a email to Mark
> Feaver. Mark has done extensive  midi programming in GFA. He sent me a
> midi/karoke program that is really great. I think Mark would be willing to
> help you. His email address is below.
> Dale Bryant
> adbryant@msn.com
>
> Mark Feaver
> E-mail Address(es):
>   mfeaver@s3.sonnet.com
>
> -----Original Message-----
> From: Jan Schnemann <schonema@post6.tele.dk>
> To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
> Date: Tuesday, May 05, 1998 3:22 AM
> Subject: [GFA] MIDI programming
>
> >* List: gfabasic@linux.net.eu.org
> >
> >I have some questions:
> >1) Is it possible form GFABASIC/DOS to do something like the SETMOUSE
> >x,y from GFA-B-Atari?
> >
> >2) How can i - GFA for WINDOWS- do something like:
> >OPEN "O",#1,"MID:"
> >DO
> >  PRINT #1;CHR$(MAX(MOUSEY,127));
> >LOOP UNTIL MOUSEK
> >CLOSE #1
> >
> >Best Regards
> >
> >Jan Schnemann, Denmark
> >
> >
> >
> >
> >
> >
> >---
> >This mailing list is currently running BeroList v2.5.6
> >Report problems to bero@bero-online.ml.org
> >
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org



From ???@??? Thu May 07 00:44:55 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWwq0-00MubtC>; Wed, 6 May 1998 07:33:52 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA10173;
	Wed, 6 May 1998 07:34:57 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A31202; Tue, 05 May 1998 06:28:57 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354EB1A9.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 06 May 1998 01:28:43 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <354E0094.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Maximum font height?
X-UIDL: bc0326ef1162596cf4c5fd0fd02b13b1

* List: gfabasic@linux.net.eu.org

Are you querying whether the font can do that size or not before you _font$= ?
--Bob

Peu a peu wrote:

> * List: gfabasic@linux.net.eu.org
>
> Hi,
>
> I've been trying to get my application to work under W3.1 and discovered that
> it eventually crashes if I try to set the font height too large.  The segment
> of code where the problem occurs draws random characters from random fonts
> (all those installed on the computer) repeatedly to the screen in various
> heights and boldnesses.  I set the font and height using the "_FONT$ ="
> command.  I've also tried setting the font height using the "FONT HEIGHT"
> command.  In both cases, if I allow the maximum height to be -100, then
> eventually (in a few minutes) the routine crashes the computer (and not on any
> particular height).   In other words, it will start out drawing characters to
> the screen that are as large as the maximum and it does not crash on any
> particular font.  If I set the maximum height to -60, then the routine runs
> indefinitely (for hours!) with no sign of a problem.  I have not tried
> intermediate numbers.
>
> So ... is there an undocumented maximum allowed font height or is there a
> possible bug in SET HEIGHT and _FONT$?
>
> James Schumacher
> Millennium Software
> peuapeu@aol.com
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:56 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWxga-00MugHC>; Wed, 6 May 1998 08:28:12 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA10445;
	Wed, 6 May 1998 08:29:30 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0ABDF9D; Tue, 05 May 1998 07:23:49 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354EBE85.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 6 May 1998 08:27:11 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Logging WM_CHAR Infos...
X-UIDL: 06972aaa1cef56c50ef842073075b0ad

* List: gfabasic@linux.net.eu.org



I am still trying to get WM_CHARs from other applications...

* My statement about Winsight was WRONG, a "Hook"-DLL is used

* Nevertheless, I still fail to do the right stuff...


@Init
quit& = 0
DO
  GETEVENT
  IF _Mess = WM_SpyVsSpy%
    HOOKWin& = WORD{_lParam + 8}
    HOOKMessage& = WORD{_lParam + 6}
    HOOKwParam& = WORD{_lParam + 4}
    HOOKlParam% = LONG{_lParam}
    PRINT
HEX$(HOOKWin&,4)'HEX$(HOOKMessage&,2)'HEX$(HOOKwParam&,4)'HEX$(HOOKlPara
m&,8)
  ENDIF
  IF MENU(1) = 4 THEN quit& = 1
UNTIL quit&
@Ende

PROCEDURE DumpMessage(hWin&,Message&,wParam&,lParam%)
  PRINT "*"'  // Same effect with and without CB...
RETURN
PROCEDURE Init
  DLL #1,"spyhook.dll"
    DECL BYTE InitHook(W,W)
    DECL BYTE EndHook()
  ENDDLL

  OPENW #1,0,0,500,500,0

  WM_SpyVsSpy% = RegisterWindowMessage("WM_SPYVSSPY")
  CB WIN(1),WM_SpyVsSpy%,DumpMessage() // Not helpful
  ~@@InitHook(WIN(1),WM_SpyVsSpy%)
RETURN
PROCEDURE Ende
  ~@@EndHook()
  CLOSEW #1
  FREEDLL 1
  END
RETURN

------------------------------------------------------------------------
--

$library SPYOOKDLL
$LNK EXE c:\win\SPYHOOK.DLL
'
PROCEDURE InitHook(wParam1&,wParam2&)
  $EXPORT InitHook
  HookWindow&  = wParam1&  
  HookMessage& = wParam2&  
  DLL #1,"user"
    DECL WORD SetWindowsHookEx(W,L,W,W)
    DECL LONG CallNextHookEx(W,W,W,L)
    DECL BYTE UnhookWindowsHookEx(W)
  ENDDLL
  HookAdr%=GetProcAddress(_INSTANCE,"HookProc")
  hhook& = @@SetWindowsHookEx(WH_CALLWNDPROC,HookAdr%,_INSTANCE,NULL)
  RETVAL 0
RETURN
PROCEDURE HookProc(Code&,wParam&,lParam%)
  $EXPORT HookProc
  Puffer$ = PEEK$(lParam%,10)
  ~PostMessage(HookWindow&,HookMessage&,wParam&,V:Puffer$)
  IF Code& < 0  // HC_ACTION&=0 (Standard-Hook-Code)
    ~@@CallNextHookEx(hhook&, Code&, wParam&, lParam%)
  ENDIF
  RETVAL 0
RETURN
PROCEDURE EndHook()
  $EXPORT EndHook
  ~@@UnhookWindowsHookEx(hhook&)
  FREEDLL 1
  RETVAL 0
RETURN



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:44:58 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWxic-00MugZC>; Wed, 6 May 1998 08:30:18 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA10508;
	Wed, 6 May 1998 08:31:33 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0B8F769; Tue, 05 May 1998 07:26:07 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354EBF0F.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 6 May 1998 08:29:32 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Attributes (in Explore.Exe)
X-UIDL: c98b316a5ea6566991e56cf4c75f59b0

* List: gfabasic@linux.net.eu.org

Someone asked me for showing attributes (in my Explore.Exe)...

just do this code...



procedure listdir
  :
  :
  t& = DPEEK(dta% + 22)       // Zeit       { Sekunde:  DEC$((t& & 31) *
2,2) }
  d& = DPEEK(dta% + 24)      // Datum

  // NEU ! //
  out$ = out$ +" "+@attrib$(a|)+" "+DEC$(d& & 31,2) + "." +
DEC$(SHR&(d&,4) & 15,2) + "." + DEC$(80 + (SHR&(d&,9) & 127),2)

  ~SendMessage(DLGITEM(0,200),LB_ADDSTRING,0,out$)
  :
  :
return

// NEU ! //
FUNCTION attrib$(a|)
  LOCAL a$,i&
  a$="rhsvda"
  FOR i&=0 TO 5
    IF BTST(a|,i&)=0
      MID$(a$,SUCC(i&),1)=" "
    ENDIF
  NEXT i&
  RETURN a$
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:45:00 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWzgT-00MuhtC>; Wed, 6 May 1998 10:36:13 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA11223;
	Wed, 6 May 1998 10:37:27 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A62563; Tue, 05 May 1998 09:31:07 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354EDC5B.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 06 May 1998 04:30:56 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <354EBE85.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Logging WM_CHAR Infos...
X-UIDL: af648ad2402d8074026f6d3eb3796a3a

* List: gfabasic@linux.net.eu.org

Have you tested to see that the dll is loaded and running, for example have
it send "OK" to the clipboard?

--B

Vogel Michael wrote:

> * List: gfabasic@linux.net.eu.org
>
> I am still trying to get WM_CHARs from other applications...
>
> * My statement about Winsight was WRONG, a "Hook"-DLL is used
>
> * Nevertheless, I still fail to do the right stuff...
>
> @Init
> quit& = 0
> DO
>   GETEVENT
>   IF _Mess = WM_SpyVsSpy%
>     HOOKWin& = WORD{_lParam + 8}
>     HOOKMessage& = WORD{_lParam + 6}
>     HOOKwParam& = WORD{_lParam + 4}
>     HOOKlParam% = LONG{_lParam}
>     PRINT
> HEX$(HOOKWin&,4)'HEX$(HOOKMessage&,2)'HEX$(HOOKwParam&,4)'HEX$(HOOKlPara
> m&,8)
>   ENDIF
>   IF MENU(1) = 4 THEN quit& = 1
> UNTIL quit&
> @Ende
>
> PROCEDURE DumpMessage(hWin&,Message&,wParam&,lParam%)
>   PRINT "*"'  // Same effect with and without CB...
> RETURN
> PROCEDURE Init
>   DLL #1,"spyhook.dll"
>     DECL BYTE InitHook(W,W)
>     DECL BYTE EndHook()
>   ENDDLL
>
>   OPENW #1,0,0,500,500,0
>
>   WM_SpyVsSpy% = RegisterWindowMessage("WM_SPYVSSPY")
>   CB WIN(1),WM_SpyVsSpy%,DumpMessage() // Not helpful
>   ~@@InitHook(WIN(1),WM_SpyVsSpy%)
> RETURN
> PROCEDURE Ende
>   ~@@EndHook()
>   CLOSEW #1
>   FREEDLL 1
>   END
> RETURN
>
> ------------------------------------------------------------------------
> --
>
> $library SPYOOKDLL
> $LNK EXE c:\win\SPYHOOK.DLL
> '
> PROCEDURE InitHook(wParam1&,wParam2&)
>   $EXPORT InitHook
>   HookWindow&  = wParam1&
>   HookMessage& = wParam2&
>   DLL #1,"user"
>     DECL WORD SetWindowsHookEx(W,L,W,W)
>     DECL LONG CallNextHookEx(W,W,W,L)
>     DECL BYTE UnhookWindowsHookEx(W)
>   ENDDLL
>   HookAdr%=GetProcAddress(_INSTANCE,"HookProc")
>   hhook& = @@SetWindowsHookEx(WH_CALLWNDPROC,HookAdr%,_INSTANCE,NULL)
>   RETVAL 0
> RETURN
> PROCEDURE HookProc(Code&,wParam&,lParam%)
>   $EXPORT HookProc
>   Puffer$ = PEEK$(lParam%,10)
>   ~PostMessage(HookWindow&,HookMessage&,wParam&,V:Puffer$)
>   IF Code& < 0  // HC_ACTION&=0 (Standard-Hook-Code)
>     ~@@CallNextHookEx(hhook&, Code&, wParam&, lParam%)
>   ENDIF
>   RETVAL 0
> RETURN
> PROCEDURE EndHook()
>   $EXPORT EndHook
>   ~@@UnhookWindowsHookEx(hhook&)
>   FREEDLL 1
>   RETVAL 0
> RETURN
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:45:03 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWzkM-00MuiCC>; Wed, 6 May 1998 10:40:14 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA11317;
	Wed, 6 May 1998 10:41:38 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A26893; Tue, 05 May 1998 09:35:59 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354EDD7F.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 06 May 1998 04:35:48 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <354EBF0F.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Attributes (in Explore.Exe)
X-UIDL: 142600acc894fbefba1d517d37c0591b

* List: gfabasic@linux.net.eu.org

FGETDTA example in gfa help

--B

Vogel Michael wrote:

> * List: gfabasic@linux.net.eu.org
>
> Someone asked me for showing attributes (in my Explore.Exe)...
>
> just do this code...
>
> procedure listdir
>   :
>   :
>   t& = DPEEK(dta% + 22)       // Zeit       { Sekunde:  DEC$((t& & 31) *
> 2,2) }
>   d& = DPEEK(dta% + 24)      // Datum
>
>   // NEU ! //
>   out$ = out$ +" "+@attrib$(a|)+" "+DEC$(d& & 31,2) + "." +
> DEC$(SHR&(d&,4) & 15,2) + "." + DEC$(80 + (SHR&(d&,9) & 127),2)
>
>   ~SendMessage(DLGITEM(0,200),LB_ADDSTRING,0,out$)
>   :
>   :
> return
>
> // NEU ! //
> FUNCTION attrib$(a|)
>   LOCAL a$,i&
>   a$="rhsvda"
>   FOR i&=0 TO 5
>     IF BTST(a|,i&)=0
>       MID$(a$,SUCC(i&),1)=" "
>     ENDIF
>   NEXT i&
>   RETURN a$
> ENDFUNC
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:45:04 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yWzs0-00MuhVC>; Wed, 6 May 1998 10:48:08 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA11424;
	Wed, 6 May 1998 10:48:02 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A297D1; Tue, 05 May 1998 09:42:27 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354EDF03.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 06 May 1998 04:42:23 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <354DDE29.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] Re: [GFA] Re: [GFA] info, please   0405zz1-
X-UIDL: b6846cc020fa84ddd3bf5571d00cebc7

* List: gfabasic@linux.net.eu.org

I almost bought the SDK just to get windows.h. I found a QUE book with lots of
constants, but no values for the ones GFA doesn't know. There are more in DDK,
and new ones being used all the time. It would be nice if anyone had a list to
post it or offer to email it. Or it could be easy to download from
ftp.microsoft.com

--B

Tom Record wrote:

> * List: gfabasic@linux.net.eu.org
>
> windows.h


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:45:06 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yX0zy-00Mu4HC>; Wed, 6 May 1998 12:00:26 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA11922;
	Wed, 6 May 1998 12:01:31 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0ACCE01; Tue, 05 May 1998 10:57:27 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354EF098.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 6 May 1998 12:00:49 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] AW: [GFA] Re: [GFA] Logging WM_CHAR Infos...
X-UIDL: 5fc0845a2300a309e2706afa7230b202

* List: gfabasic@linux.net.eu.org

It runs, and you see hundred of other Events (If you move the mouse,
ettc.), but NOT if you press a key !!

>----------
>Von: 	Bob Dodds[SMTP:recbo@erols.com]
>Gesendet: 	Mittwoch, 06. Mai 1998 13:30
>An: 	gfabasic@linux.net.eu.org
>Betreff: 	[GFA] Re: [GFA] Logging WM_CHAR Infos...
>
>* List: gfabasic@linux.net.eu.org
>
>Have you tested to see that the dll is loaded and running, for example have
>it send "OK" to the clipboard?
>
>--B
>
>Vogel Michael wrote:
>
>> * List: gfabasic@linux.net.eu.org
>>
>> I am still trying to get WM_CHARs from other applications...
>>
>> * My statement about Winsight was WRONG, a "Hook"-DLL is used
>>
>> * Nevertheless, I still fail to do the right stuff...
>>
>> @Init
>> quit& = 0
>> DO
>>   GETEVENT
>>   IF _Mess = WM_SpyVsSpy%
>>     HOOKWin& = WORD{_lParam + 8}
>>     HOOKMessage& = WORD{_lParam + 6}
>>     HOOKwParam& = WORD{_lParam + 4}
>>     HOOKlParam% = LONG{_lParam}
>>     PRINT
>> HEX$(HOOKWin&,4)'HEX$(HOOKMessage&,2)'HEX$(HOOKwParam&,4)'HEX$(HOOKlPara
>> m&,8)
>>   ENDIF
>>   IF MENU(1) = 4 THEN quit& = 1
>> UNTIL quit&
>> @Ende
>>
>> PROCEDURE DumpMessage(hWin&,Message&,wParam&,lParam%)
>>   PRINT "*"'  // Same effect with and without CB...
>> RETURN
>> PROCEDURE Init
>>   DLL #1,"spyhook.dll"
>>     DECL BYTE InitHook(W,W)
>>     DECL BYTE EndHook()
>>   ENDDLL
>>
>>   OPENW #1,0,0,500,500,0
>>
>>   WM_SpyVsSpy% = RegisterWindowMessage("WM_SPYVSSPY")
>>   CB WIN(1),WM_SpyVsSpy%,DumpMessage() // Not helpful
>>   ~@@InitHook(WIN(1),WM_SpyVsSpy%)
>> RETURN
>> PROCEDURE Ende
>>   ~@@EndHook()
>>   CLOSEW #1
>>   FREEDLL 1
>>   END
>> RETURN
>>
>> ------------------------------------------------------------------------
>> --
>>
>> $library SPYOOKDLL
>> $LNK EXE c:\win\SPYHOOK.DLL
>> '
>> PROCEDURE InitHook(wParam1&,wParam2&)
>>   $EXPORT InitHook
>>   HookWindow&  = wParam1&
>>   HookMessage& = wParam2&
>>   DLL #1,"user"
>>     DECL WORD SetWindowsHookEx(W,L,W,W)
>>     DECL LONG CallNextHookEx(W,W,W,L)
>>     DECL BYTE UnhookWindowsHookEx(W)
>>   ENDDLL
>>   HookAdr%=GetProcAddress(_INSTANCE,"HookProc")
>>   hhook& = @@SetWindowsHookEx(WH_CALLWNDPROC,HookAdr%,_INSTANCE,NULL)
>>   RETVAL 0
>> RETURN
>> PROCEDURE HookProc(Code&,wParam&,lParam%)
>>   $EXPORT HookProc
>>   Puffer$ = PEEK$(lParam%,10)
>>   ~PostMessage(HookWindow&,HookMessage&,wParam&,V:Puffer$)
>>   IF Code& < 0  // HC_ACTION&=0 (Standard-Hook-Code)
>>     ~@@CallNextHookEx(hhook&, Code&, wParam&, lParam%)
>>   ENDIF
>>   RETVAL 0
>> RETURN
>> PROCEDURE EndHook()
>>   $EXPORT EndHook
>>   ~@@UnhookWindowsHookEx(hhook&)
>>   FREEDLL 1
>>   RETVAL 0
>> RETURN
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:45:14 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yX8Mz-00MugcC>; Wed, 6 May 1998 19:52:41 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA15474;
	Wed, 6 May 1998 19:53:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A2A6CC; Tue, 05 May 1998 18:48:51 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354F5F18.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 6 May 1998 13:49:59 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 2.6 for Mac
Subject: [GFA] Re: [GFA] Maximum font height?
X-UIDL: 717e5a95ace68ab163f5b32dd7235ad5

* List: gfabasic@linux.net.eu.org

>> Are you querying whether the font can do that size or not before you
_font$= ? <<

No.  How is this done?  I gather you are suggesting that this is a maximum
allowed font size for each font?

James

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 07 00:45:17 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yX8NW-00MuhSC>; Wed, 6 May 1998 19:53:14 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA15527;
	Wed, 6 May 1998 19:54:03 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0BA8352; Tue, 05 May 1998 18:49:05 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <354F5F21.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 06 May 1998 13:48:48 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
References: <354EF098.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: [GFA] AW: [GFA] Re: [GFA] Logging WM_CHAR Infos...
X-UIDL: b950b0ea1ffcb67b4b26a0dd20407516

* List: gfabasic@linux.net.eu.org

Do you mean you see events in the getevent loop which were hooked in the dll and
posted, events that belong to other windows than getevent is eligible to know
about?

--Bob

Vogel Michael wrote:

> * List: gfabasic@linux.net.eu.org
>
> It runs, and you see hundred of other Events (If you move the mouse,
> ettc.), but NOT if you press a key !!
>
> >----------
> >Von:   Bob Dodds[SMTP:recbo@erols.com]
> >Gesendet:      Mittwoch, 06. Mai 1998 13:30
> >An:    gfabasic@linux.net.eu.org
> >Betreff:       [GFA] Re: [GFA] Logging WM_CHAR Infos...
> >
> >* List: gfabasic@linux.net.eu.org
> >
> >Have you tested to see that the dll is loaded and running, for example have
> >it send "OK" to the clipboard?
> >
> >--B
> >
> >Vogel Michael wrote:
> >
> >> * List: gfabasic@linux.net.eu.org
> >>
> >> I am still trying to get WM_CHARs from other applications...
> >>
> >> * My statement about Winsight was WRONG, a "Hook"-DLL is used
> >>
> >> * Nevertheless, I still fail to do the right stuff...
> >>
> >> @Init
> >> quit& = 0
> >> DO
> >>   GETEVENT
> >>   IF _Mess = WM_SpyVsSpy%
> >>     HOOKWin& = WORD{_lParam + 8}
> >>     HOOKMessage& = WORD{_lParam + 6}
> >>     HOOKwParam& = WORD{_lParam + 4}
> >>     HOOKlParam% = LONG{_lParam}
> >>     PRINT
> >> HEX$(HOOKWin&,4)'HEX$(HOOKMessage&,2)'HEX$(HOOKwParam&,4)'HEX$(HOOKlPara
> >> m&,8)
> >>   ENDIF
> >>   IF MENU(1) = 4 THEN quit& = 1
> >> UNTIL quit&
> >> @Ende
> >>
> >> PROCEDURE DumpMessage(hWin&,Message&,wParam&,lParam%)
> >>   PRINT "*"'  // Same effect with and without CB...
> >> RETURN
> >> PROCEDURE Init
> >>   DLL #1,"spyhook.dll"
> >>     DECL BYTE InitHook(W,W)
> >>     DECL BYTE EndHook()
> >>   ENDDLL
> >>
> >>   OPENW #1,0,0,500,500,0
> >>
> >>   WM_SpyVsSpy% = RegisterWindowMessage("WM_SPYVSSPY")
> >>   CB WIN(1),WM_SpyVsSpy%,DumpMessage() // Not helpful
> >>   ~@@InitHook(WIN(1),WM_SpyVsSpy%)
> >> RETURN
> >> PROCEDURE Ende
> >>   ~@@EndHook()
> >>   CLOSEW #1
> >>   FREEDLL 1
> >>   END
> >> RETURN
> >>
> >> ------------------------------------------------------------------------
> >> --
> >>
> >> $library SPYOOKDLL
> >> $LNK EXE c:\win\SPYHOOK.DLL
> >> '
> >> PROCEDURE InitHook(wParam1&,wParam2&)
> >>   $EXPORT InitHook
> >>   HookWindow&  = wParam1&
> >>   HookMessage& = wParam2&
> >>   DLL #1,"user"
> >>     DECL WORD SetWindowsHookEx(W,L,W,W)
> >>     DECL LONG CallNextHookEx(W,W,W,L)
> >>     DECL BYTE UnhookWindowsHookEx(W)
> >>   ENDDLL
> >>   HookAdr%=GetProcAddress(_INSTANCE,"HookProc")
> >>   hhook& = @@SetWindowsHookEx(WH_CALLWNDPROC,HookAdr%,_INSTANCE,NULL)
> >>   RETVAL 0
> >> RETURN
> >> PROCEDURE HookProc(Code&,wParam&,lParam%)
> >>   $EXPORT HookProc
> >>   Puffer$ = PEEK$(lParam%,10)
> >>   ~PostMessage(HookWindow&,HookMessage&,wParam&,V:Puffer$)
> >>   IF Code& < 0  // HC_ACTION&=0 (Standard-Hook-Code)
> >>     ~@@CallNextHookEx(hhook&, Code&, wParam&, lParam%)
> >>   ENDIF
> >>   RETVAL 0
> >> RETURN
> >> PROCEDURE EndHook()
> >>   $EXPORT EndHook
> >>   ~@@UnhookWindowsHookEx(hhook&)
> >>   FREEDLL 1
> >>   RETVAL 0
> >> RETURN
> >>
> >> ---
> >> This mailing list is currently running BeroList v2.5.6
> >> Report problems to bero@bero-online.ml.org
> >
> >
> >
> >
> >---
> >This mailing list is currently running BeroList v2.5.6
> >Report problems to bero@bero-online.ml.org
> >
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 08 18:45:54 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yXJIB-00MuZkC>; Thu, 7 May 1998 07:32:27 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA28553;
	Thu, 7 May 1998 07:34:14 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B0A71B41; Wed, 06 May 1998 06:30:09 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35500371.BeroList-2.5.6@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 7 May 1998 07:33:32 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] AW: [GFA] Re: [GFA] AW: [GFA] Re: [GFA] Logging WM_CHAR Infos...
X-UIDL: bb78e2c8210c27c2f707f372247d2e05

* List: gfabasic@linux.net.eu.org

Try it out...

You will see the newly registered WM_SpyVsSpy events.
Yesterday I played around with the line (with no success) :
	hhook& = @@SetWindowsHookEx(WH_CALLWNDPROC,HookAdr%,_INSTANCE,NULL)
There are other parameters than WH_CALLWNDPROC possible, maybe there is
the point. But I am to silly to get the code running.
As stated before, I'd like to have this tolls running to observe my PC
what things are done on it, while I am out

- Michael





>----------
>Von: 	Bob Dodds[SMTP:recbo@erols.com]
>Gesendet: 	Mittwoch, 06. Mai 1998 22:48
>An: 	gfabasic@linux.net.eu.org
>Betreff: 	[GFA] Re: [GFA] AW: [GFA] Re: [GFA] Logging WM_CHAR Infos...
>
>* List: gfabasic@linux.net.eu.org
>
>Do you mean you see events in the getevent loop which were hooked in the dll
>and
>posted, events that belong to other windows than getevent is eligible to know
>about?
>
>--Bob
>
>Vogel Michael wrote:
>
>> * List: gfabasic@linux.net.eu.org
>>
>> It runs, and you see hundred of other Events (If you move the mouse,
>> ettc.), but NOT if you press a key !!
>>
>> >----------
>> >Von:   Bob Dodds[SMTP:recbo@erols.com]
>> >Gesendet:      Mittwoch, 06. Mai 1998 13:30
>> >An:    gfabasic@linux.net.eu.org
>> >Betreff:       [GFA] Re: [GFA] Logging WM_CHAR Infos...
>> >
>> >* List: gfabasic@linux.net.eu.org
>> >
>> >Have you tested to see that the dll is loaded and running, for example
>>have
>> >it send "OK" to the clipboard?
>> >
>> >--B
>> >
>> >Vogel Michael wrote:
>> >
>> >> * List: gfabasic@linux.net.eu.org
>> >>
>> >> I am still trying to get WM_CHARs from other applications...
>> >>
>> >> * My statement about Winsight was WRONG, a "Hook"-DLL is used
>> >>
>> >> * Nevertheless, I still fail to do the right stuff...
>> >>
>> >> @Init
>> >> quit& = 0
>> >> DO
>> >>   GETEVENT
>> >>   IF _Mess = WM_SpyVsSpy%
>> >>     HOOKWin& = WORD{_lParam + 8}
>> >>     HOOKMessage& = WORD{_lParam + 6}
>> >>     HOOKwParam& = WORD{_lParam + 4}
>> >>     HOOKlParam% = LONG{_lParam}
>> >>     PRINT
>> >> HEX$(HOOKWin&,4)'HEX$(HOOKMessage&,2)'HEX$(HOOKwParam&,4)'HEX$(HOOKlPara
>> >> m&,8)
>> >>   ENDIF
>> >>   IF MENU(1) = 4 THEN quit& = 1
>> >> UNTIL quit&
>> >> @Ende
>> >>
>> >> PROCEDURE DumpMessage(hWin&,Message&,wParam&,lParam%)
>> >>   PRINT "*"'  // Same effect with and without CB...
>> >> RETURN
>> >> PROCEDURE Init
>> >>   DLL #1,"spyhook.dll"
>> >>     DECL BYTE InitHook(W,W)
>> >>     DECL BYTE EndHook()
>> >>   ENDDLL
>> >>
>> >>   OPENW #1,0,0,500,500,0
>> >>
>> >>   WM_SpyVsSpy% = RegisterWindowMessage("WM_SPYVSSPY")
>> >>   CB WIN(1),WM_SpyVsSpy%,DumpMessage() // Not helpful
>> >>   ~@@InitHook(WIN(1),WM_SpyVsSpy%)
>> >> RETURN
>> >> PROCEDURE Ende
>> >>   ~@@EndHook()
>> >>   CLOSEW #1
>> >>   FREEDLL 1
>> >>   END
>> >> RETURN
>> >>
>> >> ------------------------------------------------------------------------
>> >> --
>> >>
>> >> $library SPYOOKDLL
>> >> $LNK EXE c:\win\SPYHOOK.DLL
>> >> '
>> >> PROCEDURE InitHook(wParam1&,wParam2&)
>> >>   $EXPORT InitHook
>> >>   HookWindow&  = wParam1&
>> >>   HookMessage& = wParam2&
>> >>   DLL #1,"user"
>> >>     DECL WORD SetWindowsHookEx(W,L,W,W)
>> >>     DECL LONG CallNextHookEx(W,W,W,L)
>> >>     DECL BYTE UnhookWindowsHookEx(W)
>> >>   ENDDLL
>> >>   HookAdr%=GetProcAddress(_INSTANCE,"HookProc")
>> >>   hhook& = @@SetWindowsHookEx(WH_CALLWNDPROC,HookAdr%,_INSTANCE,NULL)
>> >>   RETVAL 0
>> >> RETURN
>> >> PROCEDURE HookProc(Code&,wParam&,lParam%)
>> >>   $EXPORT HookProc
>> >>   Puffer$ = PEEK$(lParam%,10)
>> >>   ~PostMessage(HookWindow&,HookMessage&,wParam&,V:Puffer$)
>> >>   IF Code& < 0  // HC_ACTION&=0 (Standard-Hook-Code)
>> >>     ~@@CallNextHookEx(hhook&, Code&, wParam&, lParam%)
>> >>   ENDIF
>> >>   RETVAL 0
>> >> RETURN
>> >> PROCEDURE EndHook()
>> >>   $EXPORT EndHook
>> >>   ~@@UnhookWindowsHookEx(hhook&)
>> >>   FREEDLL 1
>> >>   RETVAL 0
>> >> RETURN
>> >>
>> >> ---
>> >> This mailing list is currently running BeroList v2.5.6
>> >> Report problems to bero@bero-online.ml.org
>> >
>> >
>> >
>> >
>> >---
>> >This mailing list is currently running BeroList v2.5.6
>> >Report problems to bero@bero-online.ml.org
>> >
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 21 00:19:58 1998
Return-Path: <bero@windows95.sucks.eu.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycFSl-00N5SzC>; Wed, 20 May 1998 22:27:47 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA16527;
	Wed, 20 May 1998 22:26:18 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21DAF37; Tue, 19 May 1998 21:20:26 +0000 (???)
From: Bernhard Rosenkraenzer <bero@windows95.sucks.eu.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3561F79B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 20 May 1998 22:18:28 +0200 (MEST)
X-Sender: bero@P133.bero
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] Mailing list problems
X-UIDL: 576dc09617dfb6ad84772011be8255ae

* List: gfabasic@linux.net.eu.org

Hello,
if this message arrives, the mailing list is back.

For those who don't know already:
There was a problem with broken RAMs, and the list program refused to run
with the remaining 4 MB on the server.
It still doesn't have more memory, but I think I've figured out how to
"talk" the list program into working with 4 MB.

I'm not promising it'll stay that way, though I hope so.

LLaP
bero




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 21 00:19:59 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycFfP-00N5SsC>; Wed, 20 May 1998 22:40:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA16738;
	Wed, 20 May 1998 22:41:48 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21BDB59; Tue, 19 May 1998 21:38:08 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3561FBC0.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 20 May 1998 13:37:26 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] Mailing list problems
X-UIDL: 5404aaa8751ecddb4bfa757de310f6ed

* List: gfabasic@linux.net.eu.org

Great News!  Thanks

-----Original Message-----
From: Bernhard Rosenkraenzer <bero@windows95.sucks.eu.org>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Wednesday, May 20, 1998 1:23 PM
Subject: [GFA] Mailing list problems


>* List: gfabasic@linux.net.eu.org
>
>Hello,
>if this message arrives, the mailing list is back.
>
>For those who don't know already:
>There was a problem with broken RAMs, and the list program refused to run
>with the remaining 4 MB on the server.
>It still doesn't have more memory, but I think I've figured out how to
>"talk" the list program into working with 4 MB.
>
>I'm not promising it'll stay that way, though I hope so.
>
>LLaP
>bero
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 21 00:20:00 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycGDG-00N4h4C>; Wed, 20 May 1998 23:15:50 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA17150;
	Wed, 20 May 1998 23:16:48 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2148BA3; Tue, 19 May 1998 22:13:05 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356203F1.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtigwc04.worldnet.att.net (post.office MTA v2.0 0613 )
          with SMTP id AAB4252 for <gfabasic@linux.net.eu.org>;
          Tue, 20 Jan 1998 21:15:01 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 20 Jan 1998 21:15:01 +0000
Subject: [GFA] bmp save  2005xx2-
X-UIDL: 7f96a350ce365e607260e5baa9af3256

* List: gfabasic@linux.net.eu.org

20/05/98 1:56:47 PM   bmp save  2005xx2-

Desparately need help w/ saving a *.bmp.

Image - 77x93, 8-bit,  8.31K
GFA-W save .......... 14.2K
Other saves @ 24-bit, 21.1K

I have many editors that will read/write *.bmp as 8-bit & 24-bit.

GFA-W will read either one, also.  However... a GFA-W write will 
_NOT_ open in anything but GFA-W.  I've tried using everything I
have found on this to get a GFA-W written *.bmp to open in other
editors - no success what so ever.

Is it not possible to write a common 8-bit or 24-bit *.bmp with 
GFA-W?

I'm sorry, but any *.bmp written by a GFA-W program must be readable
by any other editor or display as far as I'm conserned or the function
is absolutely useless to me.  I don't want a propriatory format.

Help desparately needed & greatly appreciated.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 22 10:41:11 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycHGJ-00N5STC>; Thu, 21 May 1998 00:23:03 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA17670;
	Thu, 21 May 1998 00:23:29 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21E4865; Tue, 19 May 1998 23:19:44 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35621391.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 20 May 1998 18:19:35 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <3561F79B.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Mailing list problems
X-UIDL: cb9840debfe252becd8ff8da5f9b9a53

* List: gfabasic@linux.net.eu.org

I've been forwarding this list, item by item, to alt.lang.gfa-basic. It's
empty otherwise.
I did get one new correspondent that way, by his subscribing to that
newsgroup.

I bought what was labelled as 16 Mb ram( used) but when I tried it, I found
that
it was actually 32 Mb EDO ram--for $21.99. I called the store, they put me on

hold for five minutes, I hung up. Too bad. My old 16 Mb didn't work with the
32 EDO, so I gave 16 Mb to a friend, so he could have 32 total. Used 32 mb
EDO should be $59. When the 486-33 came out, I paid $800 for that 16 Mb
I just gave away. Now I have 32 for $21.99.

-Bob

Bernhard Rosenkraenzer wrote:

> * List: gfabasic@linux.net.eu.org
>
> Hello,
> if this message arrives, the mailing list is back.
>
> For those who don't know already:
> There was a problem with broken RAMs, and the list program refused to run
> with the remaining 4 MB on the server.
> It still doesn't have more memory, but I think I've figured out how to
> "talk" the list program into working with 4 MB.
>
> I'm not promising it'll stay that way, though I hope so.
>
> LLaP
> bero
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 22 10:41:12 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycJ01-00Mv9cC>; Thu, 21 May 1998 02:14:21 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA18285;
	Thu, 21 May 1998 02:15:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B218BBC3; Wed, 20 May 1998 01:11:42 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35622DCE.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 20 May 1998 20:11:46 -0700
X-Mailer: Mozilla 4.04 [en] (Win16; U)
MIME-Version: 1.0
Newsgroups: alt.lang.gfa-basic
References: <356203F1.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] bmp save  2005xx2-
X-UIDL: 8c069265c4acd094809ed1f7fb93caca

* List: gfabasic@linux.net.eu.org

Tom,

So you are talking about the savebmp.lst example not working?
I never got it to work. This is some of what I learned while I
was getting to my goal of putting bitmaps into source files as
resources.

You should have bitmap width and height divisible by four in order
to use that API call--it will probably pad up or round off if you don't.

I tried that file, which does different versions of the same thing. Then I
tried
another way, GetBitmapBits, which is the same as gfa GET. In the process
I learned something about the headers, starting with "BM" being the first
two bytes of a bitmap file.

The GetDIB form gets a header, then either bitmap bits in 32-bit rgb(3 rgb

bytes and zero, potentially a mask value from an image editor), or a
palette
and a block of one byte bitmap bits that index the palette for each pixel
(256-color).

There is sometimes a block(40 bytes?) I call a scratch sheet, because
I think it is some sort of buffer, and that is discoverred by the first
call
in the savebmp.lst, where it seems to be the first of two identical and
redundant calls, but really the first one is just to find out if there is
that
scratch sheet to contend with.

In addition to header, scratch sheet or palette, the device-
independent form gotten by savebmp.lst gets the bitmap starting
with the lower right-hand corner, and working backwards across
line by line. Also it will round off lines to a multiple of 4.

The other form, just the actual bits gotten by gfa GET or API
GetBitmapBits(device-dependent in that it doesn't give you the
palette its bytes index into), that form is different in that it
proceeds from top left corner, across each line from left to right,
down, instead of bottom right corner and right to left, up.

In one instance I took the long form, took just the bitmap block,
and reversed it top to bottom, left to right, to get it to bitblt or
PUT.

I never really solved the problem of saving to disk, as I was
only learning enough to take a bitmap from disk and compress
it into a resource in my source file. So I can't get you there,
just take you a step farther in your understanding.

There are books and a Dr. Dobbs CD that explain all image
formats in detail, and then you could use one API or the
other.

--Bob

Tom Record wrote:

> * List: gfabasic@linux.net.eu.org
>
> 20/05/98 1:56:47 PM   bmp save  2005xx2-
>
> Desparately need help w/ saving a *.bmp.
>
> Image - 77x93, 8-bit,  8.31K
> GFA-W save .......... 14.2K
> Other saves @ 24-bit, 21.1K
>
> I have many editors that will read/write *.bmp as 8-bit & 24-bit.
>
> GFA-W will read either one, also.  However... a GFA-W write will
> _NOT_ open in anything but GFA-W.  I've tried using everything I
> have found on this to get a GFA-W written *.bmp to open in other
> editors - no success what so ever.
>
> Is it not possible to write a common 8-bit or 24-bit *.bmp with
> GFA-W?
>
> I'm sorry, but any *.bmp written by a GFA-W program must be readable
> by any other editor or display as far as I'm conserned or the function
> is absolutely useless to me.  I don't want a propriatory format.
>
> Help desparately needed & greatly appreciated.
> <G>
> TomR.
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 22 10:41:14 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycM0M-00N4mdC>; Thu, 21 May 1998 05:26:54 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id FAA19143;
	Thu, 21 May 1998 05:28:15 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B213270C; Wed, 20 May 1998 04:24:22 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35625AF6.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 20 May 1998 23:25:59 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: Re: [GFA] bmp save  2005xx2-
X-UIDL: c0bd279bb278f6066e0f4fc3b219d596

* List: gfabasic@linux.net.eu.org

<< Desparately need help w/ saving a *.bmp. >>

Tom,

Have you bought Sjouke Hamstra's "Programming in GFABasic For Windows" book
yet?  Not only is it a great book, it includes a wonderful little DLL with all
sorts of functions for manipulating (including saving) bitmaps.

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 22 10:41:15 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycMVG-00N4hEC>; Thu, 21 May 1998 05:58:50 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id GAA19292;
	Thu, 21 May 1998 06:00:10 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2103419; Wed, 20 May 1998 04:56:22 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35626276.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtigwc04.worldnet.att.net (post.office MTA v2.0 0613 )
          with SMTP id AAA1036 for <gfabasic@linux.net.eu.org>;
          Wed, 21 Jan 1998 03:58:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 21 Jan 1998 03:58:07 +0000
Subject: Re: [GFA] bmp save  2005xx2-
X-UIDL: a6eba63401c54453b93512519f928fd7

* List: gfabasic@linux.net.eu.org

At 11:25 PM 20/05/98 EDT, you wrote:
>* List: gfabasic@linux.net.eu.org
>
><< Desparately need help w/ saving a *.bmp. >>
>
>Tom,
>
>Have you bought Sjouke Hamstra's "Programming in GFABasic For Windows" book
>yet?  Not only is it a great book, it includes a wonderful little DLL with all
>sorts of functions for manipulating (including saving) bitmaps.
>
>James Schumacher
>peuapeu@aol.com
>

+++

Have just today located the book... $89 U.S.  Ouch!  Am using one of
Sjouke's routines (modified slightly to work inside another program).  Would
assume the *.dll will save the same way - a propriatory format no standard
"C"-type pr VB program will load...

Image - 77x93, 8-bit,  8.31K  all other editors
GFA-W save .......... 14.2K  Not 8-bit - perhaps 24-bit compressed?
Other saves @ 24-bit, 21.1K   all other editors

Most of my other editors drop it saying "compressed *.bmp not supported",
one says "only 1, 4, 8 & 24-bit formats supported".

If I have to resort to a *.dll, would prefer having 8 or 9 input formats,
*.jpg save format.  All my editors will read it's files.

Was just trying to salvage something I've been working on for several months.

Thanks for responding.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:22 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycqPF-00N5TGC>; Fri, 22 May 1998 13:54:37 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id GAA19292;
	Thu, 21 May 1998 06:00:10 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2103419; Wed, 20 May 1998 04:56:22 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35626276.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtigwc04.worldnet.att.net (post.office MTA v2.0 0613 )
          with SMTP id AAA1036 for <gfabasic@linux.net.eu.org>;
          Wed, 21 Jan 1998 03:58:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 21 Jan 1998 03:58:07 +0000
Subject: Re: [GFA] bmp save  2005xx2-
X-UIDL: fb8f8d657eff6463bf320e7711b23c54

* List: gfabasic@linux.net.eu.org

At 11:25 PM 20/05/98 EDT, you wrote:
>* List: gfabasic@linux.net.eu.org
>
><< Desparately need help w/ saving a *.bmp. >>
>
>Tom,
>
>Have you bought Sjouke Hamstra's "Programming in GFABasic For Windows" book
>yet?  Not only is it a great book, it includes a wonderful little DLL with all
>sorts of functions for manipulating (including saving) bitmaps.
>
>James Schumacher
>peuapeu@aol.com
>

+++

Have just today located the book... $89 U.S.  Ouch!  Am using one of
Sjouke's routines (modified slightly to work inside another program).  Would
assume the *.dll will save the same way - a propriatory format no standard
"C"-type pr VB program will load...

Image - 77x93, 8-bit,  8.31K  all other editors
GFA-W save .......... 14.2K  Not 8-bit - perhaps 24-bit compressed?
Other saves @ 24-bit, 21.1K   all other editors

Most of my other editors drop it saying "compressed *.bmp not supported",
one says "only 1, 4, 8 & 24-bit formats supported".

If I have to resort to a *.dll, would prefer having 8 or 9 input formats,
*.jpg save format.  All my editors will read it's files.

Was just trying to salvage something I've been working on for several months.

Thanks for responding.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:23 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycqoD-00N5L4C>; Fri, 22 May 1998 14:20:25 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id OAA03654;
	Fri, 22 May 1998 14:21:07 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B5B31A44; Thu, 21 May 1998 06:58:08 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3563D080.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 22 May 1998 08:02:20 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Thanks for the mailing list, I missed something...
X-UIDL: b0003971e934424d952585abb8fa2798

* List: gfabasic@linux.net.eu.org


I'm not sure, everyone got my list of questions, so I send it
oncemore...

   *	I need a DLL which "translates" 32-Bit Events to 16-Bit-Events:
	I wrote a logging programm for documenting ALL keyboard events on a PC
(WM_KEYUP/DOWN events).
	GFA can handle only 16-Bit Events, so this program does NOT work on
'95, and on NT computers.
	Has anyone a possibility to make a 32-Bit Hook-DLL which "hears" 32-Bit
events (WM_CHAR, KEYUP/DOWN)
	and send these as 16-Bit events to a defined Window (=my program) ????

	(Tom sent me a Gfa32API.Zip which allows calls of 32-Bit DLLs, but I am
not able to use it for catching events) 

   *	I searched in the whole net, but found nothing...
	I need a description of the XLS file format (Excel 4 or 5) or an
automatic XLS to TXT converter.
	I have to use the "Save as...(Txt)" in Excel for about 20 files every
day and I'd like to do this automatically

   *	I am searching for some values of constants, not defined in GFA and
not seen in Microsofts Windows API-Helpfile
	e.g. HWND_TOPMOST,...

Thanks,
	Michael

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:25 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycr2l-00N5y4C>; Fri, 22 May 1998 14:35:27 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id OAA03840;
	Fri, 22 May 1998 14:36:17 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B31A0A77; Wed, 20 May 1998 16:07:47 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3562FFD3.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 21 May 1998 08:07:13 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Fonts
X-UIDL: 4497c0a3d5358753d00657c4347bafd7

* List: gfabasic@linux.net.eu.org

Is their a way to change the font when using CreateWindow? I have tried
WM_FONTCHANGE, WM_SETFONT messages but no font change occurs. I have also
tried SETFONT with no success. It seems to work O.K. with OPENW but not with
CreatWindow.  Any suggestions greatly appreciated.
Dale Bryant

http://ourworld.compuserve.com/homepages/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:27 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycr3J-00N5xvC>; Fri, 22 May 1998 14:36:01 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id OAA04153;
	Fri, 22 May 1998 14:36:43 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B514367C; Thu, 21 May 1998 03:36:44 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3563A14C.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 21 May 1998 22:37:16 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: Re: [GFA] bmp save  2005xx2-
X-UIDL: 54367cbe98bebe4bc3c52d56c391425b

* List: gfabasic@linux.net.eu.org

Hi Tom,

<< Have just today located the book... $89 U.S.  Ouch! >>

It's by far the best $$$ I've spent for development help with GFABasic.  The
DLL alone is worth the price of the book and the book is just loaded with good
stuff.

<<  Am using one of Sjouke's routines (modified slightly to work inside
another program).  Would assume the *.dll will save the same way - a
propriatory format no standard "C"-type pr VB program will load... >>

I haven't actually used Sjouke's BMPSAVE function before so I just tried it.
I loaded a 256 color bitmap into memory then saved it back out using the
function.  There are 10 options with regards to compression/format and I chose
"BMP-Format for Hicolor adapters (16-bits)" ... which is what my monitor is
currently set at.  Then I tried opening the file the function created using my
PaintShopPro program.  It opened without a hitch and the picture looked fine.
So I'm not sure there is anything prioprietary about this function's output
format.  I can't guarantee that a "standard" VB program will open the file,
however.

<< If I have to resort to a *.dll, would prefer having 8 or 9 input formats,
*.jpg save format.  All my editors will read it's files. >>

Well, you get the DLL source, so if you wanted to, I suppose you could
incorporate the necessary code directly into your program and eliminate the
need for the DLL.  It doesn't, however, handle jpegs ... only BMPs.

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:28 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycr3K-00N5y7C>; Fri, 22 May 1998 14:36:02 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id OAA04053;
	Fri, 22 May 1998 14:36:33 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B25BF4D7; Wed, 20 May 1998 13:16:04 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3562D794.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AABD98AD0110; Thu, 21 May 1998 14:14:53 +02d00
Date: Thu, 21 May 1998 13:45:12 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] bmp save  2005xx2-
X-UIDL: 9907ab5b8d1add9f8c45593c2e7ab6ac

* List: gfabasic@linux.net.eu.org

>> Have just today located the book... $89 U.S.  Ouch!

I hate this as well. That's why my next book on GFA32 will be an online
book.

You are correct in that my BmpSave uses the same approach as any other
bitmap saver. However, I have never found any problems. Bitmaps saved are
read correctly by PaintBrush, Paint Shop and others.

Regards,
Sjouke Hamstra
>> Please note: My e-mail address has changed <<
>> New: shamstra@gelrevision.nl <<



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:30 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycsp8-00N5y2C>; Fri, 22 May 1998 16:29:30 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA05257;
	Fri, 22 May 1998 16:29:56 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2167D62; Thu, 21 May 1998 15:26:39 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356447AF.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtigwc04.worldnet.att.net (post.office MTA v2.0 0613 )
          with SMTP id AAA1745 for <gfabasic@linux.net.eu.org>;
          Fri, 22 May 1998 14:28:27 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 22 May 1998 14:28:27 +0000
Subject: [GFA] re: *.bmp save...   2205xx1-
X-UIDL: 1a66741e312e4b64e77d1e264e0e277e

* List: gfabasic@linux.net.eu.org

22/05/98 9:09:31 AM   re: *.bmp save...   2205xx1-

Sjouke, 1,000 pardons, but files saved on here won't open in anything 
I have except LBasic, GFA-W & *possibly* MS Paint.  I have:

PhotoMagic (micrografx)
PicturePublisher (micrografx)
LView (several flavers)
GWSwin
BeckerPageLite
HaloImager

Have dumped several others because of lack of support.

All registered, none will load.  I trashcanned PSP4 because it 
recovers all formats that are associated w/ something else any time it 
is run & it takes too long to load for my sentiments.

The mods to your routine were done by John Findlay to get it 
functional in something we were doing together several months ago.

Am not kidding, the file size it makes is between a standard 8-bit & 
24-bit saves of the same image.  Reaction is the same on a 486SX25 w/ 
Win3.1 as on this P-100 w/ Win95.

Working w/ several sets of code in QB4.5, have never had a successful 
save because can't handle anything greater than 16 colors & I don't 
deal w/ that - I work w/ 8-bit & 24-bit only.

There is a savebmp.gfw that I've played with but haven't succeeded yet 
in getting anything my other editors will load.

Sorry, but I'd like a plain normal 8-bit or 24-bit save so I don't 
have to go find another editor - I was shooting U.S. Census 35mm 
microfilm to the computer w/ what I have, so it should suffice.  I 
simply haven't found the right combination to get savebmp.gfw to 
behave.  The one time I was able to use your save was in a tiny 
program that prints screenshots & deletes the *.bmp afterward.

Am looking for a means to buy the book - am on a very limited income.

Am open to suggestions & help.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:35 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycy9B-00N6fLC>; Fri, 22 May 1998 22:10:33 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA09547;
	Fri, 22 May 1998 22:11:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21712E4; Thu, 21 May 1998 21:07:53 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356497A9.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 22 May 1998 16:08:59 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Fonts
X-UIDL: 7c6d66677ad451c6951de668cc0294ca

* List: gfabasic@linux.net.eu.org

Dale,

>Is their a way to change the font when using CreateWindow? I have tried
WM_FONTCHANGE, WM_SETFONT messages but no font change occurs. I have also
tried SETFONT with no success. It seems to work O.K. with OPENW but not
with
CreatWindow.  Any suggestions greatly appreciated. <

WM_SETFONT only works for Window controls like the 'edit' class etc.

When you use CreatWindow() you need to select the font into the DC before
you draw text?

   oldFont& = SelectObject(ps.hdc, hFont&)

  ~DrawText(ps.hdc, V:z$, LEN(z$), *rect., DT_CENTER | DT_VCENTER)

after you have used it, select the old font back again;

  ~SelectObject(ps.hdc, OldFont&)

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:37 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycyHe-00N4NXC>; Fri, 22 May 1998 22:19:18 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA09857;
	Fri, 22 May 1998 22:20:01 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B211F954; Thu, 21 May 1998 21:16:47 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356499BF.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 22 May 1998 13:15:48 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] Fonts
X-UIDL: 16e87e48b673c12b592ddb5cec17701e

* List: gfabasic@linux.net.eu.org

Thanks John,
I used Selectobject to grab the ANSI_FIXED_FONT and it is close to what I
wanted. I will try your suggestion.
Dale

-----Original Message-----
From: John Findlay <Jayef@compuserve.com>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Friday, May 22, 1998 1:10 PM
Subject: [GFA] Fonts


* List: gfabasic@linux.net.eu.org

Dale,

>Is their a way to change the font when using CreateWindow? I have tried
WM_FONTCHANGE, WM_SETFONT messages but no font change occurs. I have also
tried SETFONT with no success. It seems to work O.K. with OPENW but not
with
CreatWindow.  Any suggestions greatly appreciated. <

WM_SETFONT only works for Window controls like the 'edit' class etc.

When you use CreatWindow() you need to select the font into the DC before
you draw text?

   oldFont& = SelectObject(ps.hdc, hFont&)

  ~DrawText(ps.hdc, V:z$, LEN(z$), *rect., DT_CENTER | DT_VCENTER)

after you have used it, select the old font back again;

  ~SelectObject(ps.hdc, OldFont&)

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:38 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ycybt-00N4NXC>; Fri, 22 May 1998 22:40:13 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA10241;
	Fri, 22 May 1998 22:41:13 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21749FD; Thu, 21 May 1998 21:37:55 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35649EB3.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 22 May 1998 13:37:13 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] Fonts
X-UIDL: bc8409f630f1cbe3c730c364c5354581

* List: gfabasic@linux.net.eu.org


Thanks John,
Using oldfont&=Selectobject(hdc&,statusbarfont&) works great. Also works
with
~TextOut(hdc&,10,10,tex$,len(tex$))





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:40 1998
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yd0Ww-00N4h9C>; Sat, 23 May 1998 00:43:14 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA11692;
	Sat, 23 May 1998 00:43:26 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B218366B; Thu, 21 May 1998 23:39:55 +0000 (???)
From: Reuben Carlsen <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3564BB4B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 23 May 1998 08:43:02 +1000
Organization: Focus Information Technologies
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <3563D080.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Subject: Re: [GFA] Thanks for the mailing list, I missed something...
Content-Transfer-Encoding: 7bit
X-UIDL: eb0c3cb239315b64f598441e65a49397

* List: gfabasic@linux.net.eu.org

G'day from Oz Michael,

With regards to your requirement to find the Excel 4 & 5 file (XLS)
formats you might want to check out the following URL. This site is
dedictated only to exposing any and all file formats.

<http://wotsit.simsware.com/a_to_z.htm>


Reuben
Sydney Oz


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:41 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yd0yx-00N0iZC>; Sat, 23 May 1998 01:12:11 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id BAA12148;
	Sat, 23 May 1998 01:13:06 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2141596; Fri, 22 May 1998 00:09:47 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3564C24B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 22 May 1998 19:11:31 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: d4d52546ceb7b997438062d5293b6ac4

* List: gfabasic@linux.net.eu.org

Hi,

I continue to explore the cause of the crashes I have been having in one of my
routines under Windows 3.1.  I had thought that it might related to fonts, but
now I am convinced that there is something in the sndPlaySound API called by
this routine that causes problems.  Simply put, my program does not crash if I
play the sound from a file.  If, however, I try to play the sound from
resources loaded into memory, the program will play the sound for a while (the
# of times varies) then crash the computer (leaving me with a black screen and
a blinking "|" cursor.

I discovered a post that someone (Robert Marshlan) made to one of the "C"
programming forums back in 1996 that stated "sndPlaySound works with files.
Just don't use the SND_MEMORY flag".  I've tried to contact him but so far I
haven't heard anything.  He apparently wrote an article for Windows
Developer's Journal in March of 95 titled "Using .wav file resources".
Accompaning the article (which I haven't located yet) was a sample program
(which I have located on the WEB) that supposedly (its in "C") plays sounds
asynchronously from resources in memory.  Its rather involved so lets just say
that it doesn't use sndPlaySound and involves all sorts of stuff (such as
header files, etc).  So ... my question is whether anyone out there is aware
of a problem with sndPlaySound() when used with the SND_MEMORY flag?  Also, is
there another way to play sounds in resources on Windows 3.1 systems?

James Schumacher
Millennium Software
peuapeu@aol.com


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:42 1998
Return-Path: <magee@donet.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yd3Ut-00N4NXC>; Sat, 23 May 1998 03:53:19 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA12770;
	Sat, 23 May 1998 03:54:20 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21CCA19; Fri, 22 May 1998 02:50:46 +0000 (???)
From: Andy Magee <magee@donet.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3564E807.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 22 May 1998 21:50:01 -0400
X-Mailer: Mozilla 4.05 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Software Publishing?
X-UIDL: bb2b7416d5fd62601307534ea09a6049

* List: gfabasic@linux.net.eu.org

I just completed a small GFA program that contains several tools for
Watercolor Artists. It's particularly targeted to art students.
Watercolor books are hot sellers in the US, so I expect this would sell
readily, but I've no idea who to approach about getting it published.

Any ideas?

Andy Magee
magee@donet.com



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:43 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydBD0-00MumGC>; Sat, 23 May 1998 12:07:22 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA22885;
	Sat, 23 May 1998 12:08:28 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21C3217; Fri, 22 May 1998 11:04:35 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35655BC3.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AED663FB0110; Sat, 23 May 1998 12:03:11 +02d00
Date: Sat, 23 May 1998 12:03:14 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] re: *.bmp save...   2205xx1-
X-UIDL: b55b49d93daf92b7ee8b9b602a8109a7

* List: gfabasic@linux.net.eu.org

Hi Tom,

>> Am not kidding, the file size it makes is between a standard 8-bit &
24-bit saves of the same image.

I believe you ;). I have not found any strange behavior in BmpSave. It
simply saves a device dependent bitmap (DDB) in MS DIB format. It was
developed using MS C code, that did exactly the same thing.

Let's see if I can help you. Somehow you managed to load and draw an image
into a GFA window. Correct? You then want to save the image into DIB format.
Correct? How did you load the image? What's it format? Could you post me a
copy of such an image?

Regards,
Sjouke Hamstra
>> Please note: My e-mail address has changed <<
>> New: shamstra@gelrevision.nl <<



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:45 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydBD4-00Mur3C>; Sat, 23 May 1998 12:07:26 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA22784;
	Sat, 23 May 1998 12:08:13 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B22CD5D0; Fri, 22 May 1998 11:04:31 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35655BC0.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AEDC63FB0110; Sat, 23 May 1998 12:03:11 +02d00
Date: Sat, 23 May 1998 11:51:26 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: a2950a63dcdac0e06e0dd686e5255a97

* List: gfabasic@linux.net.eu.org

Hi James,

>> Also, is
there another way to play sounds in resources on Windows 3.1 systems?

How about MCI?

Regards,
Sjouke Hamstra
>> Please note: My e-mail address has changed <<
>> New: shamstra@gelrevision.nl <<



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:46 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydBD3-00Mun9C>; Sat, 23 May 1998 12:07:25 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA22882;
	Sat, 23 May 1998 12:08:28 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B23D2AA7; Fri, 22 May 1998 11:04:32 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35655BC1.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AEDF63FB0110; Sat, 23 May 1998 12:03:11 +02d00
Date: Sat, 23 May 1998 11:49:50 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] Thanks for the mailing list, I missed something...
X-UIDL: b6ef78c19a54d24a8b3209e63cc8d1d9

* List: gfabasic@linux.net.eu.org

Hi,

>> <http://wotsit.simsware.com/a_to_z.htm>

Came just in time, I needed RTF info. Thanks.

Regards,
Sjouke Hamstra
>> Please note: My e-mail address has changed <<
>> New: shamstra@gelrevision.nl <<



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:48 1998
Return-Path: <key-j@bre.WinNET.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydIeu-00N0jEC>; Sat, 23 May 1998 20:04:40 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA00500;
	Sat, 23 May 1998 20:05:04 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2126A98; Fri, 22 May 1998 18:40:40 +0000 (???)
From: Sven Thierfelder <key-j@bre.WinNET.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3565C6AD.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 23 May 1998 19:33:02 +0200
X-Mailer: Mozilla 4.03 [de] (Win95; I)
MIME-Version: 1.0
References: <35655BC1.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] A Runtime error
X-UIDL: f07802fd6ef8442666b0143915142ebc

* List: gfabasic@linux.net.eu.org

Hi

This is my first question in this list :)
Hello to all at first.

One of my GFA-Basic for Windows programm displayed a runtime error on
another computer. I have tested the programm on a IBM 6x86 P 150+ with
Win95. On this system it works fine. The error was created on 386 with
Win 3.11. It's the error -013 but I can't find something about this
in the GFA-docs. Could anyone here tell me what this error mean?

regard
Sven Thierfelder


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:50 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydP7d-00MuqKC>; Sun, 24 May 1998 02:58:45 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA05792;
	Sun, 24 May 1998 02:59:43 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21855B0; Sat, 23 May 1998 01:56:16 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35662CC0.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 23 May 1998 20:57:28 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: f4948f7779a41ac56bc5f5b5fe288bcb

* List: gfabasic@linux.net.eu.org

<< << is there another way to play sounds in resources on Windows 3.1 systems?

<< How about MCI >> >>

Hi Sjouke,

As far as I know MCI only works with files.  It will not play a sound in
resources which I definitely need to be able to do.  In any case, it may be a
moot point since I just discovered that I am getting a crash even when I use
sndPlaySound with a file.

This is all very strange since other routines in the code that play sounds
repeatedly seem to be working without a long term tendency to crash.   This
routine, unlike the others, does repeatedly change the font type and size and
I recall finding that by leaving the font alone I could make the crash go
away.  Perhaps there is some interaction taking place between the font and
sound API's?   I still am trying to figure out exactly what is going on and
will let you know if I do. 

James


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:19:59 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydUyi-00N5yDC>; Sun, 24 May 1998 09:13:56 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA15303;
	Sun, 24 May 1998 09:15:00 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21AEB57; Sat, 23 May 1998 08:11:32 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356684B4.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 24 May 1998 03:07:38 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] A Runtime error
X-UIDL: 6d9c7d0cb036871e4185876097e648a6

* List: gfabasic@linux.net.eu.org

Hi Sven:

I don't see any other answer here; so, my little sheet of errors says that
'-13' is the O/S (Run-time) error "ACCESS DENIED"; hope this helps!

                                                       -->Bev<--

-----Original Message-----
From: Sven Thierfelder <key-j@bre.WinNET.de>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: May 23, 1998 2:04 PM
Subject: [GFA] A Runtime error


>* List: gfabasic@linux.net.eu.org
>
>Hi
>
>This is my first question in this list :)
>Hello to all at first.
>
>One of my GFA-Basic for Windows programm displayed a runtime error on
>another computer. I have tested the programm on a IBM 6x86 P 150+ with
>Win95. On this system it works fine. The error was created on 386 with
>Win 3.11. It's the error -013 but I can't find something about this
>in the GFA-docs. Could anyone here tell me what this error mean?
>
>regard
>Sven Thierfelder
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:20:01 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydWlc-00N5xTC>; Sun, 24 May 1998 11:08:32 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA15674;
	Sun, 24 May 1998 11:09:46 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B211AD85; Sat, 23 May 1998 10:06:20 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35669F9C.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A2B524610240; Sun, 24 May 1998 11:04:56 +02d00
Date: Sun, 24 May 1998 10:49:49 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: a69f7b9c49500df3403ef1c79272a85f

* List: gfabasic@linux.net.eu.org

Hi James,

>> As far as I know MCI only works with files.

You're correct.

I remember reading something about a difference between 32-bit and 16-bit
systems using global memory. When using the SND_MEMORY flag, the data must
be allocated from global
memory using the GPTR and GMEM_SHARED flags. Did you do that?
Another noticeable point is that a WAV file _must_ be available in physical
memory all times. When you create fonts over and over, GDi is
allocating/freeing memory repeatedly and Windows 3.1 may discard the memory
occupied by the WAV data. This would certainly crash the system.
Now I think about it, this might be the most probable cause.


Regards,
Sjouke Hamstra
>> Please note: My e-mail address has changed <<
>> New: shamstra@gelrevision.nl <<



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:20:03 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydYxL-00N4h9C>; Sun, 24 May 1998 13:28:47 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA15674;
	Sun, 24 May 1998 11:09:46 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B211AD85; Sat, 23 May 1998 10:06:20 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35669F9C.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A2B524610240; Sun, 24 May 1998 11:04:56 +02d00
Date: Sun, 24 May 1998 10:49:49 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: c55a19cfcc1df38bb922bd000b456f64

* List: gfabasic@linux.net.eu.org

Hi James,

>> As far as I know MCI only works with files.

You're correct.

I remember reading something about a difference between 32-bit and 16-bit
systems using global memory. When using the SND_MEMORY flag, the data must
be allocated from global
memory using the GPTR and GMEM_SHARED flags. Did you do that?
Another noticeable point is that a WAV file _must_ be available in physical
memory all times. When you create fonts over and over, GDi is
allocating/freeing memory repeatedly and Windows 3.1 may discard the memory
occupied by the WAV data. This would certainly crash the system.
Now I think about it, this might be the most probable cause.


Regards,
Sjouke Hamstra
>> Please note: My e-mail address has changed <<
>> New: shamstra@gelrevision.nl <<



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 24 16:20:04 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydYxq-00N6fcC>; Sun, 24 May 1998 13:29:18 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA15303;
	Sun, 24 May 1998 09:15:00 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21AEB57; Sat, 23 May 1998 08:11:32 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356684B4.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 24 May 1998 03:07:38 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] A Runtime error
X-UIDL: dddb9662bfb018e5c3fe281da399a914

* List: gfabasic@linux.net.eu.org

Hi Sven:

I don't see any other answer here; so, my little sheet of errors says that
'-13' is the O/S (Run-time) error "ACCESS DENIED"; hope this helps!

                                                       -->Bev<--

-----Original Message-----
From: Sven Thierfelder <key-j@bre.WinNET.de>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: May 23, 1998 2:04 PM
Subject: [GFA] A Runtime error


>* List: gfabasic@linux.net.eu.org
>
>Hi
>
>This is my first question in this list :)
>Hello to all at first.
>
>One of my GFA-Basic for Windows programm displayed a runtime error on
>another computer. I have tested the programm on a IBM 6x86 P 150+ with
>Win95. On this system it works fine. The error was created on 386 with
>Win 3.11. It's the error -013 but I can't find something about this
>in the GFA-docs. Could anyone here tell me what this error mean?
>
>regard
>Sven Thierfelder
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon May 25 00:16:36 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydibu-00Mur4C>; Sun, 24 May 1998 23:47:18 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA00281;
	Sun, 24 May 1998 23:47:49 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B210C691; Sat, 23 May 1998 22:41:12 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3567508D.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAA26889
          for <gfabasic@linux.net.eu.org>; Sun, 24 May 1998 21:42:43 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Sun, 24 May 1998 21:42:43 +0000
Subject: [GFA] identify, please   2405xx1-
X-UIDL: 11ace47ccafacf4641bde3d6f692896b

* List: gfabasic@linux.net.eu.org

24/05/98 4:30:05 PM   identify, please   2405xx1-

The following is called load_pic.lst.  The author is unidentified.

It *says* it can load & save *.pic, but editors I have that can handle *.pic
give an error on load... "corrupted file".  It is not a mislabeled *.bmp or
any other format I can play with.  It *will* load what it saves, tho.

This is preset to generate a *.pic 639x479.  I have some ideas, but no way
to prove them.  It makes a file of 595K, which would be about right for a
15- or 16-bit image that size.  It is at least 8-bit, perhaps 24-bit - color
is good.

This thing works & *could* be made usefull if someone can identify the
format for me.  I would like to be able to read the file & extract
dimensions & color depth data.

--------------------------- cut here ------------------------------
OPENW #1,0,0,_X,_Y,0   // Bildschirm abspeichern in jeder Auflsung mit dem
BPUT-Befehl
' Abspeichern als BMP in einem anderen Demo (!)

bmppfad$="f:\bilder\"
picpfad$="h:\temp\"

ALERT 1,"Rechte Mousetaste ist|        Popup-Men",1,"OK",antwort%

@createpopup

DO
  GETEVENT
  SELECT _Mess
  CASE WM_RBUTTONDOWN
    @popup
  ENDSELECT
UNTIL programmende|=1
CLOSEW #1

PROCEDURE popup
  DO
    GETEVENT

    x%=MOUSEX-40,y%=MOUSEY-100      // Anzeige an Mouseposition
    ~TrackPopupMenu(menu1&,0,x%,y%,0,WIN(1),0)

    SELECT _Mess
    CASE WM_COMMAND
      SWITCH _wParam
      CASE 100
        sel$="*.bmp"
        @fileselect(bmppfad$)
        IF EXIST(file$)
          DEFMOUSE 2
          bmp&=LOADBMP(file$)
          PUT 0,0,bmp&
          FREEBMP bmp&
          DEFMOUSE 0
        ELSE
          BEEP
        ENDIF
        ende|=1
      CASE 500
        sel$="*.pic"
        @fileselect(picpfad$)
        IF EXIST(file$)
          DEFMOUSE 2
          CLS
          @laden(file$)
          DEFMOUSE 0
        ENDIF
        ende|=1
      CASE 501
        sel$="*.pic"
        @fileselect(picpfad$)
        IF NOT file$=""
          IF NOT RIGHT$(file$,4)=".PIC"
            file$=file$+".pic"
          ENDIF
          DEFMOUSE 2
          @speichern(file$)
          DEFMOUSE 0
        ENDIF
        ende|=1
      CASE 502
        ende|=1
      CASE 503
        ende|=1
        programmende|=1
      ENDSWITCH
    ENDSELECT
  UNTIL ende|=1
  ende|=0
RETURN
'
> PROCEDURE createpopup
  '
  menu1&=CreatePopupMenu()
  ~AppendMenu(menu1&,MF_STRING,100,"Bitmap laden")
  ~AppendMenu(menu1&,MF_SEPARATOR,101,0)
  ~AppendMenu(menu1&,MF_STRING,500,"Picture laden")
  ~AppendMenu(menu1&,MF_STRING,501,"Picture speichern")
  ~AppendMenu(menu1&,MF_SEPARATOR,103,0)
  ~AppendMenu(menu1&,MF_STRING,502,"Abbrechen")
  ~AppendMenu(menu1&,MF_SEPARATOR,105,0)
  ~AppendMenu(menu1&,MF_STRING,503,"Ende")

RETURN
'
> PROCEDURE speichern(file$)
  bytes%=GETSIZE(0,0,_X-1,_Y-1)   'Speicherbedarf fr die ganze Grafik
  bildanzahl%=CEIL(bytes%/32000)   'Bildanzahl (nur 32K pro String)
  OPEN "o",#1,file$
  OUT& #1,bildanzahl%            'Bildanzahl speichern
  zeilen%=CEIL(_Y/bildanzahl%)     'Zeilen pro Bild
  FOR y%=0 TO _Y-1 STEP zeilen%
    yend%=MIN(_Y-1,y%+zeilen%-1)
    GET 0,y%,_X-1,yend%,bild$
    OUT& #1,LEN(bild$)          'Zeichenanzahl speichern
    BPUT #1,V:bild$,LEN(bild$)
  NEXT y%
  CLOSE #1
RETURN
'
> PROCEDURE laden(file$)
  OPEN "i",#1,file$
  y%=0, bildanzahl%=INP&(#1)
  FOR i%=1 TO bildanzahl%
    bytes%=INP&(#1)
    bild$=INPUT$(bytes%,#1)
    PUT 0,y%,bild$
    ADD y%,DPEEK(V:bild$+4)
  NEXT i%
  CLOSE #1
RETURN
'
> PROCEDURE fileselect(pfad$)
  FILESELECT pfad$+sel$,"",file$
RETURN
'
----------------------------- cut here ----------------------------
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 26 15:17:36 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydppR-00Mur9C>; Mon, 25 May 1998 07:29:45 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA10457;
	Mon, 25 May 1998 07:30:48 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21ED94B; Sun, 24 May 1998 06:27:29 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3567BDD2.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 25 May 1998 01:28:54 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: d731b71f9e07478a1761424a7bbba8fa

* List: gfabasic@linux.net.eu.org

>> Another noticeable point is that a WAV file _must_ be available in physical
memory all times. When you create fonts over and over, GDi is
allocating/freeing memory repeatedly and Windows 3.1 may discard the memory
occupied by the WAV data. This would certainly crash the system.
Now I think about it, this might be the most probable cause. <<

Hi Sjouke,

Clearly the _FONT$ call is involved in this crash, although the crash always
occur during a sndPlaySound() call.  When I comment out the _FONT$ statement,
the crash disappears.  Also, this is the only routine that is crashing in this
manner although other routines are calling sndPlaySound.  Perhaps this is
because it is the only routine that makes these repeated _FONT calls.  So, I
think your right.  Windows must be discarding the memory used by the WAV (even
though the memory has been locked with a LockResource statement) when it
discards a font.   So, I guess I'll just have to make some changes so that
_FONT isn't called as often.

As to the GPTR and GMEM_SHARED flags being necessary, I saw this statement in
Knowledge Base document Q133064 and followed its example code, although there
is no specific mention of the flags in the code it suggests.  How does one set
the GPTR and GMEM_SHARED flags?  Does the LoadResource API do it automatically
because that is what Q133064 seemed to suggest?

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 26 15:17:37 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydqkb-00N6g2C>; Mon, 25 May 1998 08:28:49 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA10684;
	Mon, 25 May 1998 08:30:00 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B211A43C; Sun, 24 May 1998 07:26:45 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3567CBB5.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 25 May 1998 08:30:25 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Thanks for the mailing list (2)...
X-UIDL: 409bef5862f5555aa754478c65ce1ce0

* List: gfabasic@linux.net.eu.org


Again something completely different:

If someone likes the functions of Windows '95 (taskbar, etc.), but not
the speed, you should have a look at
http://www.tribbles.demon.co.uk/calmira/calmira.htm
which gives also slow notebooks with the old Windows 3.x the look and
feel of Windows '95 !


And the list...

>>    *	I need a DLL which "translates" 32-Bit Events to 16-Bit-Events:
>> 	I wrote a logging programm for documenting ALL keyboard events on a PC
>> 	GFA can handle only 16-Bit Events, so this program does NOT work on
>> '95, and on NT computers.
>
>You'll either have to wait for GFA32 or use a different compiler.
>There's no way to make a 16-bit procedure used as a callback routine for a
>32-bit call. (If there is some way to accomplish it, it's just another
>Win32 design flaw.)

To bad, I've no other compiler (and I'm maybe to old to learn another
language) - and I'd like to make one single program running on 16 Bit
and 32 Bit environment which is able to catch all WM_CHAR events of all
applications. Will it be (theoretically) possible to write a 32-Bit.DLL
which tells the 16 Bit program about the (32-Bit)-WM_CHAR events ?
>
>>    *	I searched in the whole net, but found nothing...
>> 	I need a description of the XLS file format (Excel 4 or 5) or an
>> automatic XLS to TXT converter.
>
>I think there's some way to make Excel execute Macros over DDE - might be
>easier to figure out than the file format.

In the meantime, I wrote an excel macro doing the job - but if anyone
has information about the file format, it would be nice to hear about
it...
>
>>    *	I am searching for some values of constants, not defined in GFA...

>If anyone is interested, I can make the GNU C header files (around 1.2 MB
>unpacked) available by ftp - the constant definitions seem pretty
>complete.

It would be nice to get the (hopefully highly compressed) header
files...


- Michael

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 26 15:17:39 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydtLg-00N6g3C>; Mon, 25 May 1998 11:15:16 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA11467;
	Mon, 25 May 1998 11:14:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B211F9D8; Sun, 24 May 1998 10:09:39 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3567F1E3.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A4F641D02B6; Mon, 25 May 1998 11:08:06 +02d00
Date: Mon, 25 May 1998 10:18:28 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: 5a25c31de485c39746397d8f1c458be5

* List: gfabasic@linux.net.eu.org

Hi James,

Yes, KB article suggests this, but until now I didn't find any confirmation.
However I located this in Charles Petzold's book:

"Resources (such as dialog box templates, cursors, and icons) also are often
marked as discardable. Again, Windows can simply reload the resource into
memory by accessing the .EXE file that contains the resource."

Try to find out about the memory flags using GlobalFlags on the global
memory handle returned by LoadResource.

You might try to use GlobalFix(hres) on the handle returned by Loadresource.

Regards,
Sjouke Hamstra
>> Please note: My e-mail address has changed <<
>> New: shamstra@gelrevision.nl <<



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 26 15:17:42 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ydyyI-00N7B4C>; Mon, 25 May 1998 17:15:30 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA13815;
	Mon, 25 May 1998 17:16:44 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21AF15B; Sun, 24 May 1998 16:13:13 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35684719.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 25 May 1998 08:12:10 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Test
X-UIDL: 649e78a23887eb00c8c19d982631d6a8

* List: gfabasic@linux.net.eu.org

I seem to have the old mail list address. This is a test message only,

http://ourworld.compuserve.com/homepages/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 26 15:17:50 1998
Return-Path: <m008tf00@mcmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yeCso-00N5SXC>; Tue, 26 May 1998 08:06:46 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA27472;
	Tue, 26 May 1998 08:08:31 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21CB8E8; Mon, 25 May 1998 07:04:01 +0000 (???)
From: GP <m008tf00@mcmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356917E2.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 26 May 1998 06:54:04 +0100
X-Mailer: Mozilla 3.01C-IDv3b  (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Newbie!
X-UIDL: a6f833805e7290bba34ce3445ae0425b

* List: gfabasic@linux.net.eu.org

Greetings!

Can anyone tell me how to gray out a groupbox of radio buttons?  

I am persisting with GFA, but the documentation is a little vague!

Many thanks,

Graham P.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue May 26 15:17:51 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yeErk-00N5SgC>; Tue, 26 May 1998 10:13:48 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA28298;
	Tue, 26 May 1998 10:15:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21781A3; Mon, 25 May 1998 09:11:17 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356935B5.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 26 May 1998 10:15:04 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Newbie!
X-UIDL: 41c256c21801ce81852252ae9e3ff6d3

* List: gfabasic@linux.net.eu.org


Try experimenting with DISABLEW and ENABLEW...

  DIALOG #25,(SYSMETRIC(0) / 2) - 220,(SYSMETRIC(1) / 2) -
160,440,270,"Titel",478 |WS_SYSMENU,~10,"Arial"
	:
    CONTROL "Sign&al", 10, "button", BS_AUTOCHECKBOX | WS_TABSTOP |
WS_CHILD, 310, 71, 70, 22
	:
  ENDDIALOG
   :
   :
   DISABLEW DLG(25,10)


- Michael


>----------
>Von: 	GP[SMTP:m008tf00@mcmail.com]
>Gesendet: 	Dienstag, 26. Mai 1998 07:54
>An: 	gfabasic@linux.net.eu.org
>Betreff: 	[GFA] Newbie!
>
>* List: gfabasic@linux.net.eu.org
>
>Greetings!
>
>Can anyone tell me how to gray out a groupbox of radio buttons?  
>
>I am persisting with GFA, but the documentation is a little vague!
>
>Many thanks,
>
>Graham P.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed May 27 10:59:48 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yeJcJ-00N7BRC>; Tue, 26 May 1998 15:18:11 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id PAA31187;
	Tue, 26 May 1998 15:19:50 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2122FAC; Mon, 25 May 1998 14:15:41 +0000 (???)
From: Roland <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35697D0D.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de (Unverified)
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Tue, 26 May 1998 15:16:39 +0000
In-Reply-To: <35655BC0.BeroList-2.5.7@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: 2a0044939bb3cfecdf7e7b60eb4a8f07

* List: gfabasic@linux.net.eu.org

At 11:51 23.05.1998 +0200, you wrote:

>>> Also, is
>there another way to play sounds in resources on Windows 3.1 systems?
>
>How about MCI?

You could use Multimedia Low Level functions of course (the mmsystem
functions waveOut...) - but this way is "a little bit" more complicated.
Momently I could not tell what can be better then SndPlaySound().
O.K. - it could be interesting to load the WAV files part by part.
This way should be used (not tested):
1.) Import mmsystem functions waveOut...
2.) Prepare the playing. Important: Yo can use waveOutOpen() with
    a Callback function or by sending messages. When testing I saw
    that a Callback is nesassary because with messages the sound
    "stutters" while giving the next data buffer to the output device
    if You use messages instead of a Callback.
3.) Open Resource by AccessResource() - You will get back a file handle
4.) Now You are able to seek, load parts of the resource and so on
5.) Use waveOutWrite() to give the parts of the resource Wav file
    to the device

Did You notice that SndPlaySound can use compressed WAV files like
ADPCM or GSM (also in resource)? - Try it!
Under Windows 3.x You also can play ADPCM compressed WAV files if You
have installed Video for Windows 1.3

MCI is not possible because there You have to give a file name.
I did not find any way to use a memory buffer with MCI funcions...

Bye, Roland

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed May 27 10:59:56 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yeMsy-00N7BAC>; Tue, 26 May 1998 18:47:36 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA00316;
	Tue, 26 May 1998 18:48:53 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B214B13E; Mon, 25 May 1998 17:44:36 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3569AE04.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 26 May 1998 12:45:58 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: dec89dc197c95a2ea8c5b4c34295c184

* List: gfabasic@linux.net.eu.org

<< You might try to use GlobalFix(hres) on the handle returned by
Loadresource. >>

Hi Sjouke,

Problem is ... I'm also getting the crash with sounds from files where no
resource is loaded.  I've also found if I don't use a _FONT$ statement but
instead just a SET HEIGHT statement within the DO loop (i.e., each time a
letter is drawn), I also get the crash.  So it isn't just the _FONT$ statement
either.

This one has me really puzzled.

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed May 27 11:00:03 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yePP9-00N7BNC>; Tue, 26 May 1998 21:28:59 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA01792;
	Tue, 26 May 1998 21:29:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B207719E; Mon, 25 May 1998 20:24:53 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3569D395.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 26 May 1998 13:25:19 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: 485918f82833e83ec81bce2dc2c3b3af

* List: gfabasic@linux.net.eu.org

>> You could use Multimedia Low Level functions of course (the mmsystem
functions waveOut...) - but this way is "a little bit" more complicated. <<
>snip<
>>  Did You notice that SndPlaySound can use compressed WAV files like
ADPCM or GSM (also in resource)? - Try it! Under Windows 3.x You also can play
ADPCM compressed WAV files if You have installed Video for Windows 1.3 <<

Thanks Roland!  Some great suggestions.  I'll let you know what happens
although I'm not going to put too much effort (ala using WaveOut) into getting
this particular reward routine to work on Windows 3.1 systems.   I will
certainly check out the compression feature.  That could be very useful since
the sounds take up quite a bit of space on the disks I ship and inside my
application.  Out of curiosity, how much compression can you get in a WAV file
using ADPCM?

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed May 27 11:00:05 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yeRKp-00MunXC>; Tue, 26 May 1998 23:32:39 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA03079;
	Tue, 26 May 1998 23:34:21 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B210DAB1; Mon, 25 May 1998 22:30:08 +0000 (???)
From: Peu a peu <Peuapeu@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3569F0F0.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 26 May 1998 17:31:28 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 2.6 for Mac
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: 2cd0214a7618e2cae08e1d4f68ead90d

* List: gfabasic@linux.net.eu.org

No matter what changes I make, the crash I'm struggling with always occurs
when executing the following line:

~^sndPlaySound(NULL,NULL)

Substituting (0,0) for (NULL,NULL) produces the same result.  

Is there something wrong with this method of clearing the sound buffer?  It
works but is the syntax subtly wrong (like the behavior one encounters if one
forgets to put a CHR$(0) at the end of an API string parameter?)

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed May 27 11:00:06 1998
Return-Path: <linux@windows95.sucks.eu.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yeZdQ-00N5SxC>; Wed, 27 May 1998 08:24:24 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA14292;
	Wed, 27 May 1998 08:23:58 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21DE64F; Tue, 26 May 1998 07:18:26 +0000 (???)
From: Mailing lists account <linux@windows95.sucks.eu.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356A6CC3.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 27 May 1998 08:21:31 +0200 (CEST)
X-Sender: linux@k6.bero
In-Reply-To: <3569F0F0.BeroList-2.5.7@linux.net.eu.org>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: 0aa0e6482f15c4f779f5d6d5618a7376

* List: gfabasic@linux.net.eu.org

On Tue, 26 May 1998, Peu a peu wrote:

> No matter what changes I make, the crash I'm struggling with always occurs
> when executing the following line:
> 
> ~^sndPlaySound(NULL,NULL)

The first parameter is supposed to be a pointer - Try

a$=CHR$(0)
~^sndPlaySound(V:a$,NULL)

LLaP
bero

---
Windows 98 doesn't support b/w displays - they can't display the blue screen...
***
Anyone sending unwanted advertising e-mail to this address will be charged
$25 for network traffic and computing time. By extracting my address from
this message or its header, you agree to these terms.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed May 27 12:26:03 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yec9Y-00N5yLC>; Wed, 27 May 1998 11:05:44 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA15152;
	Wed, 27 May 1998 11:02:51 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B22C40B8; Tue, 26 May 1998 09:58:23 +0000 (???)
From: Roland <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356A923F.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Wed, 27 May 1998 10:58:34 +0000
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Subject: [GFA] user defined window color

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id LAA15152
X-UIDL: 0627a39d3544f1de75d77166d58882fc

* List: gfabasic@linux.net.eu.org

' Set a user defined background color to a GFA window
' Roland Walter, Schnhauser Allee 64, D-10437 Berlin (Mai 1998)
'
' I have seen lots of source codes where the "background color" was set by
' PBOX or CLS. This is not a good way because of much work and low speed.
' It is better to set a new background brush with the needed color.
' You only have to set this brush with SetClassWord. Remark that SelectObject
' is not possible to do the job.
' Normally it is dangerous to change class values of windows because all
' windows of the same class will be changed. But I have asked GFA how
' the current class name of a GFA window is generated. They told me that
' the class name is generated dynamicly by the number of the device context.
' The result: You can change Your class attributes without changing other
' windows then Your own...
' Two remarks at last:
' - Changing of class background color works in compiled programs only (don't ask me why)
' - There is no automatic redraw (You have to start a redraw by yourself)
'
hBlackBrush&=CreateSolidBrush(RGB(0,0,0)) 'Our background color (black)
OPENW #1
~SetClassWord(WIN(1),GCW_HBRBACKGROUND,hBlackBrush&) 'Set the new brush to the class
~UpdateWindow(WIN(1))  'Redraw the window
DO
  GETEVENT
  IF _Mess=WM_PAINT
    'Here an example for the window content only:
    WIN #1  'Set output to Win 1 (important if more than 1 window used)
    COLOR GETNEAREST(255,255,255),GETNEAREST(0,0,0) 'Foreground: white; Background: black
    TEXT 10,10,"Test Test Test Test Test "
    COLOR GETNEAREST(255,0,0),GETNEAREST(0,0,0) 'Foreground: red; Background: black
    PBOX 10,30,100,100
  ENDIF
UNTIL MENU(1)=4  'close by system menu
CLOSEW #1
~DeleteObject(hBlackBrush&) 'delete the brush AFTER closing the window


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed May 27 12:26:08 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yecYL-00N5yPC>; Wed, 27 May 1998 11:31:21 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA15328;
	Wed, 27 May 1998 11:30:52 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2168C9D; Tue, 26 May 1998 10:26:32 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356A98D8.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 27 May 1998 11:30:25 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] numerical problems
X-UIDL: 01a285a5be64bb473bf76d1a25989283

* List: gfabasic@linux.net.eu.org


Not very exact is the result of the following example, using GFA
Interpreter 4.38 (it shows 5.99999999 instead of 6.0):

v = 0
t = 0
w = 0
b = 100 / 8.9
d = 0.1

REPEAT
  'PRINT INT(t * 10) / 10,INT(v);" km/h",INT(w);" m"
  PRINT t,INT(v);" km/h",INT(w);" m"
  t = t + d
  v = v + b / d
  w = w + v * d
UNTIL t > 7



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 28 18:40:19 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yeeWC-00N7BhC>; Wed, 27 May 1998 13:37:16 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA16041;
	Wed, 27 May 1998 13:37:56 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2132CD1; Tue, 26 May 1998 12:33:22 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356AB692.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 27 May 1998 07:33:57 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] user defined window color
X-UIDL: cb2df9db86cd6979fac17b50411635a8

* List: gfabasic@linux.net.eu.org

Message text written by Roland

> Changing of class background color works in compiled programs only (don't
ask me why) <

That's not strictly true. If one uses a callback for the main window
messages it works interpreted. You need to have something like this tho';

CB WIN(1), 0 TO -1, MainWndProc()    // Set the callback after OPENW

PROCEDURE MainWndProc(hWnd&, wMessage&, wParam&, lParam%)
  SWITCH wMessage

  CASE WM_PAINT
    ~BeginPaint(hWnd&, *ps.)
    ~EndPaint(hWnd&, *ps.)

  CASE WM_COMMAND
    @DoCommands(wParam&, lParam%)

  ENDSWITCH

RETURN

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 28 18:40:21 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yefHd-00MuOOC>; Wed, 27 May 1998 14:26:17 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id OAA16438;
	Wed, 27 May 1998 14:27:12 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21D465B; Tue, 26 May 1998 13:22:45 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356AC226.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          (post.office MTA v2.0 0613 ) with SMTP id AAA9378
          for <gfabasic@linux.net.eu.org>; Wed, 27 May 1998 12:24:09 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 27 May 1998 12:24:09 +0000
Subject: [GFA] help   2705xx1-
X-UIDL: 3a5fdd305a4109dfebb3c72ff2c2c05a

* List: gfabasic@linux.net.eu.org

27/05/98 6:37:01 AM   help   2705xx1-

WIND_GET(20)

Would somebody please identify this for me?

I see it mentioned often, but never identified.

If it's in the manuals, I don't find it.  In playing with it, I 
always get a value of "7".  I'm guessing charactor width.

Thank you.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 28 18:40:24 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yegMp-00MulXC>; Wed, 27 May 1998 15:35:43 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id PAA17115;
	Wed, 27 May 1998 15:37:14 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B217973D; Tue, 26 May 1998 14:32:37 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356AD285.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A5041BF01C4; Wed, 27 May 1998 15:28:36 +00d00
Date: Wed, 27 May 1998 15:30:33 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] help   2705xx1-
X-UIDL: a992c9c70607b6166083b345e90e1217

* List: gfabasic@linux.net.eu.org

Hi Tom,

>> WIND_GET(20)

The average character width of the current selected font in the current
active DC.
WIND_GET(14) returns the height in pixels of the celheight of the current
.. in the current ..

>> 27/05/98 6:37:01 AM   help   2705xx1-

Are you actually sending this at 6:37 AM?

Notify me by private e-mail if you still want to accept my offer.

Regards,
Sjouke Hamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 28 18:40:26 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yehxT-00N7LKC>; Wed, 27 May 1998 17:17:39 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA18144;
	Wed, 27 May 1998 17:20:02 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21339C1; Tue, 26 May 1998 16:15:25 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356AEA9D.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Wed, 27 May 1998 08:14:01 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] FONTS
X-UIDL: beb8dc7e2b295e51a078c9ae931bd038

* List: gfabasic@linux.net.eu.org

I am putting together a list of User-Defined fonts and displaying each one
to see how they look on screen. If you have any you are willing to share I
would love to have them. CreateFontIndirect are also welcome. The collection
will be free and sent to anyone on request.
DO NOT SEND TO THIS MAILING LIST
Send To adbryant@msn.com
Thanks

http://ourworld.compuserve.com/homepages/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 28 18:40:31 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yesZP-00Mur9C>; Thu, 28 May 1998 04:37:31 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id EAA03810;
	Thu, 28 May 1998 04:36:19 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B217C323; Wed, 27 May 1998 03:30:53 +0000 (???)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356B88ED.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 May 1998 11:40:59 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <356A923F.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Sysmodal dialog problem
X-UIDL: d4991e36c8717da597411c0abf77c3a4

* List: gfabasic@linux.net.eu.org

I am having a problem opening a modal dialog box via a button from one
that is already open and modal. When the second dialog is set to
sysmodal, the computer locks up. If the first dialog is not modal and
the second is, all is OK. If the first is model, and a DLG OPEN is
called instead of the second dialog, a lockup occurs. Sample code is:

DIM flt$(3)
GOSUB first
END

PROCEDURE first
  LOCAL e1&
  DIALOG #1,140,50,300,200,"First dialog"
    PUSHBUTTON "Second dialog",101,90,40,120,32
    PUSHBUTTON "E&xit",102,90,90,120,32
  ENDDIALOG
  SHOWDIALOG #1
  ~SetSysModalWindow(DLG(1))
  e1&=FALSE
  REPEAT
    GETEVENT
    IF _Mess=WM_COMMAND
      SELECT _wParam
      CASE 101			'button to go to second dialog
        GOSUB second
      CASE 102
        e1&=TRUE		'exit button
      ENDSELECT
    ENDIF
  UNTIL e1&=TRUE
  CLOSEDIALOG #1
RETURN

PROCEDURE second
  LOCAL e2&
  DIALOG #2,180,90,300,200,"Second dialog"
    PUSHBUTTON "OK",IDOK,110,60,64,32
  ENDDIALOG
  SHOWDIALOG #2
  ~SetSysModalWindow(DLG(2))
  e2&=FALSE
  REPEAT
    GETEVENT
    IF _Mess=WM_COMMAND AND _wParam=IDOK THEN e2&=TRUE
  UNTIL e2&=TRUE
  CLOSEDIALOG #2
RETURN

PROCEDURE getfile
  flt$(0)="Execuitable files",flt$(1)="*.EXE;*.COM;*.BAT"
  flt$(2)="All files",flt$(3)="*.*"
  dlgstyle%=OFN_HIDEREADONLY | OFN_NOCHANGEDIR | OFN_FILEMUSTEXIST
  DLG OPEN 1,dlgstyle%,"Locate Program","\",flt$(1),flt$(),f$
RETURN

Conger's API Bible says this should be possible. I have tried using
EnableWindow to disable the first dialog before second is made modal and
then re-enabling after the second window is closed. This works, but does
not work with DLG OPEN.

Does anyone know what I can do here?
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu May 28 18:40:47 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yf5HJ-00N7PhC>; Thu, 28 May 1998 18:11:41 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA17298;
	Thu, 28 May 1998 18:12:14 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B218A9D8; Wed, 27 May 1998 17:07:28 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356C4850.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 May 1998 12:09:02 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Paint Shop Pro 5
X-UIDL: effd143c5444ca5c98ba9c82cfc0594c

* List: gfabasic@linux.net.eu.org

All,

Paint Shop Pro 5 is now available; here's an extract from a doc. It now
inculdes 'Animation Shop' which allows for GIF animation.

--------------------------------------------------------------------
Changes from Paint Shop Pro 4
One of the most significant changes is the addition of image layers. 
Layers give you the ability to edit portions of an image without affecting
other areas.  We have added dozens of other features including:

 Multiple-level Undo / with Undo history
 Picture Tube brush
 Support for CMYK color separations and output
 Explorer-style file Browser
 Free-form Deformation tool
 Adjustable Crop tool
 Additional Retouch brushes
 Bezier curves
 Antialiased objects
 On-screen grids and rulers
 Customized file associations
 Increased file format support, including Paint Shop Pro (PSP), 24-bit
Amiga (IFF), multi-layer Photoshop (PSD), Kodak FlashPix (FPX), Kodak
Digital Camera (KDC), Scitex CT (SCT), Pro Photo-CD (PCD), and enhanced
metafiles (EMF)
 Direct support for Kodak digital cameras
 Support for pressure sensitive drawing tablets
 Improved TWAIN support
 Support for Adobe Photoshop-compatible file format and import/export
plug-ins
 Monitor gamma correction
 Windows 98 and Windows NT 5.0 ICM 2.0 color management

In addition, Paint Shop Pro now includes Animation Shop.  Animation Shop is
a powerful new way to create and save Animated GIF files for use on the
World Wide Web or in multimedia presentations.  Animation Shop features
include:

 Animation Wizard for creating new animations from collections of still
images and existing animations
 Drawing tools for modifying the frames in an animation
 Support for transparency in animations
 Configurable Optimization Wizard, giving you precise control over the
size of your completed animation
 Powerful customizable frame transitions and frame effects
 Customizable Text effects
 Multiple-level Undo
 Cutting and pasting of frames between Animation Shop and Paint Shop Pro
 Ability to drag-and-drop frames within and between animations
 Intuitive filmstrip-style interface

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 29 02:59:45 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yf9EK-00N814C>; Thu, 28 May 1998 22:24:52 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA19763;
	Thu, 28 May 1998 22:25:54 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B218B90D; Wed, 27 May 1998 21:21:07 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356C83C3.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 May 1998 13:20:08 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] PSP 5
X-UIDL: 212c1303588f3509d90374cd36cf588b

* List: gfabasic@linux.net.eu.org

attn. John Findlay
How mush is the PSP 5 upgrade from PSP 4
Dale

http://ourworld.compuserve.com/homepages/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri May 29 02:59:49 1998
Return-Path: <usg@sprynet.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yf9ty-00N7PoC>; Thu, 28 May 1998 23:07:54 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA20137;
	Thu, 28 May 1998 23:08:52 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2146FEB; Wed, 27 May 1998 22:04:30 +0000 (???)
From: "David Carlson" <usg@sprynet.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356C8DEE.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 May 1998 17:04:52 -0400
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Camera
X-UIDL: 32aee1830ae663361adf7be9aaa99581

This is a multi-part message in MIME format.

------=_NextPart_000_0006_01BD8A5A.BAD123C0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

From ???@??? Sat May 30 14:35:35 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0yfO2E-00N81AC>; Fri, 29 May 1998 14:13:22 +0200 (MEST)
Received: from shodan.in-trier.de([198.22.51.3]) (1398 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <Jayef@compuserve.com>) 
	id <m0yfNlf-000CH2C@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Fri, 29 May 1998 13:56:15 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #3 built 1998-Mar-25)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA00425;
	Fri, 29 May 1998 13:56:59 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21B2DDA; Thu, 28 May 1998 09:35:12 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356D2FD0.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 29 May 1998 04:36:54 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] PSP 5
X-UIDL: d9b338a272f32260c21cf18ea3b510f2

* List: gfabasic@linux.net.eu.org

Dale,

> attn. John Findlay How mush is the PSP 5 upgrade from PSP 4 <

Don't know! Haven't seen mention of an upgrade. The full price is 70 pounds
U.K. or 99 U.S. dollars.

Address;

        Jasc Software, Inc.
        PO Box 44997 
        Eden Prairie, MN 55344  USA


John 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat May 30 14:35:42 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yfQRJ-00MugcC>; Fri, 29 May 1998 16:47:25 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA02433;
	Fri, 29 May 1998 16:48:37 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B215239E; Thu, 28 May 1998 15:41:58 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356D85C6.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 29 May 1998 07:40:55 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] PSP 5
X-UIDL: 6ffcb2ed7fbf6c71949cac6f3e41a0fc

* List: gfabasic@linux.net.eu.org

Hi John,
The PSP upgrade from v.4 to v5 is 39.95
I posted here because I thought others might be interested/
Dale

-----

* List: gfabasic@linux.net.eu.org

Dale,

> attn. John Findlay How mush is the PSP 5 upgrade from PSP 4 <

Don't know! Haven't seen mention of an upgrade. The full price is 70 pounds
U.K. or 99 U.S. dollars.

Address;

        Jasc Software, Inc.
        PO Box 44997
        Eden Prairie, MN 55344  USA


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat May 30 14:35:45 1998
Return-Path: <PeterGam@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yfTlq-00N4hEC>; Fri, 29 May 1998 20:20:50 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA01517;
	Fri, 29 May 1998 20:21:34 +0200
From: PeterGam@compuserve.com
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2101F06; Thu, 28 May 1998 19:14:27 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356DB794.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 29 May 1998 14:16:02 -0400
Sender: PeterGam@compuserve.com
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] video
X-UIDL: 38f9c4c93ccab2b2433e19e36a956683

* List: gfabasic@linux.net.eu.org

// This listing should produce a picture within a window.
// The MCI-drivers must be loaded, this is made by the
// system.ini file. 



OPENW #1,0,0,300,300,~0
MCI "open overlay alias vboard"
MCI "put vboard frame at 0 0 200 200"
MCI "put vboard source at 0 0 200 200"
MCI "put vboard destination at 0 0 200 200"
MCI "window vboard state show"
id$ = MCI$("status vboard window handle")
PRINT id$
DO
  PEEKEVENT
LOOP UNTIL MENU(1) = 4
MCI "close vboard"
CLOSEW #1

// Regards
// Peter

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat May 30 14:35:46 1998
Return-Path: <mueller-dlg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yfhVL-00N6fmC>; Sat, 30 May 1998 11:00:43 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA13563;
	Sat, 30 May 1998 11:01:54 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21BA1E9; Fri, 29 May 1998 09:57:27 +0000 (???)
From: mueller-dlg@t-online.de (Christoph Mller)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356E8687.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 30 May 1998 10:53:39 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

X-Sender: 090719024-0001@t-online.de
Subject: [GFA] Drucken im Netzwerk
X-UIDL: 6d8a8dea60c8699c54e0eae40921d1ac

* List: gfabasic@linux.net.eu.org

Hallo an alle,

ich mchte aus GFA-Basic heraus auf einem im Netzwerk befindlichen Drucker drucken. Zur Anmeldung verwende ich folgendes Listing:

  CHAR{mem_adr%+60000}="LPT1:"+CHR$(0)
  CHAR{mem_adr%+60010}="Drucker"+CHR$(0)
  CHAR{mem_adr%+60050}="ephpw"+CHR$(0)
  hdc&=CreateDC(mem_adr%+60050,mem_adr%+60010,mem_adr%+60000,0)
  SETDC hdc&
  '
  ' \\Friess\epson_5200

dies funktioniert auch im Netzwerk, wenn die Schnittstelle LPT1: bers Netz verbunden ist. Leider hat das den Nachteil, da der Rechner mit Drucker unbedingt vor dem eigenen Rechner eingeschalten sein mu.

Wenn ich statt LPT1:, "\\Friess\epson_5200" einsetze (den Netzwerkpfad des Druckers) klappt der Ausdruck nicht (keine Fehlermeldung, es passiert einfach nichts), hat irgendjemand eine Idee, wie man das richtig macht?

Christoph Mller
mueller-dlg@t-online.de
 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:33:50 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yg4H9-00N5SzC>; Sun, 31 May 1998 11:19:35 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA28501;
	Sun, 31 May 1998 11:21:40 +0200
From: Peuapeu@aol.com
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2103480; Sat, 30 May 1998 10:16:30 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356FDC7E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 31 May 1998 05:17:55 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: Re: [GFA] W3.1, sndPlaySound & SND_MEMORY
X-UIDL: 9f7d72d3ad7c6581c2ae4162ad45f312

* List: gfabasic@linux.net.eu.org

Just to bring you up to date in case your interested ... I've tried everything
that has been suggested (and then some) to solve my problem with crashes
during sndPlaySound calls under W3.1.  No luck.  The program only crashes in
one routine (of several in the program) that calls sndPlaySound repeatedly, so
I don't think its a problem "just" with sndPlaySound.  I'm convinced that
changing the height of fonts is involved in this problem because as long as
the routine where the crash is occuring changes the height of the font (either
through _FONT$ =  or through FONT HEIGHT), it will eventually crash.  If there
is no attempt to change the font height then the crash disappears.  I can even
change the font name and its style (bold, etc) without a crash occuring.
IMHO, a serious W3.1 bug.

So ... for now I have stopped trying to change the font height in this
routine.

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:33:51 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yg4IB-00N5SzC>; Sun, 31 May 1998 11:20:39 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA28568;
	Sun, 31 May 1998 11:22:48 +0200
From: Peuapeu@aol.com
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21F1690; Sat, 30 May 1998 10:18:12 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <356FDCE5.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 31 May 1998 05:19:54 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] Another W3.1 bug!
X-UIDL: 7abe228fe54b26d50865bbe4e9d09f46

* List: gfabasic@linux.net.eu.org

Hi,

I've found another bug while trying to get my application (which is working
without any apparent problems in Windows 95) to run under Windows 3.1.

The bug occurs inside a do loop where ball objects impact against a surface.
When the balls hit, they stick.  Slowly the surface gets higher.  The code
below is where the surface (I call it the floor) region is updated as balls
impact and stick to it.  The problem is that the CombineRgn API after a number
of cycles of working correctly, produces an incorrect result.

Here is the code:

            'update floor region
            impactRgn& = FN myFREEBMP(impactRgn&)
            impactRgn& = CreateRectRgn(0,0,0,0)
            ret2& = CombineRgn(impactRgn&,floorRgn&,ballRgn&,RGN_OR)
            '
            //99/99/97 debugging
            OPEN "a",#97,gAppPath$ + "/debugout.txt"
            ret9& = GetRgnBox(floorRgn&,*rect.)
            PRINT #97,"floor rect.top ";rect.top
            ret9& = GetRgnBox(ballRgn&,*rect.)
            PRINT #97,"ball rect.top ";rect.top
            ret9& = GetRgnBox(impactRgn&,*rect.)
            PRINT #97,"impactRgn& = ";impactRgn&;" impact rect.top ";rect.top
            CLOSE #97
            '
            floorRgn& = FN myFREEBMP(floorRgn&)
            floorRgn& = CreateRectRgn(0,0,0,0)
            ret2& = CombineRgn(floorRgn&, impactRgn&,impactRgn&, RGN_COPY)

Below is output from debugout.txt starting with the final correct API result:

floor rect.top 310
ball rect.top 374
impactRgn& = 3874 impact rect.top 310
floor rect.top 310
ball rect.top 420
impactRgn& = 3874 impact rect.top 0

Note that on the last line rect.top = 0, which is incorrect given that floor
rect.top = 310 and ball rect.top = 420.  Looks to me like another bug in this
silly operating system.

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:33:52 1998
Return-Path: <THIELE-DOKUMENTATION@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yg8eh-00N5StC>; Sun, 31 May 1998 16:00:11 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA29773;
	Sun, 31 May 1998 16:02:08 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2102344; Sat, 30 May 1998 14:56:15 +0000 (???)
From: THIELE-DOKUMENTATION@t-online.de (Dr.-Ing. U. Thiele)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35701E10.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 31 May 1998 15:41:30 +0100
Organization: THIELE DOKUMENTATION + MEDIA
X-Mailer: Mozilla 4.01 [de]C-DT  (WinNT; I)
MIME-Version: 1.0
X-Priority: 3 (Normal)
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 0602332112-0001@t-online.de
Subject: [GFA] Reading out HD directory
X-UIDL: 6085458dae328fcea8cca6ac01466b76

* List: gfabasic@linux.net.eu.org

Hi,

I am looking for a subroutine, that will give me a list of all file
names and file data of the hard disk directory. Paths don`t have to be
included. I used the dta command on Windows 3.11, which works fine.
However on Windows 95/NT with the long file names, dta gives back only
some xxxxxx~1.xx of course. Does anybody know the best way to get long
file names?

Thank you!

 
Gruss aus Alzenau
Ulrich Thiele

THIELE-DOKUMENTATION@t-online.de



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:04 1998
Return-Path: <mueller-dlg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ygkAq-00N7LuC>; Tue, 2 Jun 1998 08:03:52 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA27530;
	Tue, 2 Jun 1998 08:06:55 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21B5E78; Mon, 01 Jun 1998 06:58:58 +0000 (???)
From: mueller-dlg@t-online.de (Christoph Mller)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35725132.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Jun 1998 07:35:06 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

X-Sender: 090719024-0001@t-online.de
Subject: [GFA] GFA-Basic, drucken im Netzwerk
X-UIDL: 826272cb542beb1763e3c6845d4caf57

* List: gfabasic@linux.net.eu.org

Hallo alle,

folgender Befehl funktioniert zum drucken im Netzwerk nur dann, wenn LPT1: verbunden ist, was aber umstndlich ist, wenn der Rechner mit Drucker erst spter eingeschaltet wird, LPT1: durch den Netzwerkpfad (hier \\Fries\epson_5200) zu ersetzen funktioniert nicht. 

out$="LPT1:"+CHR$(0)
drucker$="Drucker"+CHR$(0)
driver$="ephpw"+CHR$(0)
hdc&=CreateDC(v:driver$,v:drucker$,v:out$,0)
SETDC hdc&

Von Peter  (PeterGam@compuserve.com) habe ich folgendes Listing erhalten, das funktioniert soweit auch. Nun meine Frage:

Wie kann ich dem Befehl DLG PRINT ... mitteilen, welche Seitenzahl mein Dokument hat und wie bekomme ich die Rckmeldung, welche ausgewhlten Seiten (z.B. 1 bis 2 von insgesamt 5) der Benutzer gedruckt haben mchte. 

@print("Dies ist ein Test")
PROCEDURE print(text$)
  DLG PRINT 1,0,d&
  DEFMOUSE 2
  IF d&
    x% = GetDeviceCaps(d&,HORZRES)
    y% = GetDeviceCaps(d&,VERTRES)
    SETDC d&
    FONT "Arial"
    FONT HEIGHT y% / 70
    FONT WIDTH  x% / 130
    FONT WEIGHT 500
    FONT TO f&
    SETFONT f&
    STARTDOC "Test"
    TEXT .1 * x%,3 * (.02 * y%),text$
    NEW FRAME
    ENDDOC
    FREEDC d&
    FREEFONT f&
  ENDIF
  DEFMOUSE 0
RETURN

Vielleicht hat jemand eine Idee, im voraus besten Dank,

Christoph Mller
mueller-dlg@t-online.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:05 1998
Return-Path: <WANTANA@gmx.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ygkMx-00N7PyC>; Tue, 2 Jun 1998 08:16:23 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA27654;
	Tue, 2 Jun 1998 08:19:31 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21D86FA; Mon, 01 Jun 1998 07:13:14 +0000 (???)
From: "WANTANA Software" <WANTANA@gmx.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3572548B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Tue, 2 Jun 1998 13:13:54 +0700
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Mailing List

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id IAA27654
X-UIDL: c31fe4811fbe22ed276cabd8e82d65a7

* List: gfabasic@linux.net.eu.org

Hi,

Ifind a bug in GFA-BASIC for WINDOWS ???

The command "FILL" not work on the printer !!! (on the diaplay OK)

What can ido ??

Klaus Thiesen
WANTANA@gmx.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:09 1998
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from arbi.Informatik.Uni-Oldenburg.DE (134.106.1.7) with smtp
	  id <m0ygvdA-00N2r4C>; Tue, 2 Jun 1998 20:17:52 +0200 (MEST)
Received: by arbi.Informatik.Uni-Oldenburg.DE (Smail3.1.29.1)
	id <m0ygrnT-0005NFC>; Tue, 2 Jun 98 16:12 CES
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA30382;
	Tue, 2 Jun 1998 16:05:08 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21758E5; Mon, 01 Jun 1998 14:58:30 +0000 (???)
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3572C196.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Jun 1998 22:03:57 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] CHAINing programs
X-UIDL: f33476193e9f05141fbc548e16367b64

* List: gfabasic@linux.net.eu.org

Please excuse the simplicity of this question from a GFA for DOS programmer
struggling with GFA for Windows.

How can I CHAIN one program from another. By that I mean loading the second
program and eliminatiing the first from memory.

I currently have two games which are independant programs but can be played
together switching back and forth between the two. If I do this with Windows
using EXEC "program2.exe","" from program 1 and EXEC "program1.exe","" from
program 2 the original program is left in memory. I'm not sure but I suspect
I accumulate several copies of each program after a number of switches.

I had the same problem with the Amiga and in the end the solution was
simple - use the run only module instead of compiled programs. Is there a
run only module for GFA for Windows?

Thanks for your patience,

Malcolm Howard



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:10 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from arbi.Informatik.Uni-Oldenburg.DE (134.106.1.7) with smtp
	  id <m0ygw3t-00N2qkC>; Tue, 2 Jun 1998 20:45:29 +0200 (MEST)
Received: by arbi.Informatik.Uni-Oldenburg.DE (Smail3.1.29.1)
	id <m0ygsiZ-0005gOC>; Tue, 2 Jun 98 17:11 CES
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA30965;
	Tue, 2 Jun 1998 17:03:29 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B210B860; Mon, 01 Jun 1998 15:56:57 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3572CF49.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Tue, 2 Jun 1998 07:54:59 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] BACKGROUND
X-UIDL: 18dc67ed5819a2b1f8e880bb808b59cb

* List: gfabasic@linux.net.eu.org

Roland left this code in a message
Is the main window back ground supposed to be black?  I get the text with a
black background and a  red square  but the window back ground is still
white. Maybe I did not understand what the code is supposed to do.
Dale Bryant
//code start
hBlackBrush& = CreateSolidBrush(RGB(0,0,0)) 'Our background color (black)
OPENW #1
~SetClassWord(WIN(1),GCW_HBRBACKGROUND,hBlackBrush&) 'Set the new brush to
the class
~UpdateWindow(WIN(1))
DO
  GETEVENT
  IF _Mess = WM_PAINT
    WIN # 1
    COLOR GETNEAREST(255,255,255),GETNEAREST(0,0,0) 'Foreground: white;
Background: black
    TEXT 10,10,"Test Test Test Test Test "
    COLOR GETNEAREST(255,0,0),GETNEAREST(0,0,0) 'Foreground: red;
Background: black
    PBOX 10,30,100,100
  ENDIF
UNTIL MENU(1) = 4
CLOSEW #1
~DeleteObject(hBlackBrush&) 'delete the brush AFTER closing the window

http://ourworld.compuserve.com/homepages/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:18 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yh0XJ-00N2r0C>; Wed, 3 Jun 1998 01:32:09 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id BAA02733;
	Wed, 3 Jun 1998 01:29:46 +0200
From: Peuapeu@aol.com
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2104F61; Tue, 02 Jun 1998 00:21:23 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35734583.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Jun 1998 19:23:25 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: Re: [GFA] Another W3.1 bug!
X-UIDL: bd05c652c7f9b65fda15397e22facbdb

* List: gfabasic@linux.net.eu.org

Hi,

I've duplicated the W3.1 bug, involving the CombineRgn API, in the program
below.

gAppPath$ = CHR$(_DRIVE) + ":" + DIR$(0) 'path to folder containing
application
'
OPEN "o",#97,gAppPath$ + "/debugout.txt"
CLOSE #97
'
TYPE gfaRECT:
- WORD left
- WORD top
- WORD right
- WORD bottom
ENDTYPE
gfaRECT:floorRect.
'
'create initial 1 pixel thick floor region
floorRect.left = 0
floorRect.top = _Y - 1
floorRect.right = _X
floorRect.bottom = _Y
floorRgn& = CreateRectRgnIndirect(*floorRect.)
'creat ball region
ballSize& = 40
ballRgn3& = FN myFREEBMP(ballRgn&)
ballRgn3& = CreateEllipticRgn(0,0,ballSize&,ballSize&)
FOR i& = 1 TO 200
  //make working copy of floorrgn from undamaged floorrgn
  floorRgn3& = FN myFREEBMP(floorRgn3&)
  floorRgn3& = CreateRectRgn(0,0,0,0)
  ret1& = CombineRgn(floorRgn3&,floorRgn&,floorRgn&, RGN_COPY)
  'update floor region adding ballrgn
  floorRgn& = FN myFREEBMP(floorRgn&)
  floorRgn& = CreateRectRgn(0,0,0,0)
  ret2& = CombineRgn(floorRgn&,floorRgn3&,ballRgn3&,RGN_OR)
  'shift ball region up a little
  ret3& = OffsetRgn(ballRgn3&,0,-30)
  'output results
  OPEN "a",#97,gAppPath$ + "/debugout.txt"
  PRINT #97,"i& = ";i&;" ret1&= ";ret1&;" ret2& = ";ret2&;" ret3& = ";ret3&
  CLOSE #97
NEXT i&
'
floorRgn& = FN myFREEBMP(floorRgn&)
ballRgn3& = FN myFREEBMP(ballRgn3&)
floorRgn3& = FN myFREEBMP(floorRgn3&)
'
FUNCTION myFREEBMP(hbmp&)
  FREEBMP hbmp&
  hbmp& = 0
  RETURN hbmp&
ENDFUNC

The program produces output like the following,

i& = 1 ret1&= 2 ret2& = 3 ret3& = 3
i& = 2 ret1&= 3 ret2& = 3 ret3& = 3
i& = 3 ret1&= 3 ret2& = 3 ret3& = 3
<snip>
i& = 16 ret1&= 3 ret2& = 3 ret3& = 3
i& = 17 ret1&= 3 ret2& = 3 ret3& = 3
i& = 18 ret1&= 3 ret2& = 0 ret3& = 3
i& = 19 ret1&= 1 ret2& = 3 ret3& = 3
i& = 20 ret1&= 3 ret2& = 3 ret3& = 3
etc... 

The error (ret2&=0) first occurs at i& = 18, repeating at i& = 36, 54, 72,
etc.  The error occurs at a somewhat different i& each time the program is
run.  The CombineRgn error damages the floor region input to the API because
after the error, a GetRgnBox call yields an input bounding floor region
(floorRgn3&) with zero area.    Also, I find that if I save the last correct
updated floorgrn handle and use it after the error first occurs (in essence,
repeating the CombineRgn calculation with the exact same inputs), the error
occurs immediately again (so its not just a fluke).  This fact would seem to
make finding a workaround to this bug near impossible.

I find it INCREDIBLE that a recently purchased (from Microsoft) copy of W3.1,
has a bug as serious (and obvious!) as this.  Its no wonder that gaming
programmers decided to use DOS instead!  It sure is a shame that the Mac OS
(in which I haven't encountered a single bug so far) isn't the dominant
operating system.

James Schumacher

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:20 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yh7yo-00N2qXC>; Wed, 3 Jun 1998 09:29:02 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA13011;
	Wed, 3 Jun 1998 09:30:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2161360; Tue, 02 Jun 1998 08:25:50 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3573B70E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Jun 1998 03:27:27 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] BACKGROUND
X-UIDL: d99f08ff8a816b935a6474171dfac803

* List: gfabasic@linux.net.eu.org

Dale,

>Is the main window back ground supposed to be black?  I get the text with
a
black background and a  red square  but the window back ground is still
white. Maybe I did not understand what the code is supposed to do.
<

As I think Roland said, 'it only works compiled'. If you want to change the
background colour so that it works interpreted you will have to use the
callback method for the main windows messages. At least, that's the way I
do it!

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:24 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhAYT-00N2rGC>; Wed, 3 Jun 1998 12:14:01 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA13011;
	Wed, 3 Jun 1998 09:30:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2161360; Tue, 02 Jun 1998 08:25:50 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3573B70E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Jun 1998 03:27:27 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] BACKGROUND
X-UIDL: e2383f1980e887827ba7125667db41e6

* List: gfabasic@linux.net.eu.org

Dale,

>Is the main window back ground supposed to be black?  I get the text with
a
black background and a  red square  but the window back ground is still
white. Maybe I did not understand what the code is supposed to do.
<

As I think Roland said, 'it only works compiled'. If you want to change the
background colour so that it works interpreted you will have to use the
callback method for the main windows messages. At least, that's the way I
do it!

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:25 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhEYM-00N2ruC>; Wed, 3 Jun 1998 16:30:10 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA02422;
	Wed, 3 Jun 1998 16:30:40 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21095C0; Tue, 02 Jun 1998 15:23:33 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357418F5.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Jun 1998 07:22:28 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] BACKGROUND
X-UIDL: 1316928225ed86efda7b0bf72db0a594

* List: gfabasic@linux.net.eu.org

Hi John
You know you can't get away without an example!(G)

-----Original Message-----
From: John Findlay <Jayef@compuserve.com>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: Wednesday, June 03, 1998 12:28 AM
Subject: [GFA] BACKGROUND


* List: gfabasic@linux.net.eu.org

Dale,

>Is the main window back ground supposed to be black?  I get the text with
a
black background and a  red square  but the window back ground is still
white. Maybe I did not understand what the code is supposed to do.
<

As I think Roland said, 'it only works compiled'. If you want to change the
background colour so that it works interpreted you will have to use the
callback method for the main windows messages. At least, that's the way I
do it!

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:26 1998
Return-Path: <mueller-dlg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhIrB-00MurAC>; Wed, 3 Jun 1998 21:05:53 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA04571;
	Wed, 3 Jun 1998 21:06:52 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B211209A; Tue, 02 Jun 1998 20:01:57 +0000 (???)
From: mueller-dlg@t-online.de (Christoph Mller)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35745A35.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Jun 1998 17:23:30 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

X-Sender: 090719024-0001@t-online.de
Subject: [GFA] printing to a network printer
X-UIDL: 7d868556fdd988ffcb556816d4099c62

* List: gfabasic@linux.net.eu.org

Hi all,

I've asked this question just recently, but I noticed, that a lot of people on this list seemingly speak English, so once more: The listing below should connect me to a printer in a network environment. It works, but only if "LPT1:" is connected which means I have problems whenever my computer is switched on after the one that has the printer. If I replace "LPT1:" by the network path (here: "\\Fries\epson_5200") it doesn't work, any ideas?!

out$="LPT1:"+CHR$(0)
drucker$="Drucker"+CHR$(0)
driver$="ephpw"+CHR$(0)
hdc&=CreateDC(v:driver$,v:drucker$,v:out$,0)
SETDC hdc&

Second question: if I use the following lines, I can print on the network printer, even if it has been switched on after my computer, but I would like to be able to set the variable that shows how many pages there are in the document to be printed and also I want to read out the user setting on which pages he wants to have actually, like e.g. pages 1-2 out of 5. Any ideas for that would be welcomed too.

DLG PRINT 1,0,d&
SETDC d&

Christoph Mller
mueller-dlg@t-online.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:28 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhJzX-00N2sKC>; Wed, 3 Jun 1998 22:18:35 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA05659;
	Wed, 3 Jun 1998 22:19:38 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2112E7D; Tue, 02 Jun 1998 21:14:55 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35746B4F.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Jun 1998 16:16:09 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] BACKGROUND
X-UIDL: 21eccf9bf0ca7a1bff7409e8f1f83ccd

* List: gfabasic@linux.net.eu.org

Dale,

// Start
TYPE PAINTSTRUCT:
- WORD    hdc
- WORD    fErase
- WORD    psleft
- WORD    pstop
- WORD    psright
- WORD    psbottom
- USHORT  fRestore
- USHORT  fIncUpdate
- CHAR*16 rgbReserved$
ENDTYPE
PAINTSTRUCT: ps.

//------------------------------------------------------------------
// Create the window off screen before we set the background colour
//------------------------------------------------------------------
OPENW #1, -3000, 0, 640, 480, ~15

hBrBtnFace&  = CreateSolidBrush(GetSysColor(COLOR_BTNFACE))

//--------------------------------------
//  Set CallBack for main window
//--------------------------------------
CB WIN(1), 0 TO -1, MainWndProc()

//-----------------------------------------------------
// Set the background for the main window, & move it
//-----------------------------------------------------
~SetClassWord(WIN(1), GCW_HBRBACKGROUND, hBrBtnFace&)
MOVEW #1,0,0


DO
  GETEVENT
LOOP UNTIL MENU(1) = 4 || bFinish! = TRUE

//------------------
// Cleanup
//------------------
CLOSEW #1
~DeleteObject(hBrBtnFace&)
EDIT

PROCEDURE MainWndProc(hWnd&, wMessage&, wParam&, lParam%)

  SWITCH wMessage&

  CASE WM_PAINT
    ~BeginPaint(hWnd&, *ps.)
    ~EndPaint(hWnd&, *ps.)

  CASE WM_CLOSE
    bFinish! = TRUE
  ENDSWITCH

RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:29 1998
Return-Path: <rroriolo@redestb.es>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhNkK-00N2qRC>; Thu, 4 Jun 1998 02:19:08 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA07482;
	Thu, 4 Jun 1998 02:20:23 +0200
From: rroriolo@redestb.es
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B2173714; Wed, 03 Jun 1998 01:15:42 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3574A3BE.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by tinet0.redestb.es (Post.Office MTA v3.1 release PO203a
          ID# 0-0U10L2S100) with ESMTP id AAA140
          for <gfabasic@linux.net.eu.org>; Thu, 4 Jun 1998 02:17:50 +0200
          (Post.Office MTA v3.1.2 release (PO205-101c) ID# 0-0U10L2S100)
          with SMTP id AAA224 for <gfabasic@linux.net.eu.org>;
          Thu, 4 Jun 1998 02:20:09 +0200
X-Sender: rroriolo@pop3.redestb.es
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Thu, 04 Jun 1998 02:24:32 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Moving Files
X-UIDL: bcc685f268de516a3ddc7b752197fe83

* List: gfabasic@linux.net.eu.org

Does somebody know a better/faster way to move a file among different
directories?
This procedure makes the work, splicing the file in chunks of 32000 bytes,
but it takes 40 seconds for a file of 1.3 MB.
  
MoveFile("c:\win95\system\xx.exe","a:\yy.exe")
PROCEDURE MoveFile(Source$,Target$)
  LOCAL lof%,po% ,a$
  a$ = STRING$(32000,0)
  IF EXIST(Source$)
    OPEN "i",#1, Source$
    SEEK #1,0
    lof% = LOF( #1)
    OPEN "a",#2,Target$
    WHILE LOC( #1) + 32000 < lof%
      BGET #1,V:a$,32000
      BPUT #2,V:a$,32000
    WEND
    SUB lof%,LOC( #1)
    BGET #1,V:a$,lof%
    BPUT #2,V:a$,lof%
    CLOSE #1
    CLOSE #2
  ENDIF
RETURN

Thanks in advance.

Robert R. Oriolo
rroriolo@redestb.es


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:31 1998
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhO4A-00N2qUC>; Thu, 4 Jun 1998 02:39:38 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA07632;
	Thu, 4 Jun 1998 02:41:24 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21381C8; Wed, 03 Jun 1998 01:36:55 +0000 (???)
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3574A8B7.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 4 Jun 1998 08:38:34 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] CHAINing programs
X-UIDL: fc977205de9e921f505ccd8d7e67feaf

* List: gfabasic@linux.net.eu.org

>simply use CHAIN "filename.exe" or if you want to be compatible with the
interpreter, leave the extension away: CHAIN "filename (without extension)"<

Thanks Christoph. Could you, or anyone else for that matter, confirm that:

1) The CHAIN instruction works with compiled programs (with my version I get
a load error, no matter what extension, with exes created with the MAKE EXE
option in the interpreter)

2) If it does work, that the CHAINed program REPLACES the calling program
and doesn't just join it in memory as happened with the Amiga (leading very
quickly to an out of memory error with my cycled programs)

before I have a blazing row with GFA.

I contacted GFA about 6 months ago about this and was told to use EXEC not
CHAIN. In my ignorance of Windows I didn't realise they weren't the same.
Were they merely avoiding admitting that I had a bugged version of GFA for
Windows which would have led to a request for a version that worked ?<g>
I've spent the last 6 months getting around the lack of a working CHAIN
instruction.

Malcolm Howard




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:32 1998
Return-Path: <mueller-dlg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhWpm-00N5T0C>; Thu, 4 Jun 1998 12:01:22 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA17885;
	Thu, 4 Jun 1998 12:02:13 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B21EDEE7; Wed, 03 Jun 1998 10:56:50 +0000 (???)
From: mueller-dlg@t-online.de (Christoph Mller)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35752BF3.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 4 Jun 1998 07:45:36 +-200
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="---- =_NextPart_000_01BD8F8C.C79276E0"
X-Sender: 090719024-0001@t-online.de
Subject: AW: [GFA] CHAINing programs
X-UIDL: 8e612ae886d5176e4387bd3f249e2ea5

Hi Malcolm,

----------
Von: 	Malcolm Jack Howard[SMTP:machoward@bigpond.com]
Gesendet: 	Donnerstag, 4. Juni 1998 02:38
An: 	gfabasic@linux.net.eu.org
Betreff: 	Re: [GFA] CHAINing programs

* List: gfabasic@linux.net.eu.org

>simply use CHAIN "filename.exe" or if you want to be compatible with the
interpreter, leave the extension away: CHAIN "filename (without extension)"<

Thanks Christoph. Could you, or anyone else for that matter, confirm that:

1) The CHAIN instruction works with compiled programs (with my version I get
a load error, no matter what extension, with exes created with the MAKE EXE
option in the interpreter)

As far as I can say it does work with compiled programs, I gave it a try before I sent the email. It might be difficult too handle for the program created with MAKE EXE cause it needs a runtime DLL to be there and it was just intermediate solution anyway, 

2) If it does work, that the CHAINed program REPLACES the calling program
and doesn't just join it in memory as happened with the Amiga (leading very
quickly to an out of memory error with my cycled programs)

that's right, if you use a disk cache it will still be fast, at least if you switch several times. If you use EXEC, the calling program stays in memory. I think there should be a way to find out, which programs Windows stores in memory and activate them, but I don't know how this is done.

before I have a blazing row with GFA.

I contacted GFA about 6 months ago about this and was told to use EXEC not
CHAIN. In my ignorance of Windows I didn't realise they weren't the same.
Were they merely avoiding admitting that I had a bugged version of GFA for
Windows which would have led to a request for a version that worked ?<g>
I've spent the last 6 months getting around the lack of a working CHAIN
instruction.

Malcolm Howard




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org



Attachment Converted: "c:\programme\eudora\attach\AW [GFA] CHAINing programs"
From ???@??? Mon Jun 08 06:34:35 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhgSK-00N81JC>; Thu, 4 Jun 1998 22:17:48 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA01523;
	Thu, 4 Jun 1998 22:18:30 +0200
From: Peuapeu@aol.com
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B382B94F; Wed, 03 Jun 1998 21:11:14 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3575BBF2.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 4 Jun 1998 16:13:08 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 64
Subject: [GFA] Detecting Windows 98
X-UIDL: 115a4b7aaf495e56184c836c8658e30d

* List: gfabasic@linux.net.eu.org

Hi,

I'm using the following code to determine the version of Windows that is being
used.

    ver% = GetVersion()
    x$ = HEX$(ver%,4)
    ver$ = STR$(VAL("$" + x$) MOD $100) + "." + STR$(VAL("$" + x$) \ $100)
    gSysVers = VAL(ver$)

gSysVers equals 3.1 when it is Windows 3.1 and 3.95 when it is Windows 95.  Am
I correct in assuming that it will be 3.98 under Windows 98?

Thanks,

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:40 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yhvlm-00N4msC>; Fri, 5 Jun 1998 14:38:54 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id OAA14026;
	Fri, 5 Jun 1998 14:40:13 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B38D0E6B; Thu, 04 Jun 1998 13:34:58 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3576A283.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A59A230142; Fri, 05 Jun 1998 14:33:30 +03d00
Date: Fri, 5 Jun 1998 14:36:58 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] Detecting Windows 98
X-UIDL: 6abed89b216b8905065623aadc1fcfcc

* List: gfabasic@linux.net.eu.org

Hi James,

I used the following code under Windows 98 (it returns 95 as well, which is as expected since W98 is simply an update of
Windows 95).

Let WINVER& = GetVersion()
Let WINVER& = Lobyte(WINVER&) << 8 | Hibyte(WINVER&)
? Hex$(WINVER&,4)        // "035F"
? Lobyte(WINVER&)    // 95
Keyget a

Regards,
Sjouke Hamstra


PS. To distinguish between Win32 OS and Windows 3.1 using a 16-bit programming language, you simply test the WINVER&
variable as follows:

If WINVER& > $030A     // documented by MS
   // a 32-bit system
Else
  // Oops, still 16-bit...
Endif

>I'm using the following code to determine the version of Windows that is being
>used.
>
>    ver% = GetVersion()
>    x$ = HEX$(ver%,4)
>    ver$ = STR$(VAL("$" + x$) MOD $100) + "." + STR$(VAL("$" + x$) \ $100)
>    gSysVers = VAL(ver$)
>
>gSysVers equals 3.1 when it is Windows 3.1 and 3.95 when it is Windows 95.  Am
>I correct in assuming that it will be 3.98 under Windows 98?
>





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:45 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yi1cz-00N6feC>; Fri, 5 Jun 1998 20:54:13 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA16563;
	Fri, 5 Jun 1998 20:55:06 +0200
From: Peuapeu@aol.com
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B386159B; Thu, 04 Jun 1998 19:49:30 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3576FA4A.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 5 Jun 1998 14:51:07 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 64
Subject: Re: [GFA] Detecting Windows 98
X-UIDL: 9b0174a9fa83394cef4ee2b4d6343e79

* List: gfabasic@linux.net.eu.org

Thanks Sjouke!

James

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:53 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yicIy-00N2qkC>; Sun, 7 Jun 1998 12:04:00 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA14099;
	Sun, 7 Jun 1998 12:04:06 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B4F3B79A; Sat, 06 Jun 1998 10:57:40 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357920A4.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A3AD8B0152; Sun, 07 Jun 1998 11:55:57 +03d00
Date: Sun, 7 Jun 1998 11:37:16 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: [GFA] New URL
X-UIDL: aa3257807e916b2cab1a7f3a6ce3fed8

* List: gfabasic@linux.net.eu.org

To All,

Since Januari I have a new Internet provider. I have a cable modem connection to the Internet and I'm online all day. I
automatically check my mail each 30 minutes. If you have a quick GFABasic related question between 09.00 and 16.00 hours
GMT, I could probably answer that question within an hour.

My new provider is brand new and didn't get its homepages to work. Fortunately GFA Systemtechnik is kind enough to put
my GFA related stuff on their website. Now you can find info about myself and my book at :
http://www.gfa.net/home/shamstra/

If you have a link to my homepage at CompuServe, you might like to update it with this new URL.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 08 06:34:54 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yio1i-00N2qUC>; Mon, 8 Jun 1998 00:34:58 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA19090;
	Mon, 8 Jun 1998 00:32:57 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE246A76; Sat, 06 Jun 1998 23:27:26 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3579D05E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Jun 1998 15:25:43 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] ROUTINES
X-UIDL: 6f81e19dd5e7fe1841d5cec2f54dcd34

* List: gfabasic@linux.net.eu.org

As my health has improved considerably I am about ready to add some more
routines to the GFAWHELP file. If  you have any routines you think are worth
adding please send them to me at my email address. DO NOT send them t0 the
mailing list.Only you can make it better!
Dale Bryant
adbryant@msn.com

http://ourworld.compuserve.com/homepages/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jun 10 20:04:49 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yjT4Q-00N8A9C>; Tue, 9 Jun 1998 20:24:30 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA17288;
	Tue, 9 Jun 1998 20:27:18 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE2609D9; Mon, 08 Jun 1998 19:19:16 +0000 (???)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357C3934.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id UAA28911 for <gfabasic@linux.net.eu.org>; 
          Tue, 9 Jun 1998 20:20:49 +0200 (MET DST)
Date: Tue, 9 Jun 1998 20:21:43 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: [GFA] Encryption with GFA-Basic
X-UIDL: 2e1af3fdda20b0c052ed5057f48ba504

* List: gfabasic@linux.net.eu.org

To Sjouke Hamstra

In your e-mail of June 7th you invite us GFA-beginners to ask our GFA-related
questions.

I found a lot of good things in your example listings, for instance text
editors and crypting routines. I put the two ideas together and wrote a text
editor, encrypting when saving and decrypting when reloading. It uses with the
algorithm triple-DES (des3test.dll) and it seems to work very good, but only in
ECB-mode.

A friend of mine is mathematician and crypting expert. He says that CBC-mode is
much more efficient than EBC-mode. I've tried to change the code, but it
doesn't work.

My question: How can I change the DLL call for EBC-mode?

Best regards
Sven Kumlin     sven.kumlin@swipnet.se

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jun 10 20:04:54 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yjh2n-00N8BeC>; Wed, 10 Jun 1998 11:19:45 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA30459;
	Wed, 10 Jun 1998 11:22:34 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE20A90B; Tue, 09 Jun 1998 10:15:55 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357D0B5B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AE4D2BE0550; Wed, 10 Jun 1998 11:13:52 +03d00
Date: Wed, 10 Jun 1998 11:15:56 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] Encryption with GFA-Basic
X-UIDL: 5830a7de95d5dc8a30bb3e2d05a2ec2c

* List: gfabasic@linux.net.eu.org

Hi Sven,

>> I found a lot of good things in your example listings, for instance text
editors and crypting routines.

I'm not aware of ever writing a crypting routine. It must be someone else's. I therefor cannot answer your question.

Generally, I'm interested in all sorts of programming issues, but the invitation was pointed at GFABasic language
questions. If your question has something to do with creating a DLL using GFA I might be able to help you.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jun 12 16:06:11 1998
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yk1PG-00N4NXC>; Thu, 11 Jun 1998 09:04:18 +0200 (MEST)
Received: from TNG.linux.net.eu.org ([198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA14342;
	Thu, 11 Jun 1998 09:08:30 +0200
Received: from linux.net.eu.org (unknown 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE23A174; Wed, 10 Jun 1998 07:59:01 +0000 (???)
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357E3CFB.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 11 Jun 1998 14:32:22 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] CHAINing programs
X-UIDL: 9cce1852998c8115572733d11fa3958c

* List: gfabasic@linux.net.eu.org

Sorry for the delay in thanking you for your trouble, Christoph, I emailed
GFA and have been waiting for an answer. None has come after several days. I
wonder if they're as puzzled about this as I am.


<As far as I can say it does work with compiled programs, I gave it a try
before I sent the email>

Could you check that for me. The exes from the MAKE.EXE option APPEAR to
work at first but remove the source code file from the same directory as the
exe of the called program and you get a load error. Remove the exe of the
called program with the source code file still there and it appears to work.

What seems to be happening is that the CHAIN instruction doesn't load and
run the exe but the original source file. Presumably it loads the
interpreter first - I say "presume" because any attempt to get to the
interpreter causes an illegal operation message from Win 95 and crashes out.
It's almost as if the interpreter behaves as a run-only module.

So, if the source code file of your called program is in the same directory
as the exe itself, remove it and see if the first program chains the second.
If it doesn't, remove the exe and replace the source code file and it may
well work. Put an END or STOP statement into your called program source file
and it will crash if it behaves like mine preventing you from detecting the
loaded
interpreter.

Sorry for all the trouble.

Malcolm Howard




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jun 12 16:06:31 1998
Return-Path: <DL8FD@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ykF9P-00N8AAC>; Thu, 11 Jun 1998 23:44:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org ([198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA20633;
	Thu, 11 Jun 1998 23:48:10 +0200
Received: from linux.net.eu.org (unknown 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE23EFBE; Wed, 10 Jun 1998 22:38:33 +0000 (???)
From: DL8FD@t-online.de (Hans FIcker)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357F0B1F.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 11 Jun 1998 23:36:43 +0200
X-Mailer: T-Online eMail 2.0
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 0682177087-0001@t-online.de
Subject: [GFA] RS232-Schnittstelle

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id XAA20633
X-UIDL: e50bfa61b7be132b9326e634523cf03e

* List: gfabasic@linux.net.eu.org

Hallo GFA User
Ich mchte gerne die serielle Schnittstelle mit 57600 Baud
programmieren. Leider habe ich festgestellt, dass das nicht
so einfach geht mit COM4:57600,N,8,1. Wenn Jemand damit schon 
Erfahrung hat und mir evl. helfen knnte, wre ich sehr froh.
Besten Dank im vorraus

mein Englisch ist so schlecht, dass ich lieber in deutsch
geschrieben habe.

mit freundlichen Gren
Hans Ficker



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 13 20:09:50 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ykVNr-00N7BGC>; Fri, 12 Jun 1998 17:04:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org ([198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA03089;
	Fri, 12 Jun 1998 17:09:48 +0200
Received: from linux.net.eu.org (unknown 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE50B317; Thu, 11 Jun 1998 15:58:44 +0000 (???)
From: Roland <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357FFEEB.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 12 Jun 1998 16:56:04 +0000
In-Reply-To: <35701E10.BeroList-2.5.7@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Subject: Re: [GFA] Reading out HD directory

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id RAA03089
X-UIDL: 33229f510aebcb3ca87acea230dfac99

* List: gfabasic@linux.net.eu.org

At 15:41 31.05.1998 +0100, you wrote:
>I am looking for a subroutine, that will give me a list of all file
>names and file data of the hard disk directory. Paths don`t have to be
>included. I used the dta command on Windows 3.11, which works fine.
>However on Windows 95/NT with the long file names, dta gives back only
>some xxxxxx~1.xx of course. Does anybody know the best way to get long
>file names?

FindFirstFile / FindNextFile should do the job:

@Init
OPENW #1,0,0,_X,_Y,0
FONT "Arial",HEIGHT 12, WIDTH 5, WEIGHT FW_BOLD, QUALITY 2 //kleine Schrift, um ein Scrollen zu vermeiden
FONT TO Font&
SETFONT Font&
//
//Bitte als Pfad auch mal ein Unterverzeichnis eintragen (wegen "." und ".."
Pfad$="c:\*.*"+CHR$(0) //Wildcard Characters (* und ?) sind erlaubt
SearchHandle& = @@FindFirstFile(V:Pfad$,V:FIND_DATA.) //SearchHandle& wird fr FindNextFile() bentigt (-1 bei Fehler)
FOR i&=1 TO 45  //je nach dem, was auf den Bildschirm pat... (Auflsung bei mir: 800x600)
  PRINT AT(1,i&); FIND_DATA.AlternateFileName$ //Beachte: der String sollte normalerweise mit ZTRIM$() behandelt werden
  PRINT AT(20,i&); FIND_DATA.FileName$
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_ARCHIVE%) THEN PRINT AT(60,i&); "A"
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_DIRECTORY%) THEN PRINT AT(62,i&); "D"
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_HIDDEN%) THEN PRINT AT(64,i&);"H"
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_NORMAL%) THEN PRINT AT(66,i&);"N"
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_READONLY%) THEN PRINT AT(68,i&);"R"
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_SYSTEM%) THEN PRINT AT(70,i&);"S"
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_TEMPORARY%) THEN PRINT AT(72,i&);"T"
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_ATOMIC_WRITE%) THEN PRINT AT(74,i&);"W"
  IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_XACTION_WRITE%) THEN PRINT AT(76,i&);"X"
  Return!=@@FindNextFile(SearchHandle&,V:FIND_DATA.) //Return! ist bei erfogreicher Suche TRUE, anderenfalls FALSE
  EXIT IF Return!=FALSE
NEXT i&
IF Return!=TRUE THEN PRINT "Mehr Dateien konnten leider nicht dargestellt werden..."
//
KEYGET Dummy&
~@@FindClose(SearchHandle&) //der Returnwert bei Erfolg ist TRUE, anderenfalls FALSE (hier nicht ausgewertet)
FREEFONT Font&
CLOSEW #1
FREEDLL 1
END
//
PROCEDURE Init
  DLL #1,"kernel"
    DECL WORD FindFirstFile(L,L) //durchsucht ein Verzeichnis nach Dateien/Verzeichnissen je nach Spezifikation
    DECL BOOL FindNextFile(W,L) //setzt die Suche des vorhergehenden FindFirstFile()-Aufrufes fort
    DECL BOOL FindClose(W)        //schliet die Suchoperation durch Freigebnen des Suchhandles ab.
  ENDDLL
  //-------------------------------------------------------------------------
  TYPE FIND_DATA:
  - LONG Attribute                          //bitweise ver-ODER-te Dateiattribute (FILE_ATTRIBUTE_...)
  - CHAR*40 Dummy$                   //Ersatz fr diverse Einzelvariablen, deren Inhalt hier uninteressant war...
  - CHAR*260 FileName$              //Win95-Dateiname
  - CHAR*14 AlternateFileName$  //alter DOS-Dateiname
  ENDTYPE
  FIND_DATA:FIND_DATA. //Die Strukturvariable FIND_DATA. wird von FindFirstFile() bzw. FindNextFile() mit Daten gefllt
  //---------------------------------------------------------------------------
  FILE_ATTRIBUTE_ARCHIVE%=$00000020              //Archivbit
  FILE_ATTRIBUTE_DIRECTORY%=$00000010         //Verzeichnisbit
  FILE_ATTRIBUTE_HIDDEN%=$00000002                //Versteckt-Bit
  FILE_ATTRIBUTE_NORMAL%=$00000080               //kein anderes Bit gesetzt (nur gltig, wenn es alleine gesetzt ist)
  FILE_ATTRIBUTE_READONLY%=$00000001           //Nur-Lesen-Bit
  FILE_ATTRIBUTE_SYSTEM%=$00000004               //Systembit
  FILE_ATTRIBUTE_TEMPORARY%=$00000100       //Temporrdatei
  FILE_ATTRIBUTE_ATOMIC_WRITE%=$00000200   //reserviert (zumindest noch bei Windows 32s)
  FILE_ATTRIBUTE_XACTION_WRITE%=$00000400 //reserviert (zumindest noch bei Windows 32s)
RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 13 20:09:52 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ykVPJ-00N7PZC>; Fri, 12 Jun 1998 17:06:21 +0200 (MEST)
Received: from TNG.linux.net.eu.org ([198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA03210;
	Fri, 12 Jun 1998 17:11:22 +0200
Received: from linux.net.eu.org (unknown 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE3CC2CB; Thu, 11 Jun 1998 16:00:34 +0000 (???)
From: Roland <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357FFF59.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 12 Jun 1998 16:52:18 +0000
In-Reply-To: <3574A3BE.BeroList-2.5.7@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] Moving Files
X-UIDL: 375b11c3df06ab1afc5444c4c3fe78e7

* List: gfabasic@linux.net.eu.org

At 02:24 04.06.1998 +0200, you wrote:
>Does somebody know a better/faster way to move a file among different
>directories?

I think there is no faster way then using 64KB buffer. The following
listing I had also written using API functions because GFA Basic will
not find hidden files for example. But using GFA Basic is more simple.

Bye, Roland Walter


FUNCTION CopyFile(InFile$,OutFile$,OverWrite!)
  $FUNC1%   //compiler optimization
  LOCAL PtrBuffer%,Rest%
  IF NOT EXIST(InFile$) THEN RETURN -1
  IF EXIST(OutFile$) AND OverWrite!=FALSE THEN RETURN -2
  PtrBuffer%=MALLOC($FFFF)
  OPEN "i",#1,InFile$
  OPEN "o",#2,OutFile$
  Rest% = LOF(#1)
  IF Rest%>=$FFFF
    DO
      PEEKEVENT  // "multitasking-like"!!! (GETEVENT is inpossible)
      BGET #1,PtrBuffer%,$FFFF
      BPUT #2,PtrBuffer%,$FFFF
      Rest% -= $FFFF
    LOOP UNTIL Rest%<$FFFF
  ENDIF
  IF Rest%>0
    BGET #1,PtrBuffer%,Rest%
    BPUT #2,PtrBuffer%,Rest%
  ENDIF
  CLOSE #1
  CLOSE #2
  ~MFREE(PtrBuffer%)
  RETURN 0
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 13 20:09:54 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ykVPm-00N7PZC>; Fri, 12 Jun 1998 17:06:50 +0200 (MEST)
Received: from TNG.linux.net.eu.org ([198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA03211;
	Fri, 12 Jun 1998 17:11:22 +0200
Received: from linux.net.eu.org (unknown 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE20657C; Thu, 11 Jun 1998 15:59:39 +0000 (???)
From: Roland <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <357FFF22.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 12 Jun 1998 16:41:15 +0000
In-Reply-To: <357F0B1F.BeroList-2.5.7@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Subject: Re: [GFA] RS232-Schnittstelle

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id RAA03211
X-UIDL: f3bef8aae4ddcec3aa0edf4cd2772f61

* List: gfabasic@linux.net.eu.org

(In German language because of problems with english.
I answer how You can use the serial port with baud rates
above 19.200 bauds)

At 23:36 11.06.1998 +0200, you wrote:

>Ich mchte gerne die serielle Schnittstelle mit 57600 Baud
>programmieren.

Das geht!!! Aber Du kannst nicht BuildCommDCB nehmen, sondern
musst die DCB-Type "zu Fuss" fuellen. Oder: Du nimmst erst
BuildCommDCB mit einer geringeren Baudrate und aenderst dann
die Typenvariable DCB.BaudRate (ist bequemer).
In jedem Fall solltest Du nicht einen Stringpuffer fuer die
DCB-Type nehmen, sondern die echte Type. So sieht sie aus:

TYPE DCB:	
- BYTE Id	//Port-ID wie bei OpenComm
- WORD BaudRate	//Baudrate (siehe unten)
- BYTE ByteSize	//Anzahl der Bits pro Byte (4-8)
- BYTE Parity	//0=keine, 1=ungerade, 2=gerade, 3=gesetzt, 4=leer
- BYTE StopBits	//0=1, 1=1.5, 2=2
- WORD RlsTimeout	//Wartezeit fr RLSD in ms
- WORD CtsTimeout	//Wartezeit fr CTS in ms
- WORD DsrTimeout	//Wartezeit fr DSR in ms
- WORD Flags	//bitweise ver-ODER-te Flags (siehe Tabelle unten)
- BYTE XonChar	//Tx und Rx Xon-Zeichen
- BYTE XoffChar	//Tx und Rx Xoff-Zeichen
- WORD XonLim	//Xon-Sendeschwelle
- WORD XoffLim	//Xoff-Sendeschwelle
- BYTE PeChar	//Ersatzzeichen wenn Parittsfehler auftritt
- BYTE EofChar	//Eingabe-Ende-Zeichen
- BYTE EvtChar	//Ereignis-erhalten-Zeichen
- WORD TxDelay	//Zeit zwischen den Zeichen
ENDTYPE	
DCB:DCB.    //Typenvariable erzeugen

DCB.BaudRate ist die Baudrate, mit der die Schnittstelle arbeitet.
Wenn HIBYTE(DCB.Baudrate)=$FF ist, steht in LOBYTE(DCB.Baudrate)
einer der folgenden Codes fr die Baudrate:

CBR_110	DCB.BaudRate=$10
CBR_300	DCB.BaudRate=$11	
CBR_600	DCB.BaudRate=$12	
CBR_1200	DCB.BaudRate=$13
CBR_2400	DCB.BaudRate=$14
CBR_4800	DCB.BaudRate=$15
CBR_9600	DCB.BaudRate=$16
CBR_14400	DCB.BaudRate=$17
CBR_19200	DCB.BaudRate=$18
CBR_??		DCB.BaudRate=$19
CBR_??		DCB.BaudRate=$1A
CBR_38400	DCB.BaudRate=$1B
CBR_??		DCB.BaudRate=$1C
CBR_??		DCB.BaudRate=$1D
CBR_??		DCB.BaudRate=$1E
CBR_56000	DCB.BaudRate=$1F
CBR_??		DCB.BaudRate=$20
CBR_??		DCB.BaudRate=$21
CBR_??		DCB.BaudRate=$22
CBR_128000	DCB.BaudRate=$23
CBR_??		DCB.BaudRate=$24
CBR_??		DCB.BaudRate=$25
CBR_??		DCB.BaudRate=$26
CBR_256000	DCB.BaudRate=$27

Wenn HIBYTE(DCB.Baudrate)<>$FF ist, dann steht in LOBYTE(DCB.Baudrate) die tatschliche Baudrate.

Noch etwas: Hattest Du den "Funkamateur"-Artikel zur Schnittstelle gelesen
und hast Du die Hilfedatei dazu?

Tschuess von Roland, DL7UNO


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 13 20:09:57 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ykXfD-00N8BLC>; Fri, 12 Jun 1998 19:30:55 +0200 (MEST)
Received: from TNG.linux.net.eu.org ([198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA04349;
	Fri, 12 Jun 1998 19:36:00 +0200
Received: from linux.net.eu.org (unknown 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE312FF0; Thu, 11 Jun 1998 18:26:04 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35802173.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Sender: root@smtp1.erols.com
Date: Fri, 12 Jun 1998 13:25:31 +0000
X-Mailer: Mozilla 4.05 [en] (X11; I; Linux 2.0.33 i486)
MIME-Version: 1.0
References: <357FFF59.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Moving Files
X-UIDL: ff8d52aeb24ea9c333d2cce59500eafa

* List: gfabasic@linux.net.eu.org

Roland,

Set the attributes you are looking for, and the dta method
finds anything.

-Bob

Roland wrote:

> GFA Basic will not find hidden files for example.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jun 14 20:53:20 1998
Return-Path: <schonema@post6.tele.dk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ylBCD-00N2rWC>; Sun, 14 Jun 1998 13:43:37 +0200 (MEST)
Received: from TNG.linux.net.eu.org ([198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA00649;
	Sun, 14 Jun 1998 13:49:21 +0200
Received: from linux.net.eu.org (unknown 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56EE37E6BD; Sat, 13 Jun 1998 12:38:27 +0000 (???)
From: "Jan Schnemann" <schonema@post6.tele.dk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358272F9.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  by post-relay2.inet.tele.dk with SMTP; 14 Jun 1998 11:39:35 -0000
          (Netscape Mail Server v) with ESMTP id AAA56940
          for <gfabasic@linux.net.eu.org>; Sun, 14 Jun 1998 13:39:34 +0200
Date: Sun, 14 Jun 1998 13:39:15 +0200
X-Mailer: Mozilla 4.03 [da] (Win95; I)
MIME-Version: 1.0
References: <3574A3BE.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Subject: Re: [GFA] Moving Files
Content-Transfer-Encoding: 7bit
X-UIDL: edef988d90ed022bb861a4dc0beb89ae

* List: gfabasic@linux.net.eu.org

Hi!
Renaming files works if it is on the same drive.

rroriolo@redestb.es skrev:
> 
> * List: gfabasic@linux.net.eu.org
> 
> Does somebody know a better/faster way to move a file among different
> directories?
> This procedure makes the work, splicing the file in chunks of 32000 bytes,
> but it takes 40 seconds for a file of 1.3 MB.
> 
> MoveFile("c:\win95\system\xx.exe","a:\yy.exe")
> PROCEDURE MoveFile(Source$,Target$)
>   LOCAL lof%,po% ,a$
>   a$ = STRING$(32000,0)
>   IF EXIST(Source$)
>     OPEN "i",#1, Source$
>     SEEK #1,0
>     lof% = LOF( #1)
>     OPEN "a",#2,Target$
>     WHILE LOC( #1) + 32000 < lof%
>       BGET #1,V:a$,32000
>       BPUT #2,V:a$,32000
>     WEND
>     SUB lof%,LOC( #1)
>     BGET #1,V:a$,lof%
>     BPUT #2,V:a$,lof%
>     CLOSE #1
>     CLOSE #2
>   ENDIF
> RETURN
> 
> Thanks in advance.
> 
> Robert R. Oriolo
> rroriolo@redestb.es
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 15 15:59:02 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ylMrA-00N2rtC>; Mon, 15 Jun 1998 02:10:40 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA06200;
	Mon, 15 Jun 1998 02:16:33 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F304D6C2; Sun, 14 Jun 1998 01:06:18 +0000 (???)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3583220A.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 15 Jun 1998 05:47:03 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <357FFEEB.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Printer dump of window contents
X-UIDL: d505bd3a00fcd93bf156233f42ef2fd6

* List: gfabasic@linux.net.eu.org

Simple question:

Does anyone have source code they are willing to share that will dump
the contents of a specified winto to a printer? I have code that prints
the whole desktop but have not been able to work out modifying it for
just the interior contents of a window.

Thank you in advance.
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 16 11:52:01 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ylmKf-00N7LaC>; Tue, 16 Jun 1998 05:22:49 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id FAA06808;
	Tue, 16 Jun 1998 05:25:01 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3004D04; Mon, 15 Jun 1998 04:18:29 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3584A095.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc02.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980616032057.IBZJ1409@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 16 Jun 1998 03:20:57 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 16 Jun 1998 03:20:57 +0000
Subject: [GFA] Help w/ listbox   1506xx1-
X-UIDL: c93b7a677bf1281071561454132e7262

* List: gfabasic@linux.net.eu.org

15/06/98 10:17:05 PM      Help w/ listbox   1506xx1-

Is there no way to re-index a listbox's contents after or during it 
being sorted?  I find nothing that touches on this.

Help is appreciated.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 16 11:52:04 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ylr78-00N2rOC>; Tue, 16 Jun 1998 10:29:10 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA16490;
	Tue, 16 Jun 1998 10:31:55 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30556B8; Mon, 15 Jun 1998 09:25:53 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3584E8A1.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id ABC31402A2; Tue, 16 Jun 1998 10:24:35 +03d00
Date: Tue, 16 Jun 1998 10:22:24 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: Re: [GFA] Help w/ listbox   1506xx1-
X-UIDL: 285de4533379a1efcfcbc6bc3b384ff9

* List: gfabasic@linux.net.eu.org

Hi Tom,

Re-indexing while sorting? The listbox takes care of sorting the added items
based on the current locale. Adding a new item results in inserting the item
at the 'correct' alphabetic position.

If you like some other way of displaying the item list, you should maintain
your own list (a string array for example) and add (LB_ADDITEM) the items
sequentially in a cleared listbox (LB_RESETCONTENT), or insert
(LB_INSERITEM) them at the correct position. But don't add the LBS_SORT
style to the Listbox, otherwise the listbox reorders the list.

Regards,
Sjouke Hamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jun 17 18:05:42 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ylx1B-00N81kC>; Tue, 16 Jun 1998 16:47:25 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA19704;
	Tue, 16 Jun 1998 16:49:17 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3045BF7; Mon, 15 Jun 1998 15:42:40 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358540F0.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc01.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980616144500.SYZR2279@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 16 Jun 1998 14:45:00 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 16 Jun 1998 14:45:00 +0000
Subject: Re: [GFA] Help w/ listbox   1506xx1-
X-UIDL: 9a8913fa1c5287aa29b0245a9d39f6b1

* List: gfabasic@linux.net.eu.org

Thanks.  If I load a listbox w/ dirs of a drive w/o sorting, they are scrambled
but can be selected & copied out.  If it is sorted, they are in order & can no 
longer be copied out because the index is gone.

Seems "text" is nothing, but the index is all important (but it gets lost by
a sort).  Great planning <G>
TomR.


At 10:22 AM 16/06/98 +0200, you wrote:
>* List: gfabasic@linux.net.eu.org
>
>Hi Tom,
>
>Re-indexing while sorting? The listbox takes care of sorting the added items
>based on the current locale. Adding a new item results in inserting the item
>at the 'correct' alphabetic position.
>
>If you like some other way of displaying the item list, you should maintain
>your own list (a string array for example) and add (LB_ADDITEM) the items
>sequentially in a cleared listbox (LB_RESETCONTENT), or insert
>(LB_INSERITEM) them at the correct position. But don't add the LBS_SORT
>style to the Listbox, otherwise the listbox reorders the list.
>
>Regards,
>Sjouke Hamstra
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jun 17 18:06:15 1998
Return-Path: <THIELE-DOKUMENTATION@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymDY4-00N2ryC>; Wed, 17 Jun 1998 10:26:28 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA01302;
	Wed, 17 Jun 1998 10:29:49 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30EDBB9; Tue, 16 Jun 1998 09:19:02 +0000 (???)
From: THIELE-DOKUMENTATION@t-online.de (Dr.-Ing. U. Thiele)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35863887.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Jun 1998 10:00:14 +0100
Organization: THIELE DOKUMENTATION + MEDIA
X-Mailer: Mozilla 4.01 [de]C-DT  (WinNT; I)
MIME-Version: 1.0
X-Priority: 3 (Normal)
References: <357FFEEB.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=iso-8859-1

X-Sender: 0602332112-0001@t-online.de
Subject: Re: [GFA] Reading out HD directory
X-UIDL: b8bd4d6aa41f2e981f835cb178a15f77

* List: gfabasic@linux.net.eu.org

Roland schrieb:
> 
> * List: gfabasic@linux.net.eu.org
> 
> At 15:41 31.05.1998 +0100, you wrote:
> >I am looking for a subroutine, that will give me a list of all file
> >names and file data of the hard disk directory. Paths don`t have to




> FindFirstFile / FindNextFile should do the job:
> 
> @Init
> OPENW #1,0,0,_X,_Y,0
> FONT "Arial",HEIGHT 12, WIDTH 5, WEIGHT FW_BOLD, QUALITY 2 //kleine
> Schrift, um ein Scrollen zu vermeiden
> FONT TO Font&
> SETFONT Font&
> //
> //Bitte als Pfad auch mal ein Unterverzeichnis eintragen (wegen "."


Vielen Dank zunchst fr die ausfhrliche Antwort! Bin noch dabei, mich
durch den Code durchzuwhlen....



Gruss aus Alzenau
Ulrich Thiele

THIELE-DOKUMENTATION@t-online.de
http://home.t-online.de/home/THIELE-DOKUMENTATION/
Fon + Fax (0 60 23) 3 21 12



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jun 17 18:06:17 1998
Return-Path: <andrew@tasone.globalnet.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymE0H-00N8BQC>; Wed, 17 Jun 1998 10:55:37 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA01516;
	Wed, 17 Jun 1998 10:59:25 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30A2AF8; Tue, 16 Jun 1998 09:50:21 +0000 (???)
From: "Andrew Gledhill" <andrew@tasone.globalnet.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35863FDD.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Jun 1998 08:49:41 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Subject: [GFA] Help

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id KAA01516
X-UIDL: cb6ea6ed200c0396d18e14b99f96df66

* List: gfabasic@linux.net.eu.org

Hi all this is my first posting,

just a quick question, how big of a data file can be stored in memory at the
same time.

i don`t know if i would be better off loading  the data  file into memory or
just use it straight from the  disk.



     Yours electronically,
     Andrew Gledhill
+--------------------------------------------------------------------------+
                                           ////
                                         (o o)
                                -oOO--(_)--OOo-
   Email : andrew@tasone.globalnet.co.uk
   www : www.users.globalnet.co.uk/~tasone/index.htm
   PGP Public Keys available (RSA or DSS) at the above
   W.W.W. site or by email to me.
+--------------------------------------------------------------------------+

-----Original Message-----
From: Jan Schnemann <schonema@post6.tele.dk>
To: gfabasic@linux.net.eu.org <gfabasic@linux.net.eu.org>
Date: 14 June 1998 12:42
Subject: Re: [GFA] Moving Files


>* List: gfabasic@linux.net.eu.org
>
>Hi!
>Renaming files works if it is on the same drive.
>
>rroriolo@redestb.es skrev:
>>
>> * List: gfabasic@linux.net.eu.org
>>
>> Does somebody know a better/faster way to move a file among different
>> directories?
>> This procedure makes the work, splicing the file in chunks of 32000
bytes,
>> but it takes 40 seconds for a file of 1.3 MB.
>>
>> MoveFile("c:\win95\system\xx.exe","a:\yy.exe")
>> PROCEDURE MoveFile(Source$,Target$)
>>   LOCAL lof%,po% ,a$
>>   a$ = STRING$(32000,0)
>>   IF EXIST(Source$)
>>     OPEN "i",#1, Source$
>>     SEEK #1,0
>>     lof% = LOF( #1)
>>     OPEN "a",#2,Target$
>>     WHILE LOC( #1) + 32000 < lof%
>>       BGET #1,V:a$,32000
>>       BPUT #2,V:a$,32000
>>     WEND
>>     SUB lof%,LOC( #1)
>>     BGET #1,V:a$,lof%
>>     BPUT #2,V:a$,lof%
>>     CLOSE #1
>>     CLOSE #2
>>   ENDIF
>> RETURN
>>
>> Thanks in advance.
>>
>> Robert R. Oriolo
>> rroriolo@redestb.es
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jun 17 18:06:30 1998
Return-Path: <ch.pelz@uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymJ2R-00N8AfC>; Wed, 17 Jun 1998 16:18:11 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id QAA03715;
	Wed, 17 Jun 1998 16:21:37 +0200
From: ch.pelz@uni-bonn.de
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3073FB4; Tue, 16 Jun 1998 15:14:29 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35868BD5.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Wed, 17 Jun 98 16:16:54 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Wed, 17 Jun 1998 16:12:38 +0200
In-Reply-To: <357FFEEB.BeroList-2.5.7@linux.net.eu.org>
References: <35701E10.BeroList-2.5.7@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: ch.pelz@IBM.rhrz.uni-bonn.de
Subject: [GFA] TYPES to procedures
X-UIDL: 5f98e95e70329952fde20d9c9b551583

* List: gfabasic@linux.net.eu.org

Hi everybody,

I'm trying to hand a TYPE to a procedure, using code like this:

TYPE rect:
- SHORT x, y, w, h
ENDTYPE

rect: Akt.

PROCEDURE Test(a&, b&, VAR Akt.)
..
RETURN

GFA-Basic doesn't accept this (the PROCEDURE-line) but tells me there's a
syntax-error. Any mistake I'm making, or is it simply not possible to hand
a type-Variable to a Procedure (or a Function?)

Thank you

Chris



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jun 17 18:06:31 1998
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymJfh-00N8TvC>; Wed, 17 Jun 1998 16:58:45 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA04047;
	Wed, 17 Jun 1998 17:02:12 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30AA70E; Tue, 16 Jun 1998 15:55:19 +0000 (???)
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35869567.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
X-BlackMail: 192.168.1.201, default, michael@bonbit.org, 192.168.1.201
X-Authenticated-Timestamp: 16:53:00(GMT+2) on June 17, 1998
X-Sender: michael@bonbit.org
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Wed, 17 Jun 1998 16:47:06 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] CTL3D1.DLL and Win95
X-UIDL: 740ff732fce158b80ca52daff5e90c28

* List: gfabasic@linux.net.eu.org

Hi there!

When using the 3D look with DLG 3D ON the CTL3D1.DLL has to be inside the
system directory of Windows 3.1. I have tested my program with Win95
without the DLL and it seems to work fine. So is the DLL not necessary when
running Win95?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jun 18 18:40:54 1998
Return-Path: <rlaporte@abo.rhein-zeitung.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymNSt-00N6g3C>; Wed, 17 Jun 1998 21:01:47 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA06397;
	Wed, 17 Jun 1998 21:05:39 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3036DC6; Tue, 16 Jun 1998 19:57:58 +0000 (???)
From: Ralf La Porte <rlaporte@abo.rhein-zeitung.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3586CE46.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Jun 1998 21:00:46 +0200
X-Mailer: Ralf La Porte's registered AK-Mail 3.0b [ger]
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1

Subject: Re: [GFA] TYPES to procedures
X-UIDL: 374da3c89edd750beb859e25e3c8b517

* List: gfabasic@linux.net.eu.org

Hi Chris,
> Hi everybody,

> I'm trying to hand a TYPE to a procedure, using code like this:

> TYPE rect:
> - SHORT x, y, w, h
> ENDTYPE

> rect: Akt.

> PROCEDURE Test(a&, b&, VAR Akt.)
> ..
> RETURN

> GFA-Basic doesn't accept this (the PROCEDURE-line) but tells me there's a
> syntax-error. Any mistake I'm making, or is it simply not possible to hand
> a type-Variable to a Procedure (or a Function?)

> Thank you

> Chris


ueber einen Trick kann man TYPES an Unterprogramm (PROCEDURE, FUNCTION) uebergeben. Man muss die Adresse des TYPES ermitteln und diese an das Unterprogramm uebergeben (siehe Beispiel).

TYPE rect:
- SHORT x, y, w, h
ENDTYPE

rect: Akt.
AdrAkt% = V:Akt.        ' Adresse es TYPE ermitteln und merken

Akt.x = 10
Akt.y = 20
Akt.w = 100
Akt.h = 200

OPENW #1
PRINT "Type-Daten vor Unterprogrammaufruf"
PRINT Akt.x
PRINT Akt.y
PRINT Akt.w

PRINT Akt.h
Test(1,2,AdrAkt%)
PRINT "Type-Daten vor Unterprogrammaufruf"
PRINT Akt.x
PRINT Akt.y
PRINT Akt.w
PRINT Akt.h
REPEAT
UNTIL MOUSEK
'
'
PROCEDURE Test(a&, b&, AdrAkt% )

  {AdrAkt%}.x = 11
  {AdrAkt%}.y = 22
  {AdrAkt%}.w = 111
  {AdrAkt%}.h = 222

RETURN


Gruesse Ralf

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jun 18 18:40:56 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymO28-00N8AoC>; Wed, 17 Jun 1998 21:38:12 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA06831;
	Wed, 17 Jun 1998 21:42:10 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30CA344; Tue, 16 Jun 1998 20:35:17 +0000 (???)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3586D706.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id VAA13028 for <gfabasic@linux.net.eu.org>; 
          Wed, 17 Jun 1998 21:37:33 +0200 (MET DST)
Date: Wed, 17 Jun 1998 21:38:27 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: [GFA] First contact...
X-UIDL: 95c651a43f584c16a19a013a5e3a7e21

* List: gfabasic@linux.net.eu.org

Hi there!

I am a swedish GFA-amateur programmer, and here is my first question in this
forum.

I'm working on a little program with one parent window and two child windows. I
can as usual make a window active by clicking in it.

But I also want to exchange the active window by pressing a key, for instance
Escape. Is there any possibility to do that? I've tried with WIN #(n), but it
doesn't work.

Can anyone help me?

With regards, Sven Kumlin

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jun 18 18:41:13 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymbtj-00N8W9C>; Thu, 18 Jun 1998 12:26:27 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA18939;
	Thu, 18 Jun 1998 10:20:29 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703B35563; Wed, 17 Jun 1998 09:12:08 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35878868.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AF4851D40362; Thu, 18 Jun 1998 08:10:16 +03d00
Date: Thu, 18 Jun 1998 10:13:48 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] First contact...
X-UIDL: c04d521b43d3dfcf9a62120890fd4805

* List: gfabasic@linux.net.eu.org

>> But I also want to exchange the active window by pressing a key, for instance
Escape. Is there any possibility to do that? I've tried with WIN #(n), but it
doesn't work.

Ctrl-F6 cycles through the child windows.

To activate a window you use TOPW. WIN # generates window parameter info located in the  WINDGET table.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jun 18 18:41:14 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymbuF-00N8WFC>; Thu, 18 Jun 1998 12:26:59 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA18773;
	Thu, 18 Jun 1998 09:54:41 +0200
From: Peuapeu@aol.com
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30EBB0F; Wed, 17 Jun 1998 08:46:34 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3587826B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 18 Jun 1998 03:48:20 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 2.6 for Mac
Subject: [GFA] SET GFABASIC DIGEST
X-UIDL: 2bb1d114756a3bad4a7b9cb016a06011

* List: gfabasic@linux.net.eu.org

SET GFABASIC DIGEST


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jun 18 18:41:15 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymbuX-00N8W7C>; Thu, 18 Jun 1998 12:27:17 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA18316;
	Thu, 18 Jun 1998 08:34:41 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30B59EF; Wed, 17 Jun 1998 07:26:19 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35876F9B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Sender: root@smtp1.erols.com
Date: Thu, 18 Jun 1998 02:28:04 +0000
X-Mailer: Mozilla 4.05 [en] (X11; I; Linux 2.0.33 i486)
MIME-Version: 1.0
References: <3586CE46.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] TYPES to procedures
X-UIDL: 9767e214bd68def0ea3304c6a5a3885e

* List: gfabasic@linux.net.eu.org

How about passing the address instead?

PROCEDURE Test(a&, b&, v:Akt.)

-B

Ralf La Porte wrote:

> * List: gfabasic@linux.net.eu.org
>
> Hi Chris,
> > Hi everybody,
>
> > I'm trying to hand a TYPE to a procedure, using code like this:
>
> > TYPE rect:
> > - SHORT x, y, w, h
> > ENDTYPE
>
> > rect: Akt.
>
> > PROCEDURE Test(a&, b&, VAR Akt.)
> > ..
> > RETURN
>
> > GFA-Basic doesn't accept this (the PROCEDURE-line) but tells me there's a


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jun 18 18:41:16 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymbul-00N8W6C>; Thu, 18 Jun 1998 12:27:31 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA18992;
	Thu, 18 Jun 1998 10:23:10 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F2E45502; Wed, 17 Jun 1998 09:12:14 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3587886E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AF4751D40362; Thu, 18 Jun 1998 08:10:15 +03d00
Date: Thu, 18 Jun 1998 10:08:46 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] CTL3D1.DLL and Win95
X-UIDL: 1bf18cb67ebbf5dfba10c79a4d763db1

* List: gfabasic@linux.net.eu.org

>> I have tested my program with Win95
without the DLL and it seems to work fine. So is the DLL not necessary when
running Win95?

Windows 95 draws some controls with a 3D border style by default. To obtain a 3D look for other controls, Win95 requires
the WS_EX_CLIENTEDGE style to be passed in the CreaetWindowEx API function. The GFA control commands don't use this API,
but call CreateWindow instead. To obtain a 3D style for the GFA controls, the controls that are created using a GFA
command, you should still use CTL3D1.DLL.

So, it only seems to work, but it doesn't.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jun 19 14:57:33 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymhpN-00N8VoC>; Thu, 18 Jun 1998 18:46:21 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA02390;
	Thu, 18 Jun 1998 18:48:51 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3037431; Wed, 17 Jun 1998 17:39:00 +0000 (???)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3587FF34.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Wed, 17 Jun 1998 18:48:26 +0000
In-Reply-To: <35868BD5.BeroList-2.5.7@linux.net.eu.org>
References: <357FFEEB.BeroList-2.5.7@linux.net.eu.org>
 <35701E10.BeroList-2.5.7@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] TYPES to procedures
X-UIDL: a33d4b5331cedc176eaa5b1e9d55ec9f

* List: gfabasic@linux.net.eu.org

At 16:12 17.06.1998 +0200, you wrote:

>PROCEDURE Test(a&, b&, VAR Akt.)
>..
>RETURN
>
>GFA-Basic doesn't accept this (the PROCEDURE-line) but tells me there's a
>syntax-error. Any mistake I'm making, or is it simply not possible to hand
>a type-Variable to a Procedure (or a Function?)

I think this will not work because TYPEs are generally global in GFA Basic.
Am I right?

Bye, Roland


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jun 19 15:04:05 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ymvlY-00N8B5C>; Fri, 19 Jun 1998 09:39:20 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA16229;
	Fri, 19 Jun 1998 09:42:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30D67D2; Thu, 18 Jun 1998 08:36:21 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3588D186.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A8694AC40180; Fri, 19 Jun 1998 07:34:33 +03d00
Date: Fri, 19 Jun 1998 09:25:03 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] TYPES to procedures
X-UIDL: 490bfb5c0b8961e209bbef0e35290423

* List: gfabasic@linux.net.eu.org

>>>PROCEDURE Test(a&, b&, VAR Akt.)
>..
>RETURN
>
>GFA-Basic doesn't accept this (the PROCEDURE-line) but tells me there's a
>syntax-error. Any mistake I'm making, or is it simply not possible to hand
>a type-Variable to a Procedure (or a Function?)

I think this will not work because TYPEs are generally global in GFA Basic.
Am I right?<<

Types are allocated from global memory. Passing them to a proc is not possible. You can pass its address though and use
the pointer operator {}.element to access it. You could also create a 'local' type variable of the same type inside the
procedure and copy the contents pointed by the passed address, use it, copy it back, and erase the type 'local' type
variable.

For instance, given type TMyType

Dim TMyType:tvar.
Xx(V:tvar.)   // or Xx(*tvar.)

Procedure Xx(lpTvar%)
  {lpTvar%}.element = value
Return

Or,

Procedure Xx(lpTvar%)
  Dim TMyType:Temp.
  Temp. = TMyType:{lpVar%}
  Temp.element = value
  TMyType:{lpVar%} = Temp.
  Erase Temp.
Return

Ofcourse the second method causes GFA to allocate memory from the global heap, move bytes, and release the global heap:
more time. The first method is by far the most efficient way. However, there are situations, you might like to move the
passed type to a temporary type var. For instance, using Temp.Element unlocks the possibility to use +=, ++, --, \= etc,
operators.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jun 19 20:37:28 1998
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yn1E5-00N8U5C>; Fri, 19 Jun 1998 15:29:09 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id PAA18746;
	Fri, 19 Jun 1998 15:32:21 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30E7248; Thu, 18 Jun 1998 14:25:30 +0000 (???)
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3589235B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
X-BlackMail: 192.168.1.201, default, michael@bonbit.org, 192.168.1.201
X-Authenticated-Timestamp: 15:24:31(GMT+2) on June 19, 1998
X-Sender: michael@bonbit.org
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Fri, 19 Jun 1998 12:46:59 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] BWCC.DLL
X-UIDL: 617ec1a0134a791e78031e421143a417

* List: gfabasic@linux.net.eu.org

Hi there!

Now that I own a Borland C++ I also have the BWCC.DLL. When I use the DLL
with Windows 95 everything works fine. But when I use it with Windows 3.1
an error box appears and it says that the file BWCCDEU.DLL is missing. I
think this has to be the german version of the DLL. What am I doing wrong?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jun 19 20:37:34 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yn35v-00N7BXC>; Fri, 19 Jun 1998 17:28:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA20130;
	Fri, 19 Jun 1998 17:32:15 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3006091; Thu, 18 Jun 1998 16:26:01 +0000 (???)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35893F99.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: 19 Jun 1998 07:26
X-Newsreader: Mountain Reader 1.3 for Windows
Subject: [GFA] ExtDeviceMode
X-UIDL: 43aea13c17381bfe8e0ab9ceaf89c3e7

* List: gfabasic@linux.net.eu.org

Hi,

Has anyone gotten the ExtDeviceMode API to work with GFA? I've gotten as far 
as having ExtDeviceMode return the size of the DEVMODE structure, but no 
matter what variables I send the command, I cannot get it to bring up the 
printer setup dialog. It just keeps returning the DEVMODE size?

I've tried this routine with a variety of printer drivers, and under both 
Windows 3.11 and Win95. It always acts the same. So, I'm guessing I'm just 
doing something wrong.

Does anyone have working code to call the ExtDeviceMode function?

The following is a clip from my program:

      DEFINT "a-z"      '** This is the variable type I'm using

      '** Get information on the current printer device

      a$=SPACE$(64)
      a=GetProfileString("windows","device","",V:a$,64)
      a$=LEFT$(a$,a)
      a=INSTR(a$,",")
      device$=LEFT$(a$,a-1)
      b=INSTR(a$,",",a+1)
      driver$=MID$(a$,a+1,b-a-1)

      a=INSTR(a$,",",b+1)
      IF a=0
        output$=MID$(a$,b+1,LEN(a$)-b)
      ELSE
        output$=MID$(a$,b+1,a-b-1)
      ENDIF

      '** Get the system directory and build the full driver filename

      a$=SPACE$(128)
      a=GetSystemDirectory(V:a$,128)
      a$=LEFT$(a$,a)+"\\"+driver$+".DRV"+CHR$(0)

      driver=LoadLibrary(V:a$)
      IF driver>31
        create_buffer(256,device)   '** Subroutine to allocate memory (locked)
        create_buffer(256,output)
        char(device,0,device$)      '** Outputs null terminated string
        char(output,0,output$)

        address=GetProcAddress(driver,"ExtDeviceMode")
        size=$FFFF AND C:(address)(0,driver,temp,device,output,0,0,6)

        free_buffer(device)         '** Frees the buffers allocated above
        free_buffer(output)
        ~FreeLibrary(driver)

      ENDIF


Any assistance you can provide would be appreciated.

By the way, I'm needing to be able to call the printer setup dialog, and then 
save the printer settings so that I can just reset them later without having 
to call the setup dialog again. ExtDeviceMode and ResetDC should work for me 
if I can get them to function properly.

Thanks,

Anthony Watson
Mountain Software
anthony@mountain-software.com
www.mountain-software.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 20 23:19:27 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ynHPx-00N6faC>; Sat, 20 Jun 1998 08:46:29 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA00530;
	Sat, 20 Jun 1998 08:50:07 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F308BF31; Fri, 19 Jun 1998 07:42:50 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358A167A.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AD5AE7C2026E; Sat, 20 Jun 1998 06:40:58 +03d00
Date: Sat, 20 Jun 1998 08:24:59 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] ExtDeviceMode
X-UIDL: 655349c9c6a1bf2d42af3f19c2d4faab

* List: gfabasic@linux.net.eu.org

>>
      DEFINT "a-z"      '** This is the variable type I'm using

Bingo! The module handle should be a word; handle&. Try again.

You better use DEFWRD, since all handles, GDI coordinates, actually all API
values are 16-bit. Only pointers are 32-bits .

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 20 23:19:28 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ynLkS-00N7BXC>; Sat, 20 Jun 1998 13:23:56 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA01437;
	Sat, 20 Jun 1998 13:27:49 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30BF646; Fri, 19 Jun 1998 12:20:55 +0000 (???)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358A57A7.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id NAA07540 for <gfabasic@linux.net.eu.org>; 
          Sat, 20 Jun 1998 13:23:01 +0200 (MET DST)
Date: Sat, 20 Jun 1998 13:23:23 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: [GFA] No such a file...
X-UIDL: 3e0b9f1b385386d16e381b9ae9348b37

* List: gfabasic@linux.net.eu.org


> But I also want to exchange the active window by pressing a key, for instance
> Escape. Is there any possibility to do that? I've tried with WIN #(n), but it
> doesn't work.
> 
> Ctrl-F6 cycles through the child windows.
> 
> To activate a window you use TOPW. WIN # generates window parameter info
located in the  WINDGET table.
> 
> Regards,
> Sjouke Hamstra

Thank you for the tips! I'm sure I 'll be able to bring it to work soon.

But now I have another problem.

I have downloaded several example listings of text editors. I also have a few
of my own. All of them were working very good until now!

Today I always get an error message "No such a file or directory" when trying
to use the 'load' function in the examples, or in the file selector routines of
my own. The text file is in another map than the listing itself. If in the same
map it woks! The path from the file selector is completely right, but in spite
of that the annoying message cames up.

Why this happens now, but not before? Can anyone tell me what is going on in my
computer?


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 20 23:19:29 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ynP87-00N8URC>; Sat, 20 Jun 1998 17:00:35 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA02415;
	Sat, 20 Jun 1998 17:04:38 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3055BA1; Fri, 19 Jun 1998 15:57:54 +0000 (???)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358A8A82.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Authentication-Warning: pacifier.com: awatson owned process doing -bs
Date: Sat, 20 Jun 1998 07:59:54 -0700 (PDT)
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] ExtDeviceMode
X-UIDL: 24d3e0ebe3752e0f2855af86f19535a2

* List: gfabasic@linux.net.eu.org

Sjouke,

>>  DEFINT "a-z"      '** This is the variable type I'm using

> Bingo! The module handle should be a word; handle&. Try again.
> You better use DEFWRD, since all handles, GDI coordinates, actually
> all API values are 16-bit. Only pointers are 32-bits .

Nope, I tried using word variables and it didn't change anything. In fact,
I tried all sorts of 16-bit and 32-bit variables and nothing changed.
Short of seeing a working code example, I think I'll give up on this one.
I've already wasted three days trying to figure it out.

Instead, I'll probably use a technique around the PrintDLG functions
instead. I found some sample code on GFA's ftp site that does something
similar to what I want. It's a bit cluttered and needs to be cleaned up,
but I think it will do what I'm need once I rearrange everything.

In any case, if I could find the time, I would still like to get the
ExtDeviceMode working, if for no other reason than personal satisfaction!
Ha. Ha. So, if anyone has a working sample, I would love to see it.

Thanks,

Anthony Watson
Mountain Software
anthony@mountain-software.com
www.mountain-software.com



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jun 21 16:20:48 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ynV5B-00N8VxC>; Sat, 20 Jun 1998 23:21:57 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA04387;
	Sat, 20 Jun 1998 23:25:52 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30A38ED; Fri, 19 Jun 1998 22:18:26 +0000 (???)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358AE3B2.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 19 Jun 1998 20:44:34 +0000
In-Reply-To: <3589235B.BeroList-2.5.7@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] BWCC.DLL
X-UIDL: ff2a539516bd575c37252083d4fa1453

* List: gfabasic@linux.net.eu.org

At 12:46 19.06.1998 +0200, you wrote:

>Now that I own a Borland C++ I also have the BWCC.DLL. When I use the DLL
>with Windows 95 everything works fine. But when I use it with Windows 3.1
>an error box appears and it says that the file BWCCDEU.DLL is missing. I
>think this has to be the german version of the DLL. What am I doing wrong?

Borland writes a special entry into WIN.INI:

[BWCC]
;BitmapLibrary=C:\WINDOWS\SYSTEM\bwcc007.dll
BitmapLibrary=C:\WINDOWS\SYSTEM\bwcc.dll

.. where bwcc007.dll is the german library.
Without this entry the Borland Resource Workshop will not
work for example.

Bye, Roland


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jun 21 16:20:54 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ynhvA-00N7M6C>; Sun, 21 Jun 1998 13:04:28 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA15659;
	Sun, 21 Jun 1998 13:08:48 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3040FB6; Sat, 20 Jun 1998 12:00:28 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358BA45C.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AB371DB0088; Sun, 21 Jun 1998 10:58:31 +03d00
Date: Sun, 21 Jun 1998 12:59:19 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] ExtDeviceMode
X-UIDL: b2b961abe333d51e63172ee93bf10dbf

* List: gfabasic@linux.net.eu.org

Hi Anthony,

>> I've already wasted three days trying to figure it out.

;) took me less than an hour to get it working. I love these challenges.
Note: I did not test any results from the Setup. I only show how to call the
dialog!

// For Anthony Whatson
// ExtDevMd.GFW - Demonstrates calling of Printer Setup through
//                ExtDeviceMode library function.
// June 21st, 1998 Sjouke Hamstra (shamstra@gelrevision.nl)

Defwrd "a-z"

Type TDEVMODE:                // from PRINT.H
- Char*32 dmDeviceName$
- Word   dmSpecVersion
- Word   dmDriverVersion
- Word   dmSize
- Word   dmDriverExtra
- Dword  dmFields
- Long   dmOrientation
- Long   dmPaperSize
- Long   dmPaperLength
- Long   dmPaperWidth
- Long   dmScale
- Long   dmCopies
- Long   dmDefaultSource
- Long   dmPrintQuality
- Long   dmColor
- Long   dmDuplex
- Long   dmYResolution
- Long   dmTTOption
EndType  // DEVMODE;

Dim TDEVMODE: devmode.

Openw #1
buf$ = String$(144,0)
~GetProfileString("windows","device","",V:buf$,Len(buf$))
buf$ = Ztrim$(buf$)

i& = Instr(buf$,",")
pr$ = Left$(buf$,i& - 1) + Chr$(0)      // devicename, zero-terminated

buf$ = Ztrim$(Mid$(buf$,i& + 1))
i& = Instr(buf$,",")
dr$ = Left$(buf$,i& - 1)
port$ = Ztrim$(Mid$(buf$,i& + 1)) + Chr$(0)     // portname, zero-terminated

//? "Found: ";pr$'dr$'port$

hLib& = LoadLibrary(dr$ + ".drv")
If Card(hLib&) > 32
  lpProc% = GetProcAddress(hLib&,"ExtDeviceMode")

  //typedef UINT (CALLBACK* LPFNDEVMODE)(HWND, HMODULE, DEVMODE FAR*,
  //               LPSTR, LPSTR, DEVMODE FAR*, LPSTR, UINT);
  lpCb% = MakeProcInstance(lpProc%,_instance)

  // Comment:
  // As you can see the function is a callback, so use pascal convention
  // to pass parameters. Also, a callback is called by a MakeProcInstance
address.
  // Long parameters are put on the stack using L:
  // As you can see it works.
  ~P:(lpCb%)(Win(1),hLib&,L:V:devmode.,L:V:pr$, L:V:port$,L:V:devmode.,L:0,4)
Else
  ? "No driver found"
  ? "Handle lib: "; hLib&
EndIf
Do
  Sleep
Until Menu(1) = 4
free()
End

Procedure free()
  If Card(hLib&) > 32 Then ~FreeLibrary(hLib&)
Return

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jun 21 16:20:56 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ynhvB-00N8ULC>; Sun, 21 Jun 1998 13:04:29 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA15655;
	Sun, 21 Jun 1998 13:08:48 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703B3EDE0; Sat, 20 Jun 1998 12:00:27 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358BA45B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AB341DB0088; Sun, 21 Jun 1998 10:58:31 +03d00
Date: Sun, 21 Jun 1998 13:01:59 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] No such a file...
X-UIDL: b09bbe7e81d7cbcafe20c41711438141

* List: gfabasic@linux.net.eu.org

>> The path from the file selector is completely right, but in spite
of that the annoying message cames up.

Well, if you are sure the path is correct, and pass the file name to the Open
"i",#1,f$ command it should work.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 22 12:12:43 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ynpks-00N7BMC>; Sun, 21 Jun 1998 21:26:22 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA18286;
	Sun, 21 Jun 1998 21:30:39 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F309EB34; Sat, 20 Jun 1998 20:22:50 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358C1A1A.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 21 Jun 1998 12:19:48 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <358BA45C.BeroList-2.5.7@linux.net.eu.org>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: RE: [GFA] ExtDeviceMode
X-UIDL: e46aa6ff7df05867686ffca98281a6a4

* List: gfabasic@linux.net.eu.org

Hi Sjouke,
I would like to include this in the GFAWHELP file if it is OK with you,
Dale Bryant


> -----Original Message-----
> From: Sjouke Hamstra [mailto:shamstra@gelrevision.nl]
> Sent: Sunday, June 21, 1998 3:59 AM
> To: gfabasic@linux.net.eu.org
> Subject: Re: [GFA] ExtDeviceMode
> 
> 
> * List: gfabasic@linux.net.eu.org
> 
> Hi Anthony,
> 
> >> I've already wasted three days trying to figure it out.
> 
> ;) took me less than an hour to get it working. I love these challenges.
> Note: I did not test any results from the Setup. I only show how 
> to call the
> dialog!
> 
> // For Anthony Whatson
> // ExtDevMd.GFW - Demonstrates calling of Printer Setup through
> //                ExtDeviceMode library function.
> // June 21st, 1998 Sjouke Hamstra (shamstra@gelrevision.nl)
> 
> Defwrd "a-z"
> 
> Type TDEVMODE:                // from PRINT.H
> - Char*32 dmDeviceName$
> - Word   dmSpecVersion
> - Word   dmDriverVersion
> - Word   dmSize
> - Word   dmDriverExtra
> - Dword  dmFields
> - Long   dmOrientation
> - Long   dmPaperSize
> - Long   dmPaperLength
> - Long   dmPaperWidth
> - Long   dmScale
> - Long   dmCopies
> - Long   dmDefaultSource
> - Long   dmPrintQuality
> - Long   dmColor
> - Long   dmDuplex
> - Long   dmYResolution
> - Long   dmTTOption
> EndType  // DEVMODE;
> 
> Dim TDEVMODE: devmode.
> 
> Openw #1
> buf$ = String$(144,0)
> ~GetProfileString("windows","device","",V:buf$,Len(buf$))
> buf$ = Ztrim$(buf$)
> 
> i& = Instr(buf$,",")
> pr$ = Left$(buf$,i& - 1) + Chr$(0)      // devicename, zero-terminated
> 
> buf$ = Ztrim$(Mid$(buf$,i& + 1))
> i& = Instr(buf$,",")
> dr$ = Left$(buf$,i& - 1)
> port$ = Ztrim$(Mid$(buf$,i& + 1)) + Chr$(0)     // portname, 
> zero-terminated
> 
> //? "Found: ";pr$'dr$'port$
> 
> hLib& = LoadLibrary(dr$ + ".drv")
> If Card(hLib&) > 32
>   lpProc% = GetProcAddress(hLib&,"ExtDeviceMode")
> 
>   //typedef UINT (CALLBACK* LPFNDEVMODE)(HWND, HMODULE, DEVMODE FAR*,
>   //               LPSTR, LPSTR, DEVMODE FAR*, LPSTR, UINT);
>   lpCb% = MakeProcInstance(lpProc%,_instance)
> 
>   // Comment:
>   // As you can see the function is a callback, so use pascal convention
>   // to pass parameters. Also, a callback is called by a MakeProcInstance
> address.
>   // Long parameters are put on the stack using L:
>   // As you can see it works.
>   ~P:(lpCb%)(Win(1),hLib&,L:V:devmode.,L:V:pr$, 
> L:V:port$,L:V:devmode.,L:0,4)
> Else
>   ? "No driver found"
>   ? "Handle lib: "; hLib&
> EndIf
> Do
>   Sleep
> Until Menu(1) = 4
> free()
> End
> 
> Procedure free()
>   If Card(hLib&) > 32 Then ~FreeLibrary(hLib&)
> Return
> 
> Regards,
> Sjouke Hamstra
> GFA-related homepage: http://www.gfa.net/home/shamstra
> 
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 22 12:12:45 1998
Return-Path: <SOAPY@neu.edu>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ynrNR-00N7BMC>; Sun, 21 Jun 1998 23:10:17 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA18916;
	Sun, 21 Jun 1998 23:14:54 +0200
From: SOAPY@neu.edu
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3055A18; Sat, 20 Jun 1998 22:07:29 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358C32A1.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
 id <01IYI7X820U89ZU9WH@neu.edu> for GFABASIC@LINUX.NET.EU.org; Sun,
 21 Jun 1998 17:09:22 EST
Date: Sun, 21 Jun 1998 17:09:21 -0500 (EST)
X-VMS-To: IN%gfabasic@linux.net.eu.org
MIME-version: 1.0
Subject: [GFA] Page Down
X-UIDL: 001fe198b1c5c635c8b70c65f764b7ee

* List: gfabasic@linux.net.eu.org



Hello everyone!

I'm having difficulty getting the 'Page Down' to work properly and
would like some help with it.

I dislike the MS-DOS's 'MORE.EXE' because I can't move a page up
and move to the begining so I wrote one here.  It would have been
nice if MS-DOS's 'MORE.EXE' behaves like the UNIX's 'more' command
which allows moving up and down and to the begining of the file.

Thank you,

Karl "SOAPY" Phan
soapy@neu.edu


DEFWRD "a-z"
WRAP OFF
IF BYTE{_PSP + $80} THEN LET f$ = CHAR{_PSP
 + $81}
LET l = LEN(f$)
LET p = 1
LET d$ = CHR$(32) + CHR$(9) + CHR$(0) + CHR$(255)
DO WHILE INSTR(d$, MID$(f$, p, 1))
  EXIT IF p > l
  INC p
LOOP
LET f$ = MID$(f$, p, l)
LET l = LEN(f$)
LET p = 1
DO WHILE INSTR(d$, MID$(f$, p, 1)) = 0
  EXIT IF p > l
  INC p
LOOP
LET f$ = MID$(f$, 1, p - 1)
CLR l, p, d$
IF LEN(f$) THEN
  IF EXIST(f$) THEN
    LET f$ = UCASE$(f$)
    OPEN f$ FOR BINARY AS #1
    LET n = 0
    DO
      EXIT IF EOF(#1)
      LET b = INP(#1)
      IF b = 13 THEN INC n

    LOOP
    CLOSE #1
    DIM s$(n)
    OPEN f$ FOR BINARY AS #1
    LET i = 0
    DO
      EXIT IF EOF(#1)
      LET b = INP(#1)
      IF b <> 10 AND b <> 13 THEN LET c$ = c$ + CHR$(b)
      IF b = 13 THEN
        INC i
        LET s$(i) = c$
        CLR c$
      ENDIF
    LOOP
    CLOSE #1
    LET y = 1
    LET x = 1
    DO
      FOR r = 0 TO 23
        LET t$ = LEFT$(MID$(s$(y + r), x, 80) + SPACE$(80), 80)
        LOCATE 1, r + 1
        ? t$
      NEXT r
      LET p = (y * 100
) \ (n - 23)
      IF p < 0 THEN p = 0
      IF p > 100 THEN p = 100
      SCROLL OFF
      ? USING "###%", p
      DO
        LET k$ = INKEY$
      LOOP UNTIL LEN(k$)
      IF LEN(k$) = 2 THEN
        LET k = -ASC(RIGHT$(k$))
      ELSE
        LET k = ASC(k$)
      ENDIF
      EXIT IF k = 27
      SELECT k
        ' Up Arrow
      CASE -72
        IF y > 1 THEN LET y = y - 1
      CASE -80
        ' Down Arrow
        IF y < (n - 22) THEN LET y = y + 1
      CASE -75
        ' Left A
rrow
        IF x > 1 THEN LET x = x - 4
      CASE -77
        ' Right Arrow
        LET x = x + 4
      CASE -73
        ' Page Up, Ctrl-b
        LET y = y - 23
        IF y < 1 THEN LET y = 1
      CASE -81, 32
        ' Page Down, Space Bar, Ctrl-f
        IF (y + 23) <= n THEN LET y = y + 23
      CASE -71
        ' Home
        LET y = 1
      CASE -79
        ' End
        LET y = n - 23
        IF y < 1 THEN LET y = 1
      ENDSELECT
    LOOP
  ELSE
    ? f$; " file not found.
";
  ENDIF
ELSE
  ? "Usage: MORE FILE"
  ? "Where: FILE is the name of file.";
ENDIF
END




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 22 12:13:16 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yo18U-00N7AxC>; Mon, 22 Jun 1998 09:35:30 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA29530;
	Mon, 22 Jun 1998 09:40:12 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3052FF6; Sun, 21 Jun 1998 08:32:34 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358CC522.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id ABF33503008A; Mon, 22 Jun 1998 07:30:27 +03d00
Date: Mon, 22 Jun 1998 09:10:10 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] ExtDeviceMode
X-UIDL: 608181fed94c85979e8e56e29e1dc065

* List: gfabasic@linux.net.eu.org

>> I would like to include this in the GFAWHELP file if it is OK with you,

Fine with me.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 22 18:53:29 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yo8Ji-00N2rfC>; Mon, 22 Jun 1998 17:15:34 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA32492;
	Mon, 22 Jun 1998 17:19:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703BC3D90; Sun, 21 Jun 1998 16:10:53 +0000 (???)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358D308E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Sun, 21 Jun 1998 16:10:41 +0000 (???)
Subject: [GFA] Announce: GFA-Extension Tool 2.1 available!
X-UIDL: 4aa53104368bb8de2620b50ee8cde1e9

* List: gfabasic@linux.net.eu.org

We are proud to announce the new version 2.1 of the GFA-Extension Tool.
It fixes several bugs, runs fine under Windows NT now and has some new
functions.
See below for a complete function overview.

The new version can be downloaded from
http://ourworld.compuserve.com/homepages/gfasoft.

If you encounter any problems, please direct them by email to
gfasoft@compuserve.com.


Best Regards


GFA Software
----------------------------------------------------------------------------
--------------


                           GFA-Extension Tool 2.1

                      Enhancement tool for GFA-BASIC



Make Programmer's life easier!

We are proud to announce the GFA-Extension Tool 2.1. It extends
the GFA Editor with several new, powerful features. Try it,
and you won't miss it any more!

Did you ever want to have long file names for your Source code files?
Do you ofen remark lines in the Editor while debugging your programs?
Wouldn't it be easier to select a block and let the Editor automatically
remark the whole block?

Here is the solution, the GFA-Extension Tool 2.0! It is fully configurable
(you can switch on/off each feature separately) and runs with each Version
of the GFA-BASIC Editor for Windows, even with the old ones
(Version 4.31 or higher). And it is free-of-charge.
Download it now, and simply install it as described in the documentation.

The GFA-Extension Tool 2.1 extends the GFA Editor with these features:

- Debugger window is always on top and cannot be overlapped by other windows
- Supports long file names for loading and saving GFW files
  and LST files within the GFA-Editor
- Activation of the option "Ignore case" in the Find-
  and Find-/Replace-Dialog
- Several new hotkeys for different GFA-Editor functions
- Run EXE option (executes the compiled EXE of the currently loaded
  GFW file, if it exists; otherwise the source code will be compiled first)
- Syntax Error Check (remarks a line containing a GFA Syntax Error,
  so you can leave the line)
- Remark the current line (Remark sign can be chosen from five styles)
- Remark the currently selected block (Remark sign can be chosen from
  five styles)
- Remove the remark signs in the currently selected block
  (only remark signs at the beginning of a line)



Download the GFA-Extension Tool 2.1 right now!

You will find these versions:

GFAEXT2G.ZIP (64048 Bytes)  GFA-Extension Tool 2.1, with German documentation
GFAEXT2E.ZIP (62245 Bytes)  GFA-Extension Tool 2.1, with English documentation

(these files are available at 
 http://ourworld.compuserve.com/homepages/gfasoft)

GFA-Extension Tool 2.1 requires GFA-BASIC for Windows Version 4.31
or higher. The long file name support additionally requires
an operating system that can handle long file names, e.g. Windows95.

New in Version 2.1:

- automatic restauration of home directory while executing programs
- save the contents of the Editor's Variable box into (ASCII) files
- fully compatible with Windows NT 4.0 (and above)

------------------------------------------------------------------------------
                           GFA-Extension Tool 2.1

                      Enhancement tool for GFA-BASIC



Machen Sie sich das Programmiererleben einfacher!

Jetzt gibt es das GFA-Extension Tool 2.1. Es erweitert den GFA-Editor
um eine Anzahl sinnvoller Faehigkeiten, die Sie nicht mehr missen
moechten, wenn Sie einmal damit gearbeitet haben. 

Wollten Sie z.B. schon immer lange, aussagekraeftige Dateinamen
fuer Ihre Source-Code-Dateien vergeben?
Kommentieren Sie oefter Zeilen aus, wenn Sie Programme austesten?
Das waere doch einfacher, wenn man einen Block markieren und
automatisch auskommentieren lassen knnte.

Kein Problem! Das neue GFA-Extension Tool 2.1 ist da!
Es ist voll konfigurierbar (jedes Feature kann separat ein-
oder ausgeschaltet werden) und laeuft mit jeder Version des
GFA-BASIC-Editors fuer Windows, auch mit aelteren (ab der Version 4.31).
Und es ist kostenlos. Sie brauchen es nur downzuloaden und
entsprechend den Installationshinweisen in der Dokumentation einzurichten.

Dies sind die neuen Faehigkeiten, um die der GFA-Editor erweitert wird:

- Debugger-Fenster liegt immer obenauf,
  ist also immer sichtbar und kann nicht verdeckt werden
- Unterstuetzung von langen Dateinamen im GFA-Editor beim Laden und Speichern
  von GFW-Dateien sowie beim Laden und Speichern von LST-Dateien
- Abschalten der Checkbox "Gro-/Kleinschreibung" im Suchen- und 
  Suchen/Ersetzen-Dialog
- einige neue Hotkeys fuer bereits vorhandene Editor-Funktionen
- Run EXE-Option (startet Kompilat einer GFW-Datei,
  kompiliert vorher auf Wunsch neu)
- Syntax Fehler-Check (kommentiert fehlerhafte Zeile aus,
  so da sie verlassen werden kann)
- Auskommentieren der aktuellen Zeile (mit Wahl des Kommentarzeichens)
- Automatisches Auskommentieren eines markierten Blocks
  (mit Wahl des Kommentarzeichens)
- Automatisches Loeschen der Kommentarzeichen in einem markierten Block
  (nur Kommentarzeichen, die zu Beginn der Zeile stehen)



Downloaden Sie jetzt gleich das GFA-Extension Tool 2.1!

Waehlen Sie eine dieser Versionen:

GFAEXT2G.ZIP (64048 Bytes)  GFA-Extension Tool 2.1, mit deutscher Dokumentation
GFAEXT2E.ZIP (62245 Bytes)  GFA-Extension Tool 2.1, mit englischer Dokumentation

(diese Dateien werden unter
 http://ourworld.compuserve.com/homepages/gfasoft angeboten)


GFA-Extension Tool 2.1 setzt GFA-BASIC fuer Windows in der Version 4.31
oder hoeher voraus. Die Unterstuetzung der langen Dateinamen
erfordert zusaetzlich ein Betriebssystem, das mit langen Dateinamen
arbeiten kann, also z.B. Windows95.

Neu in Version 2.1:

- Automatisches Zuruecksetzen des Homeverzeichnisses nach einem
  Programmlauf
- Speichern des Inhalts der Variablen-Box des Editors in ASCII-Dateien
- luft problemlos unter Windows NT ab Version 4.0




+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 22 18:53:33 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yo8R8-00N8eiC>; Mon, 22 Jun 1998 17:23:14 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA32621;
	Mon, 22 Jun 1998 17:28:25 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3063710; Sun, 21 Jun 1998 16:20:57 +0000 (???)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358D32E9.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 21 Jun 1998 16:20:40 +0000 (???)
Subject: [GFA] 2nd Announce: GFA-Extension Tool 2.1 available!
X-UIDL: 221897a0f7e5f9b6c95c20d05c1a8004

* List: gfabasic@linux.net.eu.org

In addition to the first mail here the download
places for the new version of the GFA-Extension Tool:

1. http://ourworld.compuserve.com/homepages/gfasoft.
2. ftp://ftp.bero-online.ml.org/pub/gfabasic/windows/extensions/exttool.


Best Regards


GFA Software


+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 22 18:53:35 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yo9gH-00N8f1C>; Mon, 22 Jun 1998 18:42:57 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA00610;
	Mon, 22 Jun 1998 18:47:59 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30F1EBE; Sun, 21 Jun 1998 17:40:14 +0000 (???)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358D457F.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id SAA09467 for <gfabasic@linux.net.eu.org>; 
          Mon, 22 Jun 1998 18:42:08 +0200 (MET DST)
Date: Mon, 22 Jun 1998 16:59:58 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Subject: SV: [GFA] No such a file...

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id SAA00610
X-UIDL: ab03a955616dc10840b8e59de27b1daa

* List: gfabasic@linux.net.eu.org



> mne: Re: [GFA] No such a file...
> Datum:  den 21 juni 1998 13:01
> 
> >> The path from the file selector is completely right, but in spite
> of that the annoying message cames up.
> 
> Well, if you are sure the path is correct, and pass the file name to the Open
> "i",#1,f$ command it should work.
> 
Yes, the path is correct! And I did exactly as you say: Open "i",#1,f$, but it
didn't work.

Now I know why. I had the TXT-file in a map whith a forbidden character in its
name. I changed the name, and now it works fine again!

Thanks and regards! Sven Kumlin


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 23 17:10:27 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoAjU-00N2sEC>; Mon, 22 Jun 1998 19:50:20 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA01291;
	Mon, 22 Jun 1998 19:55:19 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F308F6B6; Sun, 21 Jun 1998 18:47:26 +0000 (???)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358D553E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Authentication-Warning: pacifier.com: awatson owned process doing -bs
Date: Mon, 22 Jun 1998 10:49:19 -0700 (PDT)
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] ExtDeviceMode
X-UIDL: 6acaaf42ff74b797b73152bade700ef7

* List: gfabasic@linux.net.eu.org

Sjouke,

  Anthony> I've already wasted three days trying to figure it out.
   Sjouke> took me less than an hour to get it working.

Show Off! Ha. Ha. As I suspected, it wasn't really the variable types I was 
using, or the steps I was taking that was causing me problems. It was the 
method of actually "calling" the ExtDeviceMode function that was messing me 
up. I was using a simple C: call to the function instead of using the 
callback approach. But, all the sample code I had was in "C" and my knowledge 
of that language is fairly limited.

In any case, I appreciate you sending me the sample code. I know you probably 
wrote it up quickly, but I found a few items that went against my "style", 
and a couple of items I felt were lacking (i.e. Assumption of driver file 
path, no checking for the full size of the DEVMODE structure, etc.). So, I've 
made a few changes and am sharing the modified code in return for the 
assistance.

Thanks again!

Anthony Watson
Mountain Software
anthony@mountain-software.com
www.mountain-software.com



'** Calling printer setup dialog through ExtDeviceMode library function
'
'** Jun 21, 1998 - Original code by Sjouke Hamstra
'                  shamstra@gelrevision.nl
'
'** Jun 22, 1998 - Modified code by Anthony Watson
'                  anthony@mountain-software.com

DEFINT "a-z"       '** Note how I prefer 32-bit variables? Ha. Ha.

OPENW #1
window_handle=WIN(1)

'** Get information on current printer
a$=SPACE$(256)
a=GetProfileString("windows","device","",V:a$,256)
a$=LEFT$(a$,a)
a=INSTR(a$,",")
device$=LEFT$(a$,a-1)+CHR$(0)
b=INSTR(a$,",",a+1)
driver$=MID$(a$,a+1,b-a-1)
a=INSTR(a$,",",b+1)
IF a=0
  port$=MID$(a$,b+1,LEN(a$)-b)+CHR$(0)
ELSE
  port$=MID$(a$,b+1,a-b-1)+CHR$(0)
ENDIF

'** Get system directory/build full filename to printer driver
a$=SPACE$(128)
a=GetSystemDirectory(V:a$,128)
driver$=LEFT$(a$,a)+"\"+driver$+".DRV"+CHR$(0)

driver=CARD(LoadLibrary(V:driver$))               '** Load printer driver
IF driver>32
  address=GetProcAddress(driver,"ExtDeviceMode")
  call_back=MakeProcInstance(address,_INSTANCE)   '** Callback setup
  '** Get Devmode size
  a=P:(call_back)(window_handle,driver,L:0,L:V:device$,L:V:port$,L:0,L:0,0)
  devmode=MALLOC(a)                               '** Create devmode buffer
  '** Call the printer setup dialog
a=P:(call_back)(window_handle,driver,L:devmode,L:V:device$,L:V:port$,L:0,L:0,4)
  ~MFREE(devmode)
  ~FreeLibrary(driver)

ELSE
  PRINT "No Driver Found"
  PRINT "Driver Handle: "; driver
  PAUSE 25

ENDIF
CLOSEW #1


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 23 17:10:30 1998
Return-Path: <nembo@elettroneb.it>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoB0f-00N8f2C>; Mon, 22 Jun 1998 20:08:05 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA01514;
	Mon, 22 Jun 1998 20:12:49 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F306FA5C; Sun, 21 Jun 1998 19:05:09 +0000 (???)
From: "Nebuloni Davide" <nembo@elettroneb.it>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358D5965.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Jun 1998 20:05:22 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Long File Name
X-UIDL: c6d5a24ca9408f957a2353b130db1373

* List: gfabasic@linux.net.eu.org

How can I handle long-name in file funcions? (_lopen, _lcreate)
Do I load new dll or use a new interrupt?

Thank's

Ciao, Nembo...



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 23 17:10:36 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoCN6-00N8W6C>; Mon, 22 Jun 1998 21:35:20 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA02266;
	Mon, 22 Jun 1998 21:40:21 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F306D587; Sun, 21 Jun 1998 20:32:12 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358D6DD0.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 22 Jun 1998 12:29:51 -0700
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] GFAEXT2E
X-UIDL: 289b64ee71b973d665b28f29dac864e1

This is a multi-part message in MIME format.

------=_NextPart_000_0001_01BD9DD9.74578A00
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

From ???@??? Tue Jun 23 17:10:45 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoIba-00N2rDC>; Tue, 23 Jun 1998 04:14:42 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id EAA04591;
	Tue, 23 Jun 1998 04:20:07 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3037D02; Mon, 22 Jun 1998 03:12:03 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358DCB83.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Jun 1998 22:11:38 -0400
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Printer
X-UIDL: 4a524747e3fe52207d8f4d798ad8959c

* List: gfabasic@linux.net.eu.org

Hi All:

I have a problem; I know I can use:  DLG PRINT 1,PD_PRINTSETUP,dc& and then
use the ESCAPE sequence to get all kinds of info about a printer. Also, I
can use the 'GetProfileString' to get the NAME of the DEFAULT Printer but
how do I get the NAME of a second printer -- I've can get everything about
this second printer except the NAME.

                                               -->Bev<--




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 23 17:10:46 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoJiB-00N6fQC>; Tue, 23 Jun 1998 05:25:35 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id FAA04816;
	Tue, 23 Jun 1998 05:31:06 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F305EDF6; Mon, 22 Jun 1998 04:23:06 +0000 (???)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358DDC2A.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Authentication-Warning: pacifier.com: awatson owned process doing -bs
Date: Mon, 22 Jun 1998 20:24:42 -0700 (PDT)
In-Reply-To: <358DCB83.BeroList-2.5.7@linux.net.eu.org>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] Printer
X-UIDL: 971970491060da5b854851832edcf7c7

* List: gfabasic@linux.net.eu.org

Bev,

> I have a problem; I know I can use:  DLG PRINT 1,PD_PRINTSETUP,dc& and then
> use the ESCAPE sequence to get all kinds of info about a printer. Also, I
> can use the 'GetProfileString' to get the NAME of the DEFAULT Printer but
> how do I get the NAME of a second printer

I'm not sure if there is a "proper" way to obtain this information, but
the various printers are listed in the DEVICES section of WIN.INI. You
should be able to use GetProfileString and look for "Devices" to find the
info you need? I haven't tried it yet to be sure.

Hope this helps.

Anthony Watson
Mountain Software
anthony@mountain-software.com
www.mountain-software.com



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 23 17:10:51 1998
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoO4f-00N8f2C>; Tue, 23 Jun 1998 10:05:05 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA14303;
	Tue, 23 Jun 1998 10:10:33 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30A635C; Mon, 22 Jun 1998 09:01:48 +0000 (???)
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358E1D7C.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Jun 1998 15:16:29 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Re: GFA for Windows
X-UIDL: 6b6edaa4b964711f93ede8d6e7c324bd

* List: gfabasic@linux.net.eu.org

Thanks for your answer Dieter but I have been left with a couple of
questions.

>But your problem will be comming up at another place, known, but not
possible to fix it.<

The problem is surely fixed by running the program within a run only
interpreter - isn't that so?

>If you load or start programs with CHAIN the old program will be still
leave in the memory.<

Not only that but the chained program, when using exes made with the
make-exec option, is not the new exe but the source code running inside the
interpreter - the chain instruction loads the interpreter and then the
source code into that and runs the program. Of course if the interpreter and
source code files are not there, you get a load error. I need to know if all
that is true of exes made with the compiler. It was certainly true of the
Amiga.

>It is a problem of MS-DOS<

Surely it was also a problem with AMIGADOS?

>The only way for you will be to work with a .BAT file, calling one program
after another or to restart each part which will be nesessary.<

One program calls another because of complex conditions in the running
program. I can't see at all how this could be done with a batch file.

>Or use the GFA-BASIC for MS-DOS Compiler to create stand alone .EXE files.<

This could work but surely the programs would still be left in memory as
with replacing the chain instruction with the exec instruction?

>To take the gfa00run.dl_ and renae it is not possible.<

I've found that GFARUN10.DLL, created from the files supplied with the
interpreter, is not just a library file used with semi-compiled exes but a
full run-only module. For example, under Windows 95, this DOS batch file
will work:

LOAD GFARUN10.DLL PROGRAM1.GFW

where program1.gfw is the source code of the first program.

Unfortunately Windows 3.1 reports that the gfarun10.dll will not run in DOS
even when the batch file is run from Windows via File Manager. It works fine
in Windows 95 from Windows Explorer or a desktop shortcut.

The answer, exactly the same answer as for the Amiga, seems to be to create
a one line program LOAD.EXE - the line is CHAIN PROGRAM1.GFW - using the
make exec option. This will work in both Win95 and Win 3.1. Clicking on the
load.exe icon will load that exe and the chain instruction in that loads
gfarun10.dll and program1.gfw into that and runs the program.

>From there on the programs will chain back and forth quite happily - and as
far as I can see this is a definitive chaining ie. the chained program
REPLACING the current program.

>But why you don't try to use the version for Windows again. The trial
version will offer you till 1000 lines of possible sourcecode, the normal
version till 65000 lines and your problems will be gone.<

You've lost me completely with that statement Dieter. I am using the
gfabasic for Windows. The problem will not go away with the latest version
if I read you correctly.

>By testing the actual version you will see, that now it will be a very
stabil version to work with.<

I paid full price for the version I have Dieter, and it's twice been
replaced with so-called debugged programs since but it's far from being
debugged. I believe GFA should provide me with a debugged program and not
ask me to pay again for the removal of bugs. That's the way I run my
software business - a customer gets a bug free program for his money as far
as I can do that. If he's supplied with a bugged program then he gets a
replacement free of charge. That's particularly true if he's a longstanding
customer that has bought just about every program we've produced over the
last 10 years!

>INPUT: possible that this version has got an error in, but what's happend
with the trial version. Do you have try it there? Or do you use it with #
for a file, or correct with a$ or a?<

The input statement is ok it's the keyget, keytest and inkey$ statements
that are unusable.

Using gfarun10.dll with gfw files made with PSAVE the whole system seems to
work. Speed isn't a problem. I'm concerned about the load.exe program that
presumably stays in memory when I exit the program system. It's not exactly
a memory guzzler, particularly by Win95 standards <g>, but I'm concerned
that under some circumstances it could interfere with the running of other
programs if left there.

Mac Howard




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 23 17:10:53 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoOnC-00N7BfC>; Tue, 23 Jun 1998 10:51:06 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA14550;
	Tue, 23 Jun 1998 10:56:39 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F2E22E30; Mon, 22 Jun 1998 09:48:23 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358E2867.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AB4A1A1801C4; Tue, 23 Jun 1998 10:46:05 +00d00
Date: Tue, 23 Jun 1998 10:40:09 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] ExtDeviceMode
X-UIDL: 34f55627d23a80f4dfc77509306dd3bd

* List: gfabasic@linux.net.eu.org

>> I know you probably
wrote it up quickly, but I found a few items that went against my "style",
and a couple of items I felt were lacking (i.e. Assumption of driver file
path, no checking for the full size of the DEVMODE structure, etc.). So, I've
made a few changes and am sharing the modified code in return for the
assistance.

Yep, I only wanted to show how to correctly call the callback function.
Note that the variable type is important when using P:, GFA passes each
variable as a word value on the stack unless you specify L:.

Everyone has its own style of programming, and I didn't do any checking
because I knew my printer was available ;).

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 23 17:10:54 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoOna-00N8f2C>; Tue, 23 Jun 1998 10:51:30 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA14552;
	Tue, 23 Jun 1998 10:56:39 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703B3A65A; Mon, 22 Jun 1998 09:48:22 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358E2866.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AB4E1A1801C4; Tue, 23 Jun 1998 10:46:06 +00d00
Date: Tue, 23 Jun 1998 10:49:37 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] Printer
X-UIDL: 2f4c22d7083e5dd7196762d9c94e3726

* List: gfabasic@linux.net.eu.org

>> You
should be able to use GetProfileString and look for "Devices" to find the
info you need? I haven't tried it yet to be sure.

That is correct.
~GetProfileString("devices",0,V:buf$,Len(buf$))

The contents of buf$ looks like this:

PrinterName1\0PrinterName2\0\0

Each name is zero terminated and an additional null indicates the end of all
names.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jun 23 17:10:55 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoP7D-00N9odC>; Tue, 23 Jun 1998 11:11:47 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA14755;
	Tue, 23 Jun 1998 11:17:03 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30A6EDC; Mon, 22 Jun 1998 10:09:04 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358E2D40.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A02D20D6027C; Tue, 23 Jun 1998 11:06:53 +00d00
Date: Tue, 23 Jun 1998 10:55:25 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] Long File Name
X-UIDL: 1bbb863fc9eb8d6d64d34a3b91143f61

* List: gfabasic@linux.net.eu.org

>>How can I handle long-name in file funcions? (_lopen, _lcreate)

You can't, the 16bit -OS does not have room for long filenames in its internal
buffers.

>> Do I load new dll or use a new interrupt?
Yes, you can use new interrupts and pass long filenames to these new 32-OS
supported I/O functions. You need the SDK to find out about these functions.
You could also use 32-bit functions directly using WOW. I created a demo
program called GFA32API.DLL that show you how to implement these functions. It
should be on the GFA website. It may be renamed to GFAWOW32, I don't know
exactly.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jun 24 10:50:21 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yoaD1-00N7QFC>; Tue, 23 Jun 1998 23:02:31 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA20314;
	Tue, 23 Jun 1998 23:06:14 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3010F16; Mon, 22 Jun 1998 21:56:22 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358ED306.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Jun 1998 16:58:07 -0400
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Printer
X-UIDL: f6fa5f9aac27e7bc1f730403a463127e

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Wed Jun 24 10:50:28 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yojrx-00N7QFC>; Wed, 24 Jun 1998 09:21:25 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA31043;
	Wed, 24 Jun 1998 09:27:18 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F302CFC0; Tue, 23 Jun 1998 08:18:21 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <358F64CD.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A7B1955020A; Wed, 24 Jun 1998 09:16:01 +00d00
Date: Wed, 24 Jun 1998 08:58:29 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] Printer
X-UIDL: d9005d960eb0957a575d6bb354a3b724

* List: gfabasic@linux.net.eu.org

>>  BUT, I still have the problem of matching this up with what I get back =
from DLG PRINT 1,PD_PRINTSETUP,dc&. Any suggestions would be =
appreciated.

The Print Setup dialog box gives you a choice from different printers. Do I
understand correctly that you want the name of the device after the dialog box
closes? The DLG PRINT command returns all DEVNAMES and DEVMODE information via
pseudo registers _DI and _SI. I included an example in my book how to obtain
these structures.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jun 25 00:14:19 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yowuO-00N9pOC>; Wed, 24 Jun 1998 23:16:48 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA04116;
	Wed, 24 Jun 1998 23:23:19 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F305AF82; Tue, 23 Jun 1998 22:12:43 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3590285E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Jun 1998 14:10:08 -0700
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Cursor
X-UIDL: 59963e109c3a8eabab5be246aa42744f

This is a multi-part message in MIME format.

------=_NextPart_000_0001_01BD9F79.CD907EA0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7b  

From ???@??? Sat Jun 27 00:34:43 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yp6sh-00N9pAC>; Thu, 25 Jun 1998 09:55:43 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA15941;
	Thu, 25 Jun 1998 10:02:23 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3013C2F; Wed, 24 Jun 1998 08:52:52 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3590BE64.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A1385FCB020A; Thu, 25 Jun 1998 09:50:16 +03d00
Date: Thu, 25 Jun 1998 09:26:48 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] Cursor
X-UIDL: 2d502ff02e39a9118b95ac67c9b686fd

* List: gfabasic@linux.net.eu.org

Hi Dale,

It's not possible; the cursor keeps flickering. See my book (chapter Dialogs)
for an explanation.

But...
Anything that seems to be impossible needs further exploration, so sometime in
1996 I created this function, which is part of some obscure DLL of mine:


PROCEDURE GetMouse(hcur%,lpDefMouse%)                    '$EXPORT GETMOUSE
  $EXPORT GETMOUSE

  ' Converts a hCur memory block to a GFA MOUSEDEF structure or loads a CUR
file
  ' Use:  ^GETMOUSE(MAKELONG(0,hCur),V:tmp$)
  '       ^GETMOUSE(filename$,V:tmp$)

  ' Input:
  '  hCur%       Specifies the GDI handle to a cursor object (HIWORD=0)
  '              or a cursor filename
  '  lpdefMouse% Specifies a pointer to a GFA MOUSEDEF structure
  ' Return:
  '  The MOUSEDEF structure is filled with the cursor info

  '  TYPE MOUSEDEF:
  '  - WORD xHotspot
  '  - WORD yHotspot
  '  - CHAR(128) AndMask$  ' 4 bytes per scanline
  '  - CHAR(128) XorMask$  ' 4 bytes per scanline
  '  ENDTYPE

  ' This AndMask$ and XorMask$ contain 32 scanlines of 4 bytes each
  ' However, the structure requires the bytes of a scanline to be swapped.

  TRY
    LOCAL m$, i&, lpGMem%
    IF HIWORD(hcur%) = 0
      hCur& = WORD(hcur%)                    ' cast to word
      lpGMem%  = GlobalLock(hCur&)           ' Retrieve memory address of hCur
      m$ = PEEK$(lpGMem%,4)                 ' Copy hotspot coordinates
      FOR i& = 0 TO 63                       ' Swap bytes of each scan line
        m$ = m$ + MIRROR$(PEEK$(lpGMem% + 12 + i& * 4,4))  ' starts at offset
12
      NEXT i&
    ELSE
      f$ = CHAR{hcur%}
      m$ = STRING$(326,0)   ' default length
      BLOAD f$,V:m$
      m$ = LEFT$(m$,4) + MIRROR$(MID$(m$,71))
    ENDIF

    POKE$ lpDefMouse%,m$
    RETVAL 1

  CATCH
  RETVAL 0

RETURN

And as always, you may add it to your GFAWIN.HLP ;)

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 00:35:03 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ypDe5-00N9pHC>; Thu, 25 Jun 1998 17:09:05 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA20068;
	Thu, 25 Jun 1998 17:16:00 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30F04CC; Wed, 24 Jun 1998 16:06:38 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3591240F.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Jun 1998 08:04:03 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Importance: Normal
In-Reply-To: <3590BE64.BeroList-2.5.7@linux.net.eu.org>
Subject: RE: [GFA] Cursor
X-UIDL: 8b02bd20ec40a06fba8ef6f3ec665369

* List: gfabasic@linux.net.eu.org

Hi Sjouke,
I found the answer in your book and it seems to work well. I will check the
flickering but I had not noticed it as yet. Will check out the code you
sent.
Thanks again,
Dale Bryant


> -----Original Message-----
> From: Sjouke Hamstra [mailto:shamstra@gelrevision.nl]
> Sent: Thursday, June 25, 1998 12:27 AM
> To: gfabasic@linux.net.eu.org
> Subject: Re: [GFA] Cursor
>
>
> * List: gfabasic@linux.net.eu.org
>
> Hi Dale,
>
> It's not possible; the cursor keeps flickering. See my book
> (chapter Dialogs)
> for an explanation.
>
> But...
> Anything that seems to be impossible needs further exploration,
> so sometime in
> 1996 I created this function, which is part of some obscure DLL of mine:
>
>
> PROCEDURE GetMouse(hcur%,lpDefMouse%)                    '$EXPORT GETMOUSE
>   $EXPORT GETMOUSE
>
>   ' Converts a hCur memory block to a GFA MOUSEDEF structure or
> loads a CUR
> file
>   ' Use:  ^GETMOUSE(MAKELONG(0,hCur),V:tmp$)
>   '       ^GETMOUSE(filename$,V:tmp$)
>
>   ' Input:
>   '  hCur%       Specifies the GDI handle to a cursor object (HIWORD=0)
>   '              or a cursor filename
>   '  lpdefMouse% Specifies a pointer to a GFA MOUSEDEF structure
>   ' Return:
>   '  The MOUSEDEF structure is filled with the cursor info
>
>   '  TYPE MOUSEDEF:
>   '  - WORD xHotspot
>   '  - WORD yHotspot
>   '  - CHAR(128) AndMask$  ' 4 bytes per scanline
>   '  - CHAR(128) XorMask$  ' 4 bytes per scanline
>   '  ENDTYPE
>
>   ' This AndMask$ and XorMask$ contain 32 scanlines of 4 bytes each
>   ' However, the structure requires the bytes of a scanline to be swapped.
>
>   TRY
>     LOCAL m$, i&, lpGMem%
>     IF HIWORD(hcur%) = 0
>       hCur& = WORD(hcur%)                    ' cast to word
>       lpGMem%  = GlobalLock(hCur&)           ' Retrieve memory
> address of hCur
>       m$ = PEEK$(lpGMem%,4)                 ' Copy hotspot coordinates
>       FOR i& = 0 TO 63                       ' Swap bytes of each
> scan line
>         m$ = m$ + MIRROR$(PEEK$(lpGMem% + 12 + i& * 4,4))  '
> starts at offset
> 12
>       NEXT i&
>     ELSE
>       f$ = CHAR{hcur%}
>       m$ = STRING$(326,0)   ' default length
>       BLOAD f$,V:m$
>       m$ = LEFT$(m$,4) + MIRROR$(MID$(m$,71))
>     ENDIF
>
>     POKE$ lpDefMouse%,m$
>     RETVAL 1
>
>   CATCH
>   RETVAL 0
>
> RETURN
>
> And as always, you may add it to your GFAWIN.HLP ;)
>
> Regards,
> Sjouke Hamstra
> GFA-related homepage: http://www.gfa.net/home/shamstra
>
>
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
>



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 00:35:05 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ypFYz-00NAqjC>; Thu, 25 Jun 1998 19:11:57 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA21510;
	Thu, 25 Jun 1998 19:18:55 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3043778; Wed, 24 Jun 1998 18:09:36 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <359140E0.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Jun 1998 13:10:23 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Cursor
X-UIDL: 808a6d694f27f90e352083170f3c61e5

* List: gfabasic@linux.net.eu.org

Dale,

>Everything worlks fine except the Cursor.  Does anyone have an example for
displaying a Cursor from a .RES file. <

If you use the 'C' style to create the main window you can use
SetClassWord(); it works without flickering.

  hCur& = LoadCursor(hInst&, "mycursor")
  ~SetClassWord(hWnd&, GCW_HCURSOR, hCur&)

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 00:35:06 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ypJpb-00NBWlC>; Thu, 25 Jun 1998 23:45:23 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA23816;
	Thu, 25 Jun 1998 23:52:31 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3069E85; Wed, 24 Jun 1998 22:41:20 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35918093.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc01.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980625214256.DRXP9184@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Thu, 25 Jun 1998 21:42:56 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Jun 1998 21:42:56 +0000
Subject: [GFA] req info, registry   2506zz1-
X-UIDL: 1997c6fccea5c999e006e9bf16f49b46

* List: gfabasic@linux.net.eu.org

25/06/98 4:38:54 PM   req info, registry   2506zz1-

Access to the Win95 registry is via advapi32.dll.

Would like to know the 16-bit counterpart (Win 3.1).

Am acquireing VB calls to advapi32.dll - would appreciate finding 
same for the 16-bit.

Would also like to be able to display system.dat & user.dat without 
resorting to regedit.exe if possible.

All assistance greatly appreciated.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 00:35:09 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ypN7n-00N8AwC>; Fri, 26 Jun 1998 03:16:23 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA24786;
	Fri, 26 Jun 1998 03:23:37 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F308FFBE; Thu, 25 Jun 1998 02:14:11 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3591B273.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Jun 1998 18:11:19 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <359140E0.BeroList-2.5.7@linux.net.eu.org>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: RE: [GFA] Cursor
X-UIDL: 057b63d508e7e172459bad07ddc5945b

* List: gfabasic@linux.net.eu.org

Thanks John.
I did what you suggested and it works great!
dale


> -----Original Message-----
> From: John Findlay [mailto:Jayef@compuserve.com]
> Sent: Thursday, June 25, 1998 10:10 AM
> To: gfabasic@linux.net.eu.org
> Subject: [GFA] Cursor
> 
> 
> * List: gfabasic@linux.net.eu.org
> 
> Dale,
> 
> >Everything worlks fine except the Cursor.  Does anyone have an 
> example for
> displaying a Cursor from a .RES file. <
> 
> If you use the 'C' style to create the main window you can use
> SetClassWord(); it works without flickering.
> 
>   hCur& = LoadCursor(hInst&, "mycursor")
>   ~SetClassWord(hWnd&, GCW_HCURSOR, hCur&)
> 
> Regards,
> 
> John
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 00:35:17 1998
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ypdHA-00N8BhC>; Fri, 26 Jun 1998 20:31:08 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA05206;
	Fri, 26 Jun 1998 20:34:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30DDBC2; Thu, 25 Jun 1998 19:26:50 +0000 (???)
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3592A47B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
X-BlackMail: 192.168.1.201, default, michael@bonbit.org, 192.168.1.201
X-Authenticated-Timestamp: 18:12:53(GMT) on June 26, 1998
X-Sender: michael@bonbit.org
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Fri, 26 Jun 1998 20:23:52 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] Many dialogs -> out of memory in Win 3.1
X-UIDL: ee888fa96658ab6a1d85af833cee6cd4

* List: gfabasic@linux.net.eu.org

Hi there!

For some months I was developing in Windows 95. Now I wanted to test my
program in Windows 3.1 and the EXE file didn't even start. When startiing
the program in the interpreter I got an Out Of Memory error in the part
where the dialogs are declared using the DIALOG statement.

Is there a limit of dialogs or elements? What am I doing wrong?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 21:44:19 1998
Return-Path: <gaf03642@nifty.ne.jp>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ypqX8-00N7BGC>; Sat, 27 Jun 1998 10:40:30 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA17627;
	Sat, 27 Jun 1998 10:44:23 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F3012E1D; Fri, 26 Jun 1998 09:38:07 +0000 (???)
From: Takashi Toyoda <gaf03642@nifty.ne.jp>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35936BFF.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Jun 1998 17:38:30 +0900
In-Reply-To: <19980626.4LGLXPE!@nifty.ne.jp>
MIME-Version: 1.0
X-Mailer: AL-Mail32 Version 1.01
Content-Type: text/plain; charset=us-ascii
Subject: Re: [GFA] Cursor
X-UIDL: ba9534644cd297c08a07a58dd905675d

* List: gfabasic@linux.net.eu.org

I appreciate this information of non-flickering cursor. I could permanently fix the problem
in my card game.
However, I would like to point out the solution is not perfect.
As far as I know, when the cursor has been locally modified by SetCursor, this solution won't take effect
until the Windows receives a WM_MOUSEMOVE. So, if the mouse is stationed, the old cursor remains.
My solution is to add a ~SetCursor sentence if you are not absolutely sure the mouse is always moving. 

>I did what you suggested and it works great!
>>   hCur& = LoadCursor(hInst&, "mycursor")
>>   ~SetClassWord(hWnd&, GCW_HCURSOR, hCur&)
     ~SetCursor(hCur&)  ' <----- like this

Setcursor changes the cursor shape instantly, but whenever Windows feels necessary, it restores
the shape registered in the Windows class, like with WM_MOUSEMOVE or some screen update.
(I learned this from the Chrales Petzold book, "Programming Windows")
And, I have not been able to realize the solution this time for myself.
I used to work around this by combination of temporary Setcapture and regular curosr refresh.
Naturally, you could see some flickering some times in my lengthy demo.
Regards
 

---------------------------------------
YouLong <gaf03642@nifty.ne.jp>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 21:44:21 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yprDw-00N7BGC>; Sat, 27 Jun 1998 11:24:44 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA17904;
	Sat, 27 Jun 1998 11:28:42 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F30B26B9; Fri, 26 Jun 1998 10:22:42 +0000 (???)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35937677.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id A9378F000218; Sat, 27 Jun 1998 11:19:51 +02d00
Date: Sat, 27 Jun 1998 11:02:35 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3026.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3026.0
Subject: Re: [GFA] Cursor
X-UIDL: 6bad426602067c79ff143344ff7db054

* List: gfabasic@linux.net.eu.org

>> As far as I know, when the cursor has been locally modified by SetCursor,
this solution won't take effect
until the Windows receives a WM_MOUSEMOVE. So, if the mouse is stationed, the
old cursor remains.
My solution is to add a ~SetCursor sentence if you are not absolutely sure the
mouse is always moving.

You are correct in your observations. However SetCursor doesn't do the trick
as well as you noticed. The 'problem' lies in the way GFA handles the
WM_SETCURSOR message inside the window procedure of the GFA windows. GFA
restores (or better calls SetCursor) the mouse pointer set with DEFMOUSE.
Therefore you could do two things;

1. Subclass the GFA window and process WM_SETCURSOR yourself.
2. Use my routine to convert a cursor resource to a DEFMOUSE pointer.


Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 21:44:22 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yprGh-00N7BGC>; Sat, 27 Jun 1998 11:27:35 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id LAA18002;
	Sat, 27 Jun 1998 11:31:33 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F304B13F; Fri, 26 Jun 1998 10:25:48 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3593772C.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Jun 1998 05:26:53 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Cursor
X-UIDL: 45622a1ced4cadd984d8ea06638d44a6

* List: gfabasic@linux.net.eu.org

>  ~SetCursor(hCur&)  ' <----- like this <

No, not like that. If you open the window using the 'C' style, then you do
not need to use ~SetCursor() and you don't get flickering after you have
set a new cursor in the window class. 

It seems that the problem (if I can call it that) is not a Windows problem
but a GFA one. The GFA 'machine' obviously interferes with the mouse stuff
if you use a GFA window. I expect that it has something to do with the way
GFA deals with window classes and the DEFMOUSE command. 

Is GFA replacing the mouse image even though it's been changed in the
window class? I think so. Perhaps Sjouke could explain why!!! 



> However, I would like to point out the solution is not perfect. <

I don't know about perfect but it works fine. :-)


Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jun 27 21:44:23 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ypwSN-00N8BVC>; Sat, 27 Jun 1998 16:59:59 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA19842;
	Sat, 27 Jun 1998 17:04:02 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56F308D081; Fri, 26 Jun 1998 15:57:51 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3593C4FF.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Jun 1998 07:55:01 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
In-Reply-To: <3593772C.BeroList-2.5.7@linux.net.eu.org>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Importance: Normal
Subject: RE: [GFA] Cursor
X-UIDL: 2efccf992a95a172161c8007b29916b1

* List: gfabasic@linux.net.eu.org

John, you are correct about it working fine. I made a RES file with 10
cursors in it and using your method I can display them all. Thanks for the
tip. I could not SetCursor to work with a C type window.

Dale


> -----Original Message-----
> From: John Findlay [mailto:Jayef@compuserve.com]
> Sent: Saturday, June 27, 1998 2:27 AM
> To: gfabasic@linux.net.eu.org
> Subject: Re: [GFA] Cursor
>
>
> * List: gfabasic@linux.net.eu.org
>
> >  ~SetCursor(hCur&)  ' <----- like this <
>
> No, not like that. If you open the window using the 'C' style, then you do
> not need to use ~SetCursor() and you don't get flickering after you have
> set a new cursor in the window class.
>
> It seems that the problem (if I can call it that) is not a Windows problem
> but a GFA one. The GFA 'machine' obviously interferes with the mouse stuff
> if you use a GFA window. I expect that it has something to do with the way
> GFA deals with window classes and the DEFMOUSE command.
>
> Is GFA replacing the mouse image even though it's been changed in the
> window class? I think so. Perhaps Sjouke could explain why!!!
>
>
>
> > However, I would like to point out the solution is not perfect. <
>
> I don't know about perfect but it works fine. :-)
>
>
> Regards,
>
> John
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
>



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jun 29 20:35:14 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yqOLk-00N9omC>; Sun, 28 Jun 1998 22:47:00 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA04383;
	Sun, 28 Jun 1998 22:51:43 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703CEB8C4; Sat, 27 Jun 1998 21:43:06 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3595676B.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 28 Jun 1998 13:40:03 -0700
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Curious
X-UIDL: f444c57ff33b5c166f79a244aa3a1e15

This is a multi-part message in MIME format.

------=_NextPart_000_0001_01BDA29A.428DE260
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

From ???@??? Wed Jul 01 00:03:52 1998
Return-Path: <linux@windows95.sucks.eu.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yqkwa-00N8W9C>; Mon, 29 Jun 1998 22:54:32 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA05990;
	Mon, 29 Jun 1998 22:58:09 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C15B1F; Sun, 28 Jun 1998 21:49:45 +0000 (???)
From: Linux mailing list user <linux@windows95.sucks.eu.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3596BA79.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 29 Jun 1998 20:29:21 +0200 (CEST)
X-Sender: linux@k6.bero
In-Reply-To: <3595676B.BeroList-2.5.7@linux.net.eu.org>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] Curious
X-UIDL: f536d3cf9b9d460f6730904365dec40d

* List: gfabasic@linux.net.eu.org

On Sun, 28 Jun 1998, Dale Bryant wrote:

> I am curious why these links are different.  I had quite a time getting
> both links to work from my home page. Why is one
>
> ftp://bero-online.ml.org/pub/gfabasic
>
> and one ftp://ftp.bero-online.ml.org/pub

Actually, they are the same.
The part between the ftp:// and the next / are the name of the machine
running the server.

Both bero-online.ml.org and ftp.bero-online.ml.org currently resolve into
the IP address 198.22.51.242, so it's just a matter of taste what you use.
(You could also replace it with www.startrek.eu.org or even
microsoft.sucks.eu.org - the ftp protocol only cares about the IP this
resolves into.)

Please change both links to ftp://ftp.bero-online.ml.org/... because I
might be moving the ftp server to a different machine, in which case the
other link would stop working.

LLaP
bero




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jul 01 00:03:55 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yqnp4-00NBWTC>; Tue, 30 Jun 1998 01:58:58 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA07140;
	Tue, 30 Jun 1998 02:02:56 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C41DE8; Mon, 29 Jun 1998 00:56:57 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3596E659.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Cc: "Bev Brown" <bbrown1@ciaccess.com>
Date: Mon, 29 Jun 1998 16:53:14 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] New Web Page Address
X-UIDL: 5fdb2e0458118eed34e59421e1fc2cff

* List: gfabasic@linux.net.eu.org

To All Maillist members,
The GFAWHELP file will henceforth be found at the address below.


http://www.gfa.net/adbryant/index.htm


In approximately 48 hours the following domains will also be accessible.

http://gfa.net/adbryant

or

http://gfawhelp.gfa.net

Email addresses are as follows.
adbryant@msn.com
support.gfawhelp@gfa.net
info.gfawhelp@gfa.net
sales.gfawhelp@gfa.net  (as all files for downloading are free, not
applicable)
webmaster.gfawhelp@gfa.net

Note: All email is forwarded to me at the msn address.


The GFAWHELP site will have much more room for files to download . If you
have any GFW or GFA files that are freeware I will be pleased to post them.
Please remember, as this is a site to help in the learning of GFA that only
files with the GFW or GFA source code will be posted.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jul 01 00:03:56 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yqo4r-00NAqWC>; Tue, 30 Jun 1998 02:15:17 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA07291;
	Tue, 30 Jun 1998 02:19:14 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C06425; Mon, 29 Jun 1998 01:13:38 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3596EA42.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 29 Jun 1998 17:10:30 -0700
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Biographies
X-UIDL: 1f9924ec1b78209322a243c1a6a501a8

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Wed Jul 01 12:21:18 1998
Return-Path: <mueller-dlg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yrJi9-00NBmSC>; Wed, 1 Jul 1998 12:01:57 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA03015;
	Wed, 1 Jul 1998 12:06:29 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C32E93; Tue, 30 Jun 1998 10:58:15 +0000 (???)
From: mueller-dlg@t-online.de (Christoph Mueller)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <3598C4C7.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 01 Jul 1998 11:26:48 +0200
X-Mailer: Mozilla 3.04 (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 090719024-0001@t-online.de
Subject: [GFA] (no subject)
X-UIDL: 259e9cc7afd0cb5db01e2f322e23c0db

* List: gfabasic@linux.net.eu.org

unsubscribe

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jul 02 18:55:29 1998
Return-Path: <benny@zeb.be>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yrieB-00NC24C>; Thu, 2 Jul 1998 14:39:31 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id OAA21306;
	Thu, 2 Jul 1998 14:44:30 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C48704; Wed, 01 Jul 1998 13:35:58 +0000 (???)
From: Benny Sels <benny@zeb.be>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <359A3B3E.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.04) id AEDFF78600B6; Thu, 02 Jul 1998 14:36:47 +03d00
X-Sender: benny@mail.zeb.be
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Thu, 02 Jul 1998 14:36:47 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Minimize windows
X-UIDL: bb8d79db48e5a2933ea16cba286d00ce

* List: gfabasic@linux.net.eu.org

How can I minimize a windows from another program
I test if the window is open
hw& = FindWindow(0,"Microsoft Access")
Now i like to minimize the windowd in hw&

Benny Sels




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jul 06 01:35:54 1998
Return-Path: <lrn@zeppo.geosurv.gov.nf.ca>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yro4A-00N6fdC>; Thu, 2 Jul 1998 20:26:42 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA23928;
	Thu, 2 Jul 1998 20:32:03 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703CB928F; Wed, 01 Jul 1998 19:24:23 +0000 (???)
From: Larry Nolan <lrn@zeppo.geosurv.gov.nf.ca>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <359A8CE8.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 02 Jul 1998 15:53:30 -0230
Organization: Geological Survey of Newfoundland
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <358D6DD0.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: Win 95 Issues
X-UIDL: 0327cdaebce261c25fe75e87586c200a

* List: gfabasic@linux.net.eu.org

hi,

  Does anyone have a English version of code to get a directory listing
under windows 95 with long file names?

also is there any way to modify a GFA created .dll so it can be called
with a 32 bit program?

thanks

--
Larry Nolan
P.O. Box 8700
St. John's, Newfoundland
Canada, A1B 4J6

voice (709) 729-2168
email lrn@zeppo.geosurv.gov.nf.ca

                "My employer has no opinion    -   It's a politician "



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jul 06 01:36:07 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ysB0H-00NAr0C>; Fri, 3 Jul 1998 20:56:13 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA15794;
	Fri, 3 Jul 1998 21:00:32 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C728E3; Thu, 02 Jul 1998 19:53:36 +0000 (???)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <359BE540.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 02 Jul 1998 19:53:31 +0000 (???)
Subject: Re: [GFA] Re: Win 95 Issues
X-UIDL: 729c027113b7ec02d916c8a5c15ee304

* List: gfabasic@linux.net.eu.org

Hi Larry,

>  Does anyone have a English version of code to get a directory listing
>under windows 95 with long file names?
have a look at
ftp.bero-online.ml.org/pub/gfabasic/windows/listings/win95/wow32-interface/e
nglish.
There is a complete description how to acces the Win32 API using 16 Bit
GFA-BASIC. It is written
in English language, and the most common functions are already impletented,
ready to use in a DLL.
You should be able to modify it yourself. If you need further information
about the Win32 API
interface, have a look at http://www.microsoft.com/msdn. It is the Microsoft
Developer Network
Online, freely available for private users all over the world. After a short
registration process,
you can search the whole Win32 documentation.

>also is there any way to modify a GFA created .dll so it can be called
>with a 32 bit program?
No, that is impossible. You can only use 32 Bit DLLs in 16 Bit programs, but
not vice versa.

Greetings

GFA Software
Support


+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 07 00:44:32 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ytGI1-00N8BdC>; Mon, 6 Jul 1998 20:47:01 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA29851;
	Mon, 6 Jul 1998 20:52:26 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703CEAB15; Sun, 05 Jul 1998 19:41:23 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <359FD6E4.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 6 Jul 1998 11:39:15 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] gfawhelp
X-UIDL: 9c8000e4da5b363688f153859ceae4b1

* List: gfabasic@linux.net.eu.org

GFAWHELP now has it's own domain name. See Below.

If you have any GFA demos I could make available for download please attach
to a message to adbryant@msn.com/

DO NOT SEND TO MAIL LIST!!

http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 07 19:56:19 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ytZaR-00NC1MC>; Tue, 7 Jul 1998 17:23:19 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA00473;
	Tue, 7 Jul 1998 17:27:06 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C866E4; Mon, 06 Jul 1998 16:16:44 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35A0F871.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 7 Jul 1998 08:14:31 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Importance: Normal
Subject: [GFA] curses
X-UIDL: 38e0a4b2c92d69d9119e32f9ba1b1eba

* List: gfabasic@linux.net.eu.org

I can make a colored cursor but can not display it in color. Always displays
in black and white. Is it possible to display a cursor in color?
Dale Bryant


http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jul 08 17:37:52 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ythrH-00NC1mC>; Wed, 8 Jul 1998 02:13:15 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA04663;
	Wed, 8 Jul 1998 02:17:23 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C79EC1; Tue, 07 Jul 1998 01:09:38 +0000 (???)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35A17552.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 08 Jul 1998 09:31:59 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <359FD6E4.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] CB/ISAM header
X-UIDL: 722bb19628d18413f2bf9ea3fafd0415

* List: gfabasic@linux.net.eu.org

I am trying to version the CB/ISAM DLL database engine to work under
GFA. I have most of the CBISAM.H file converted but have run into one
bit I don't understand. Maybe someone can illuminate here. The code in
the .H file (with my comments) is:

'used as a pointer to a variable-length string
typedef struct tagVSTR				TYPE tagVSTR:
  {
    WORD   nLen;				- SHORT nLEN
    LPBYTE lpData;				- BYTE  lpData
  } VSTR;					END TYPE
typedef VSTR FAR * LPVSTR;			tagVSTR: VSTR.

typedef struct tagVBUFCB			TYPE tagVBUFCB:
  {
    char   bufcb[12];				- CHAR(12) bufcb$
  } VBUFCB;					END TYPE
typedef VBUFCB FAR * LPVBUFCB;			tagVBUFCB: VBUFCB.

'this is the bit that I'm not sure about. It looks like this struct is
being
'made from the others.
typedef struct tagENCODEDEST			here is where my confusion is
  {
    VBUFCB  VBufCB;				structure within a structure?
    VSTR    estr;   // variable length string with encoded data
  } ENCODEDEST;
typedef ENCODEDEST FAR * LPENCODEDEST;

If anyone can help with this, thanks. I'll make my converted header
available to all when I get it working.

---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jul 08 17:37:57 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ytpw8-00NCpsC>; Wed, 8 Jul 1998 10:50:48 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA15609;
	Wed, 8 Jul 1998 10:55:10 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C06CE8; Tue, 07 Jul 1998 09:46:40 +0000 (???)
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35A1EE80.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 8 Jul 1998 04:35:43 -0400
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] curses
X-UIDL: 73537c1ca905085a52d8ba289d3e638c

* List: gfabasic@linux.net.eu.org

> I can make a colored cursor but can not display it in color. Always
displays
in black and white. Is it possible to display a cursor in color?
Dale Bryant <

I'm guessing; perhaps you need to use 32bit functions, even for the
CreateWindow() function.

Regards,

John 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jul 09 14:57:21 1998
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yu309-00NBmaC>; Thu, 9 Jul 1998 00:47:49 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA24105;
	Thu, 9 Jul 1998 00:52:37 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C05D5E; Tue, 07 Jul 1998 23:42:40 +0000 (???)
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35A2B270.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 09 Jul 1998 00:43:16 +0200
X-Mailer: Mozilla 4.05 [de] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 333200002801-0001@t-online.de
Subject: [GFA] compiler-interpreter inconsistence
X-UIDL: dceb83ab6c3e66535a7b47739e85687e

* List: gfabasic@linux.net.eu.org

Hallo,
Is there anyone who can give a hint avoiding the different
treatment of the BST() function between interpreter and compilier ?
Maybe a special compiler option or so ?
Background : I would like to avoid checking old programs.

(GFA for Windows 4.36  under W 3.11/95)
----------------
DEFINT "i-n"
CLR m,i,k
IF BTST(m,i) THEN k++      // numerical failure after compiling *)
PRINT k
'
KEYGET dummy
CLOSEW #1
END
'-------------

'Solution: replace *)  by
IF BTST(m,i)=TRUE THEN k++    //  OK after compiling
'or
b!=BTST(m,i)                 //  OK
IF b! THEN k++             //  after compiling

Juergen Burgmeier



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jul 09 14:57:23 1998
Return-Path: <recbo@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yu6KJ-00NCpoC>; Thu, 9 Jul 1998 04:20:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id EAA25346;
	Thu, 9 Jul 1998 04:25:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C5518D; Wed, 08 Jul 1998 03:17:33 +0000 (???)
From: Bob Dodds <recbo@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35A2E4CD.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Sender: root@smtp2.erols.com
Date: Wed, 08 Jul 1998 22:18:57 +0000
X-Mailer: Mozilla 4.05 [en] (X11; I; Linux 2.0.33 i486)
MIME-Version: 1.0
References: <35A2B270.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] compiler-interpreter inconsistence
X-UIDL: da90fe14d6a28f8990c4f71eb6af95e6

* List: gfabasic@linux.net.eu.org

Have you checked for k++ failing when on
a complet command line, for instance put it
on a separate line, or use an add function:

if btst

k++

endif

OR--

if btst   k=add(1,k)

-Bob

Juergen Burgmeier wrote:

> * List: gfabasic@linux.net.eu.org
>
> Hallo,
> Is there anyone who can give a hint avoiding the different
> treatment of the BST() function between interpreter and compilier ?
> Maybe a special compiler option or so ?
> Background : I would like to avoid checking old programs.
>
> (GFA for Windows 4.36  under W 3.11/95)
> ----------------
> DEFINT "i-n"
> CLR m,i,k
> IF BTST(m,i) THEN k++      // numerical failure after compiling *)
> PRINT k
> '
> KEYGET dummy
> CLOSEW #1
> END
> '-------------
>
> 'Solution: replace *)  by
> IF BTST(m,i)=TRUE THEN k++    //  OK after compiling
> 'or
> b!=BTST(m,i)                 //  OK
> IF b! THEN k++             //  after compiling
>
> Juergen Burgmeier
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jul 16 00:08:22 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yvUEs-00NCq5C>; Mon, 13 Jul 1998 00:04:58 +0200 (MEST)
Received: from TNG.linux.net.eu.org ([198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA17547;
	Mon, 13 Jul 1998 00:03:06 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C0482C; Sat, 11 Jul 1998 22:49:57 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35A7EC1A.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Cc: "Keith Walmsley" <k.walmsley@uclan.ac.uk>
Date: Sun, 12 Jul 1998 14:46:54 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] email
X-UIDL: 15dc10913443e0ff19192016ba350d35

* List: gfabasic@linux.net.eu.org

My email address is no longer on CompuServe. It is:
webmaster.gfawhelp@gfa.net
adbryant@msn.com


http://www.gfawhelp.gfa.net


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jul 16 00:08:36 1998
Return-Path: <randytech@phonetech.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yvsBq-00NCppC>; Tue, 14 Jul 1998 01:39:26 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id BAA02825;
	Tue, 14 Jul 1998 01:44:45 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C118C1; Mon, 13 Jul 1998 00:34:23 +0000 (???)
From: randytech <randytech@phonetech.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35A9560F.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 13 Jul 1998 19:37:04 -0400
X-Mailer: Mozilla 4.05 [en] (Win95; U)
MIME-Version: 1.0
Cc: GFASoft <gfabasic@Bero-online.Ml.org>
References: <000001bdadde$964cc340$248dfbd0@default>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Re: email
X-UIDL: 6ed77a17480758bca3de6637f6477607

* List: gfabasic@linux.net.eu.org

Dale,

Thanks for the notice.  By the way have you stumbled across Gate's most
recent photo;

http://pes.eunet.cz/billy.jpg

Randy Walker

Dale Bryant wrote:
> 
> My email address is no longer on CompuServe. It is:
> webmaster.gfawhelp@gfa.net
> adbryant@msn.com
> 
> http://www.gfawhelp.gfa.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jul 16 00:08:38 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yvsUB-00ND5mC>; Tue, 14 Jul 1998 01:58:23 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA03083;
	Tue, 14 Jul 1998 02:03:52 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703CC7E8F; Mon, 13 Jul 1998 00:55:15 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35A95AF4.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 13 Jul 1998 16:52:04 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <35A9560F.BeroList-2.5.7@linux.net.eu.org>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: RE: [GFA] Re: email
X-UIDL: d5ed9467445c25ffd4821aabded62eeb

* List: gfabasic@linux.net.eu.org

Thanks,
That does look like Bill. Thanks for the link.
Dale Bryant


> -----Original Message-----
> From: randytech [mailto:randytech@phonetech.com]
> Sent: Monday, July 13, 1998 4:37 PM
> To: gfabasic@linux.net.eu.org
> Cc: GFASoft
> Subject: [GFA] Re: email
> 
> 
> * List: gfabasic@linux.net.eu.org
> 
> Dale,
> 
> Thanks for the notice.  By the way have you stumbled across Gate's most
> recent photo;
> 
http://pes.eunet.cz/billy.jpg

Randy Walker

Dale Bryant wrote:
> 
> My email address is no longer on CompuServe. It is:
> webmaster.gfawhelp@gfa.net
> adbryant@msn.com
> 
> http://www.gfawhelp.gfa.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jul 16 00:08:47 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ywCKj-00NCqaC>; Tue, 14 Jul 1998 23:09:57 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA20152;
	Tue, 14 Jul 1998 23:15:35 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C23E9C; Mon, 13 Jul 1998 22:05:56 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35AA84C4.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 14 Jul 1998 14:02:39 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Demos
X-UIDL: 8f25edc8452b33da06c750b70c3f3f75

* List: gfabasic@linux.net.eu.org

I am still looking for GFA BASIC source code of any kind to post for
downloading on the GFAWHELP web page. Demos, routines ect. Send to

webmaster.gfawhelp@gfa.net

Just attach to a message and thanks in advance. Remember when you first
started programming in GFA how great it was to be able to read GFW source
code written by experienced programmers? Dod code also very welcome.


PLEASE DO NOT SEND TO THE GAF MAILING LIST!!!
Dale Bryant


http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jul 16 00:08:57 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ywYnH-00NCqgC>; Wed, 15 Jul 1998 23:08:55 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA05489;
	Wed, 15 Jul 1998 23:15:17 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C7840D; Tue, 14 Jul 1998 22:03:48 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35ABD5C4.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@bero-online.ml.org
Date: Wed, 15 Jul 1998 14:00:25 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] GFA32
X-UIDL: 4c4f3baebf1c642a44beced7cc50f736

* List: gfabasic@linux.net.eu.org

Hi,
What is the current time table on the 32 bit version of GFA BASIC.
Is there any information on it I could post on my web page?
Dale Bryant

email me
info.gfawhelp@gfa.net


http://www.gfawhelp.gfa.net


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 17 10:51:32 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ywtP4-00ND9iC>; Thu, 16 Jul 1998 21:09:18 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA22433;
	Thu, 16 Jul 1998 21:15:46 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703CAD5F4; Wed, 15 Jul 1998 20:05:11 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35AD0B77.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 16 Jul 1998 00:07:21 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] FW: Krazee!
X-UIDL: aaedd1bcb795705c09e087cce9f55eb5

* List: gfabasic@linux.net.eu.org

Any ideas on this?


-----Original Message-----
From: Bev Brown [mailto:bbrown1@ciaccess.com]
Sent: Thursday, July 16, 1998 9:26 AM
To: Tom Record; Dale Bryant
Subject: Krazee!


Hi Guys:

This business of setting up Windows, Menu Bar, Toolbar & Statusbar (there's
at least 6 different ways) is driving me krazee! I can get most of them to
work BUT try having one of the hot buttons (toolbar) call up a POPUP & your
probs begin (but only in the compiled version -- nutz!). Any suggestions????

                                               -->Bev<--



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 17 10:51:38 1998
Return-Path: <AlanLennon@alanl.globalnet.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ywx0i-00ND9QC>; Fri, 17 Jul 1998 01:00:24 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id BAA24813;
	Fri, 17 Jul 1998 01:07:29 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703CE32AC; Wed, 15 Jul 1998 23:56:07 +0000 (???)
From: Alan Lennon <AlanLennon@alanl.globalnet.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35AD4198.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 16 Jul 1998 23:57:24 +0100
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <35AD0B77.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] FW: Krazee!
X-UIDL: e4b28059c9b98c28dab228df577809a2

* List: gfabasic@linux.net.eu.org

Dale Bryant wrote:
> 
> * List: gfabasic@linux.net.eu.org
> 
> Any ideas on this?
> 
> -----Original Message-----
> From: Bev Brown [mailto:bbrown1@ciaccess.com]
> Sent: Thursday, July 16, 1998 9:26 AM
> To: Tom Record; Dale Bryant
> Subject: Krazee!
> 
> Hi Guys:
> 
> This business of setting up Windows, Menu Bar, Toolbar & Statusbar (there's
> at least 6 different ways) is driving me krazee! I can get most of them to
> work BUT try having one of the hot buttons (toolbar) call up a POPUP & your
> probs begin (but only in the compiled version -- nutz!). Any suggestions????
> 
>                                                -->Bev<--
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

I found this as well when I tried to generate a popup by trapping a
WM_RBUTTONDOWN message in a callback. Worked fine in the interpreter
but  failed to produce a popup menu when compiled. I converted the popup
to a dialog and it then worked. I put it down at the time to a compiler
bug.

Regards Alan Lennon

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 17 10:51:41 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ywxys-00NDAMC>; Fri, 17 Jul 1998 02:02:34 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA25273;
	Fri, 17 Jul 1998 02:10:02 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C3D666; Thu, 16 Jul 1998 00:59:53 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35AD5089.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 16 Jul 1998 17:01:53 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <35AD4198.BeroList-2.5.7@linux.net.eu.org>
Subject: RE: [GFA] FW: Krazee!
X-UIDL: 51dfa50dd23c774bfb39972d73977beb

* List: gfabasic@linux.net.eu.org

Thanks Alan,
I forwarded this to Bev Brown in Canada. Thanks for the reply.


> -----Original Message-----
> From: Alan Lennon [mailto:AlanLennon@alanl.globalnet.co.uk]
> Sent: Thursday, July 16, 1998 3:57 PM
> To: gfabasic@linux.net.eu.org
> Subject: Re: [GFA] FW: Krazee!
> 
> 
> * List: gfabasic@linux.net.eu.org
> 
> Dale Bryant wrote:
> > 
> > * List: gfabasic@linux.net.eu.org
> > 
> > Any ideas on this?
> > 
> > -----Original Message-----
> > From: Bev Brown [mailto:bbrown1@ciaccess.com]
> > Sent: Thursday, July 16, 1998 9:26 AM
> > To: Tom Record; Dale Bryant
> > Subject: Krazee!
> > 
> > Hi Guys:
> > 
> > This business of setting up Windows, Menu Bar, Toolbar & 
> Statusbar (there's
> > at least 6 different ways) is driving me krazee! I can get most 
> of them to
> > work BUT try having one of the hot buttons (toolbar) call up a 
> POPUP & your
> > probs begin (but only in the compiled version -- nutz!). Any 
> suggestions????
> > 
> >                                                -->Bev<--
> > 
> > ---
> > This mailing list is currently running BeroList v2.5.6
> > Report problems to bero@bero-online.ml.org
> 
> I found this as well when I tried to generate a popup by trapping a
> WM_RBUTTONDOWN message in a callback. Worked fine in the interpreter
> but  failed to produce a popup menu when compiled. I converted the popup
> to a dialog and it then worked. I put it down at the time to a compiler
> bug.
> 
> Regards Alan Lennon
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 17 10:51:42 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0ywzNC-00ND5cC>; Fri, 17 Jul 1998 03:31:46 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA25753;
	Fri, 17 Jul 1998 03:38:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C38DF2; Thu, 16 Jul 1998 02:28:34 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35AD6552.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 16 Jul 1998 21:30:42 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Importance: Normal
In-Reply-To: <35AD4198.BeroList-2.5.7@linux.net.eu.org>
Subject: RE: [GFA] FW: Krazee!
X-UIDL: b42750e5c74ccf10ce7363fadaa75c01

* List: gfabasic@linux.net.eu.org

Thanx Alan; I had finally come to this conclusion. I glad I'm not the only
one.

                                               -->Bev<--

> -----Original Message-----
> From: Alan Lennon [mailto:AlanLennon@alanl.globalnet.co.uk]
> Sent: July 16, 1998 6:57 PM
> To: gfabasic@linux.net.eu.org
> Subject: Re: [GFA] FW: Krazee!
>
>
> * List: gfabasic@linux.net.eu.org
>
> Dale Bryant wrote:
> >
> > * List: gfabasic@linux.net.eu.org
> >
> > Any ideas on this?
> >
> > -----Original Message-----
> > From: Bev Brown [mailto:bbrown1@ciaccess.com]
> > Sent: Thursday, July 16, 1998 9:26 AM
> > To: Tom Record; Dale Bryant
> > Subject: Krazee!
> >
> > Hi Guys:
> >
> > This business of setting up Windows, Menu Bar, Toolbar &
> Statusbar (there's
> > at least 6 different ways) is driving me krazee! I can get most
> of them to
> > work BUT try having one of the hot buttons (toolbar) call up a
> POPUP & your
> > probs begin (but only in the compiled version -- nutz!). Any
> suggestions????
> >
> >                                                -->Bev<--
> >
> > ---
> > This mailing list is currently running BeroList v2.5.6
> > Report problems to bero@bero-online.ml.org
>
> I found this as well when I tried to generate a popup by trapping a
> WM_RBUTTONDOWN message in a callback. Worked fine in the interpreter
> but  failed to produce a popup menu when compiled. I converted the popup
> to a dialog and it then worked. I put it down at the time to a compiler
> bug.
>
> Regards Alan Lennon
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jul 19 21:59:31 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yxCEY-00ND5JC>; Fri, 17 Jul 1998 17:15:42 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA06164;
	Fri, 17 Jul 1998 17:23:11 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C03321; Thu, 16 Jul 1998 16:12:19 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35AE2663.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 17 Jul 1998 08:14:28 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] GFAWHELP
X-UIDL: 1edcdceae42f837af19929c64507472f

* List: gfabasic@linux.net.eu.org

The gfawhelp file will not be updated on CompuServe unless GFA decides to
post the latest versions there. I have signed with GFA.NET which offered a
much better value for a little less money. A updated version with some added
routines will be uploaded by the end of 1998.
Thanks to all the great programmers and to GFA who have made this file
possible.
Dale Bryant

http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jul 19 22:00:42 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yxK2s-00ND8yC>; Sat, 18 Jul 1998 01:36:10 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id BAA03771;
	Sat, 18 Jul 1998 01:40:47 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C68F8E; Fri, 17 Jul 1998 00:31:35 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35AE9B67.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 17 Jul 1998 16:33:40 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Still Looking
X-UIDL: 51bbad76da27232018e47d3b7df73803

* List: gfabasic@linux.net.eu.org

Chris sent me a great demo on the Win API file handling commands. You can
download it at from the files section on the GFAWHELP home page shown below.
Many more demos would be welcome!

Also, I am still looking for biography information from any/all GFA BASIC
programmers.

1. Your name
2. Your main programming interest using GFA
3. Your Email address (if desired)
4. Your web page URL (if desired)
5. Some personal information welcome (family ect.)

DO NOT SEND TO MAILING LIST!
Send to:
webmaster.gfawhelp@gfa.net
or
adbryant@msn.com



http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jul 19 22:02:10 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yxhoh-00ND5mC>; Sun, 19 Jul 1998 02:59:07 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA19828;
	Sun, 19 Jul 1998 03:04:27 +0200
Received: from linux.net.eu.org (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 5703C520E4; Sat, 18 Jul 1998 01:55:38 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@linux.net.eu.org
To: gfabasic@linux.net.eu.org
Message-ID: <35B0009A.BeroList-2.5.7@linux.net.eu.org>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 18 Jul 1998 16:20:35 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Update
X-UIDL: 837205347acab0a5ec9be5f6a12f44b1

* List: gfabasic@linux.net.eu.org

A few additions have been made to the GFAWHELP file. As it is quite large
perhaps you might want to wait before downloading it. As I can finally see
the monitor after having eye surgery I will be adding some more to it
shortly. If you have any routines you would like to have added send them to
me at.
adbryant@gfa.net

PLEASE DO NOT SEND TO THE MAILING LIST!!
Dale Bryant


http://www.gfawhelp.gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 21 12:58:16 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yyKKs-00ND5tC>; Mon, 20 Jul 1998 20:06:54 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA18005;
	Mon, 20 Jul 1998 20:13:15 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B11D67B0; Sun, 19 Jul 1998 19:02:49 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B242DA.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 20 Jul 1998 11:04:23 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Programmers
X-UIDL: 67bdae196649ed2f9687770826def7b0

Do you program in GFA BASIC on the PC or the Atari or some other platform. I
would like to add your name to the GFA programmers page on the GFAWHELP web
site.
Send,
1. Name (first,last)
2  Main programming interest
3. Email address (if desired)
4. Web page URL  (if you have one)
5. Some personal family info if desired.
send to
adbryant@gfa.net

PLEASE DO NOT SEND TO MAILING LIST!

http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 21 12:58:18 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yyQMC-00ND63C>; Tue, 21 Jul 1998 02:32:40 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA21519;
	Tue, 21 Jul 1998 02:39:22 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B1104DD6; Mon, 20 Jul 1998 01:30:12 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B29DA4.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 20 Jul 1998 17:31:54 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Wanted
X-UIDL: 0aaecfe89e50818a75a9bd7590280102

Below are excerpts from message from Pat Bullman. Any Comments? Do any of
you have any tools for GFA you would like to make available?

> As I become more reliant on GFA-WIN, I find myself looking for various
> tools - things such as graphic handlers, indexing systems, ODBC
> drivers (or
> code).  Obviously, such things are available from different software
> vendors but I don't know who has got what these days and I don't
> know of an
> easy way to find out.  Also, I suspect that several GFA programmers have
> developed these types of systems themselves and they may want to sell or
> make available these tools to other GFA programmers.  I would much rather
> pay a GFA programmer for utilities, particularly if the source code was
> also included.
>
> Given this, what I would like to see in the GFAHELP page is a list
> containing links or addresses of people who have such tools (I suppose a
> list already exists somewhere on the net, maybe just an address of that
> list).
http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 21 12:58:20 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yyVm8-00ND5GC>; Tue, 21 Jul 1998 08:19:48 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA31513;
	Tue, 21 Jul 1998 08:26:44 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B11DCA67; Mon, 20 Jul 1998 07:17:34 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B2EF0F.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc02.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980721061905.SOXT25265@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 21 Jul 1998 06:19:05 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 21 Jul 1998 06:19:05 +0000
Subject: [GFA] modules   2107xx1-
X-UIDL: 0105cd9c0a0e97ac541b72f5c9e4a49e

21/07/98 1:13:54 AM   modules   2107xx1-

Have need of identifying loaded modules such as *.dll, *.vbx, etc.  I 
don't see it if I have it.

Stems from wanting to unload modules no longer needed but must know if 
something else is using.  Also need to know if already loaded or not.

Would also like to read such modules & determine what they do & what 
programs or other modules call them.

Help & guidance greatly appreciated.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 21 20:23:34 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yygQW-00NDBtC>; Tue, 21 Jul 1998 19:42:12 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA05106;
	Tue, 21 Jul 1998 19:49:07 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B11992D8; Mon, 20 Jul 1998 18:39:13 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B38ED1.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 21 Jul 1998 10:40:50 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Biography
X-UIDL: de231f21b3dbe32d6dd722b9184f3c19

Patrick Bullman sent me his GFA programming information and is now in the
GFA Programmers section at the URL below.
Where is yours?
>>
My Name is Patrick Bullman and I live in Murwillumbah, NSW, Australia.  My
E-Mail address is
<<
http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jul 22 11:29:21 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yyo5E-00NC1YC>; Wed, 22 Jul 1998 03:52:44 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id EAA09069;
	Wed, 22 Jul 1998 04:00:01 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B11D8A93; Tue, 21 Jul 1998 02:50:11 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B401E4.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 21 Jul 1998 18:51:44 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Who?
X-UIDL: cc39a7d7396ef6a004757b0154bcc8c8

Once upon a time there was a GFA Basic programmer who was not listed on the
biography page of the GFAWHELP home page.

Let us observe a minute of silence for this unknown programmer!
http://www.gfawhelp.gfa.net

http://www.gfa.net/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jul 22 20:34:45 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yz33w-00NDBNC>; Wed, 22 Jul 1998 19:52:24 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA24601;
	Wed, 22 Jul 1998 19:58:54 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B11E9D2C; Tue, 21 Jul 1998 18:47:58 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B4E25F.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 22 Jul 1998 10:49:18 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] GFA Tools
X-UIDL: 0974d43ebafe771fbb6b4d4ed10f2218

Do any of
you have any tools for GFA you would like to make available? If you have
such tools to share or to sell I will set up a contact page on the GFAWHELP
page so interested programmers can contact you.
If you have tools you would like to offer as shareware I will set up a
shareware page with the programs and contact information.
Dale Bryant
http://www.gfa.net/adbryant/index.htm

http://www.gfawhelp.gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 24 01:36:36 1998
Return-Path: <mike2@inbus.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yzAFc-00NC1YC>; Thu, 23 Jul 1998 03:32:56 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA27902;
	Thu, 23 Jul 1998 03:40:43 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B11D2651; Wed, 22 Jul 1998 02:30:26 +0000 (???)
From: "Michael LaChapelle" <mike2@inbus.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B54EC3.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
          via smtpd (for microsoft.sucks.eu.org [198.22.51.242]) with SMTP; 23 Jul 1998 01:27:19 UT
Date: Tue, 22 Jul 1997 18:36:37 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
In-Reply-To: <35AD0B77.BeroList-2.5.7@linux.net.eu.org>
Subject: [GFA] COM port access
X-UIDL: 80653ee03bd791b6a49872c64981ac82

   I'm looking for code that runs under Win 95/98/NT 4 that lets me
correctly access the COM ports.  I'm using GFA for Windows 4.31.  I have a
working "CreateFile" and "CloseHandle" function, but nothing else that
works!  I could also use any extra code for modem-related access (like
watching the DTR, etc. lines for disconnections, etc.)  Any body know where
I can look?

	Michael LaChapelle


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 24 01:36:37 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yzAUq-00NDA6C>; Thu, 23 Jul 1998 03:48:40 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA28058;
	Thu, 23 Jul 1998 03:56:41 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B11DD6D7; Wed, 22 Jul 1998 02:46:42 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B55293.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 22 Jul 1998 18:48:00 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] TOOMENU
X-UIDL: 08ce360bd0b52ff8f6129abfa9744b6b

Roland Walter has released ToolMenu v.2.2 and it is available for download
from the sites below. I'm sure that GFA will have it for download but it is
available now at the sites below.
Dale Bryant


http://www.gfa.net/adbryant/index.htm

http://www.gfawhelp.gfa.net



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 24 01:36:38 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yzAcv-00NCppC>; Thu, 23 Jul 1998 03:57:01 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id EAA28171;
	Thu, 23 Jul 1998 04:04:59 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 56B113EFD6; Wed, 22 Jul 1998 02:54:32 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B55468.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 22 Jul 1998 18:55:55 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <35B54EC3.BeroList-2.5.7@aachen.linuux.de>
Subject: RE: [GFA] COM port access
X-UIDL: c24861a6a3a22a5bf229716685edd114

Hi Michael,
There quite a few COM routines in the GFAWHELP file. Perhaps some of them
might help. If you have the GFAWHELP file use the index section and search
for COM. If you do not have the file it is free and available for download
from various places. The home page for GFAWHELP is shown below.
Dale Bryant

http://www.gfa.net/adbryant/index.htm
http://www.gfawhelp.gfa.net

> -----Original Message-----
> From: Michael LaChapelle [mailto:mike2@inbus.com]
> Sent: Tuesday, July 22, 1997 6:37 PM
> To: gfabasic@aachen.linuux.de
> Subject: [GFA] COM port access
>
>
>    I'm looking for code that runs under Win 95/98/NT 4 that lets me
> correctly access the COM ports.  I'm using GFA for Windows 4.31.  I have a
> working "CreateFile" and "CloseHandle" function, but nothing else that
> works!  I could also use any extra code for modem-related access (like
> watching the DTR, etc. lines for disconnections, etc.)  Any body
> know where
> I can look?
>
> 	Michael LaChapelle
>
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
>



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 24 18:15:01 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yzXUf-00ND8mC>; Fri, 24 Jul 1998 04:22:01 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id EAA14185;
	Fri, 24 Jul 1998 04:30:32 +0200
Received: from aachen.linuux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BFDDC24; Thu, 23 Jul 1998 03:19:26 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linuux.de
To: gfabasic@aachen.linuux.de
Message-ID: <35B6ABBF.BeroList-2.5.7@aachen.linuux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc03.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980724022053.BJYA10564@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Fri, 24 Jul 1998 02:20:53 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 24 Jul 1998 02:20:53 +0000
Subject: [GFA] interesting   2307__1-
X-UIDL: cfbeff0d5a56d031662fa4fd8da71af2

23/07/98 9:12:22 PM   interesting   2307__1-

Have discovered something interesting.

Performing a search by mask, files attribed "hidden" & "system" can be 
easily found by a GFA-W program.

The same program, looking for a specific "hidden" or "system" file 
will not only NOT find it, it will substitute it's own name in the 
display as the "found" file.

I *am* running a *.lst file in v4.38 interpretor.  Might that be part 
of the mystery?  I haven't compiled yet - am still in the experimental 
stage.

Any light cast on this will be appreciated.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 24 18:15:06 1998
Return-Path: <THIELE-DOKUMENTATION@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mailout02.btx.dtag.de (194.25.2.150) with smtp
	  id <m0yzfSS-00NDEeC>; Fri, 24 Jul 1998 12:52:16 +0200 (MEST)
Received: from fwd08.btx.dtag.de (fwd08.btx.dtag.de [194.25.2.168])
	by mailout02.btx.dtag.de with smtp 
	id 0yzfQM-00057H-00; Fri, 24 Jul 1998 12:50:06 +0200
Received: from Noname (0602332112-0001(btxid)@[193.159.11.184]) 
	by fwd08.btx.dtag.de with smtp
	id <m0yzfQ6-0003CEC>; Fri, 24 Jul 1998 12:49:50 +0200
Message-ID: <35B83077.FFCDC414@t-online.de>
Date: Fri, 24 Jul 1998 07:57:59 +0100
Organization: THIELE DOKUMENTATION + MEDIA
X-Mailer: Mozilla 4.01 [de]C-DT  (WinNT; I)
MIME-Version: 1.0
To: Roland <alibaba@zedat.fu-berlin.de>
Subject: Re: [GFA] Reading out HD directory
X-Priority: 3 (Normal)
References: <357FFEEB.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=iso-8859-1

X-Sender: 0602332112-0001@t-online.de
From: THIELE-DOKUMENTATION@t-online.de (Dr.-Ing. U. Thiele)
X-UIDL: e96dd674f5c1536b37b712ddb735eae0

Roland schrieb:
> 

Vielen Dank fr das nachstehende Listing! Funktioniert prchtig, aber
eines interessiert mich noch: Wie komme ich an Datum und Uhrzeit der
Dateien? Den Bereich mit diesen Informationen habe ich zwar lokalisiert,
aber die Decodierung gelingt nicht. Oder gibt es einen einfacheren Weg?

Gruss aus Alzenau
Ulrich Thiele

 u.thiele@thiele-dokumentation.de
 j.thiele@thiele-dokumentation.de
----------------------------------
http://www.thiele-dokumentation.de
----------------------------------
 Fon + Fax (0 60 23) 3 21 12







> * List: gfabasic@linux.net.eu.org
> 
> At 15:41 31.05.1998 +0100, you wrote:
> >I am looking for a subroutine, that will give me a list of all file
> >names and file data of the hard disk directory. Paths don`t have to
> be
> >included. I used the dta command on Windows 3.11, which works fine.
> >However on Windows 95/NT with the long file names, dta gives back
> only
> >some xxxxxx~1.xx of course. Does anybody know the best way to get
> long
> >file names?
> 
> FindFirstFile / FindNextFile should do the job:
> 
> @Init
> OPENW #1,0,0,_X,_Y,0
> FONT "Arial",HEIGHT 12, WIDTH 5, WEIGHT FW_BOLD, QUALITY 2 //kleine
> Schrift, um ein Scrollen zu vermeiden
> FONT TO Font&
> SETFONT Font&
> //
> //Bitte als Pfad auch mal ein Unterverzeichnis eintragen (wegen "."
> und ".."
> Pfad$="c:\*.*"+CHR$(0) //Wildcard Characters (* und ?) sind erlaubt
> SearchHandle& = @@FindFirstFile(V:Pfad$,V:FIND_DATA.) //SearchHandle&
> wird fr FindNextFile() bentigt (-1 bei Fehler)
> FOR i&=1 TO 45  //je nach dem, was auf den Bildschirm pat...
> (Auflsung bei mir: 800x600)
>   PRINT AT(1,i&); FIND_DATA.AlternateFileName$ //Beachte: der String
> sollte normalerweise mit ZTRIM$() behandelt werden
>   PRINT AT(20,i&); FIND_DATA.FileName$
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_ARCHIVE%) THEN PRINT
> AT(60,i&); "A"
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_DIRECTORY%) THEN PRINT
> AT(62,i&); "D"
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_HIDDEN%) THEN PRINT
> AT(64,i&);"H"
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_NORMAL%) THEN PRINT
> AT(66,i&);"N"
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_READONLY%) THEN PRINT
> AT(68,i&);"R"
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_SYSTEM%) THEN PRINT
> AT(70,i&);"S"
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_TEMPORARY%) THEN PRINT
> AT(72,i&);"T"
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_ATOMIC_WRITE%) THEN PRINT
> AT(74,i&);"W"
>   IF AND(FIND_DATA.Attribute,FILE_ATTRIBUTE_XACTION_WRITE%) THEN PRINT
> AT(76,i&);"X"
>   Return!=@@FindNextFile(SearchHandle&,V:FIND_DATA.) //Return! ist bei
> erfogreicher Suche TRUE, anderenfalls FALSE
>   EXIT IF Return!=FALSE
> NEXT i&
> IF Return!=TRUE THEN PRINT "Mehr Dateien konnten leider nicht
> dargestellt werden..."
> //
> KEYGET Dummy&
> ~@@FindClose(SearchHandle&) //der Returnwert bei Erfolg ist TRUE,
> anderenfalls FALSE (hier nicht ausgewertet)
> FREEFONT Font&
> CLOSEW #1
> FREEDLL 1
> END
> //
> PROCEDURE Init
>   DLL #1,"kernel"
>     DECL WORD FindFirstFile(L,L) //durchsucht ein Verzeichnis nach
> Dateien/Verzeichnissen je nach Spezifikation
>     DECL BOOL FindNextFile(W,L) //setzt die Suche des vorhergehenden
> FindFirstFile()-Aufrufes fort
>     DECL BOOL FindClose(W)        //schliet die Suchoperation durch
> Freigebnen des Suchhandles ab.
>   ENDDLL
> 
> //-------------------------------------------------------------------------
>   TYPE FIND_DATA:
>   - LONG Attribute                          //bitweise ver-ODER-te
> Dateiattribute (FILE_ATTRIBUTE_...)
>   - CHAR*40 Dummy$                   //Ersatz fr diverse
> Einzelvariablen, deren Inhalt hier uninteressant war...
>   - CHAR*260 FileName$              //Win95-Dateiname
>   - CHAR*14 AlternateFileName$  //alter DOS-Dateiname
>   ENDTYPE
>   FIND_DATA:FIND_DATA. //Die Strukturvariable FIND_DATA. wird von
> FindFirstFile() bzw. FindNextFile() mit Daten gefllt
> 
> //---------------------------------------------------------------------------
>   FILE_ATTRIBUTE_ARCHIVE%=$00000020              //Archivbit
>   FILE_ATTRIBUTE_DIRECTORY%=$00000010         //Verzeichnisbit
>   FILE_ATTRIBUTE_HIDDEN%=$00000002                //Versteckt-Bit
>   FILE_ATTRIBUTE_NORMAL%=$00000080               //kein anderes Bit
> gesetzt (nur gltig, wenn es alleine gesetzt ist)
>   FILE_ATTRIBUTE_READONLY%=$00000001           //Nur-Lesen-Bit
>   FILE_ATTRIBUTE_SYSTEM%=$00000004               //Systembit
>   FILE_ATTRIBUTE_TEMPORARY%=$00000100       //Temporrdatei
>   FILE_ATTRIBUTE_ATOMIC_WRITE%=$00000200   //reserviert (zumindest
> noch bei Windows 32s)
>   FILE_ATTRIBUTE_XACTION_WRITE%=$00000400 //reserviert (zumindest noch
> bei Windows 32s)
> RETURN
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

-- 
Gruss aus Alzenau
Ulrich Thiele

 u.thiele@thiele-dokumentation.de
 j.thiele@thiele-dokumentation.de
----------------------------------
http://www.thiele-dokumentation.de
----------------------------------
 Fon + Fax (0 60 23) 3 21 12



From ???@??? Sat Jul 25 12:30:00 1998
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yzpjZ-00ND5KC>; Fri, 24 Jul 1998 23:50:37 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id XAA30576;
	Fri, 24 Jul 1998 23:58:46 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BF1A63F; Thu, 23 Jul 1998 22:46:27 +0000 (???)
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35B7BD43.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
X-BlackMail: 192.168.1.201, default, michael@bonbit.org, 192.168.1.201
X-Authenticated-Timestamp: 21:27:54(GMT) on July 24, 1998
X-Sender: michael@bonbit.org
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Fri, 24 Jul 1998 23:38:04 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] WINDFIND fails in Windows 3.1
X-UIDL: a7f53bd80472fae94a44a8f9d4b6ff86

Hi there!

My program uses about 10 dialogs and half of them have lots of controls. I
am using WINDFIND to find out which control is under the mouse cursor to
give some information about the control in a statusbar.

Everything works fine... as long as I use Windows 95 or Windows 98.

When I tested my program with Windows 3.1 WINDFIND found some controls and
some not. I found out that it finds only controls of the dialogs I created
first with DIALOG...ENDDIALOG and it does not find controls of the latter
created dialogs.

I assume that there is a limit of controls that WINDFIND can handle. Am I
right?

Is there a working replacement for WINDFIND?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jul 25 12:30:01 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0yzr95-00ND8dC>; Sat, 25 Jul 1998 01:21:03 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id BAA31226;
	Sat, 25 Jul 1998 01:29:43 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BFC0156; Fri, 24 Jul 1998 00:18:25 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35B7D2D1.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 24 Jul 1998 16:19:33 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Biographies
X-UIDL: a309d38bb73eabda777a71c7a8f82842

I only have room on the GFAWHELP web page for a couple of thousand more
biographies. If you use GFA basic I would like to list you on the GFA
programmers page. Better hurry!

1. Name
2. City/Country
3. You main area of GFA programming interest
4. Email address
5. Your web page URL (if Any)
6. Some personal information if desired

http://www.gfa.net/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jul 26 23:58:45 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z01dZ-00NC28C>; Sat, 25 Jul 1998 12:33:13 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA09220;
	Sat, 25 Jul 1998 12:42:03 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BFD5EF3; Fri, 24 Jul 1998 11:29:24 +0000 (???)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35B87015.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 24 Jul 1998 20:15:44 +0000
In-Reply-To: <35B83077.FFCDC414@t-online.de>
References: <357FFEEB.BeroList-2.5.7@linux.net.eu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Subject: Re: [GFA] Reading out HD directory

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id MAA09220
X-UIDL: 045882d308a830cceb24f910f28553b6

At 07:57 24.07.1998 +0100, you wrote:

>eines interessiert mich noch: Wie komme ich an Datum und Uhrzeit der
>Dateien? Den Bereich mit diesen Informationen habe ich zwar lokalisiert,
>aber die Decodierung gelingt nicht. Oder gibt es einen einfacheren Weg?

Ich hab vor geraumer Zeit dazu mal ein Listing geschrieben. Das Ganze ist
eine gut gekapselte Funktion, die man per Copy+Past in bestehende Listings
einfgen kann. Das Ding sollte genau den gewnschten Job tun ;-)
P.S. Ich empfehle einen Blick in die GFA-Hilfe zu INTR(). Bei Int21-Funktionen
sollte es KEINE Probleme geben...
Na ja, die Funktion INT() war versteckt schon immer in GFA-Basic fr Windows
drin - ich hab das mal durch Zufall entdeckt und dann GFA gelchert, da sie
die Funktion "offizialisieren" sollen - haben sie dann auch gemacht :-)
Als Interrupt-Referenz empfehle ich Ralph Browns Interrupt List, die es als
Windows-Hilfedatei im Internet gibt. Bei Beschaffungsproblemen: Auf der
GFA-CD von mir ist das Ding mit drauf.

Viel Erfolg & viel Spa
von Roland

--------------------------------schnipp--------------------------------
Datei FILEDATE.LIST
'Datum und Uhrzeit einer Datei mittels Interrupt ermitteln (fertige Funktion)
'  Roland Walter, Schnhauser Allee 64, D-10437 Berlin  (Januar 1996)

OPENW #1
Datum$=@GetFileDate$("c:\autoexec.bat")
PRINT Datum$
KEYGET Dummy&
CLOSEW #1



FUNCTION GetFileDate$(FileName$) 'Dateidatum+Zeit mittels Interrupts ermitteln
  'Die Funktion gibt Datum und Uhrzeit als String zurck (bei Bedarf ndern)
  'ALLE verwendeten Variablen sind lokal: Die Funktion kann also ohne weitere berprfung in
  'andere Listings eingefgt werden (Kopieren--->Einfgen--->Verwenden--->Fertig)
  LOCAL hFile&,h|,Min|,Sec|,Day|,Month|,Year&
  '
  FileName$=FileName$+CHR$(0)  'Null-Terminierung des Strings
  // Datei ffnen (wir bentigen das DOS-Handle der Datei fr den Interrupt $21h, _AH=$57)
  _AH = $3D      'ffnen einer existierenden Datei
  _AL = %000    'Im Nur-Lesen-Modus ffnen  (Das %-Zeichnen kennzeichnet einen binr dargestellten Zahlenwert)
  _DS = HIWORD(V:FileName$)
  _DX = LOWORD(V:FileName$)
  ~INTR($21)  'Interrupt $21 mit den eingestellten Parametern aufrufen
  '
  IF AND(_FL,1)  'Wenn das Carry-Flag gesetzt ist, dann ist ein Fehler aufgetreten
    SELECT _AX  ' AX enthlt den Fehler-Code (nur eine Auswahl)
    CASE 2
      RETURN "Datei nicht gefunden"
    CASE 3
      RETURN "Pfad nicht gefunden oder Datei existiert nicht"
    CASE 4
      RETURN "Kein freies Datei-Handle"
    CASE 5
      RETURN "Zugriff verweigert"
    CASE 12
      RETURN "Unerlaubter Zugriffsmodus"
    ENDSELECT
    EXPROC  'Funktion verlassen
  ELSE 'Kein Fehler aufgetreten: AX enthlt das DOS-Handle der geffneten Datei
    hFile& = _AX   'Dateihandle der geffneten Datei, falls erfolgreich
  ENDIF
  '------------------------------------------------------------------------------------------------------
  _AH = $57,  _AL = $00   'Datum und Uhrzeit des letzten Schreibzugriffs einer Datei ermitteln
  _BX = hFile&   'Dateihandle bergeben
  ~INTR($21)  'Interrupt $21 mit den eingestellten Parametern aufrufen
  '
  IF NOT AND(_FL,1)  'kein Fehler aufgetreten: Zurckgegebene Werte in lokale Variablen sichern
    'Das Datum ist in DX und die Uhrzeit in CX in Form von gesetzten Bits verschlsselt:
    h| = SHR(_CX,11)                           'Bits 15-11 ---> Stunden (0-23)
    Min| = AND(SHR(_CX,5),63)           'Bits 10-5 ---> Minuten
    Sec| = AND(SHR(_CX,0),31)*2        'Bits 4-0 ---> Sekunden/2
    Day| = AND(_DX,31)                       'Bits 4-0 ---> Tag
    Month| = AND(SHR(_DX,5),15)        'Bits 8-5 ---> Monat
    Year& = SHR(_DX,9)+1980             'Bits 15-9 ---> Jahr - 1980
  ENDIF
  '------------------------------------------------------------------------------------------------------
  _AH = $3E   'Datei wieder schlieen
  _BX = hFile&  'Interrupt $21 mit den eingestellten Parametern aufrufen
  ~INTR($21)
  '------------------------------------------------------------------------------------------------------
  RETURN STR$(h|)+":"+STR$(Min|)+":"+STR$(Sec|)+", "+STR$(Day|)+"."+STR$(Month|)+"."+STR$(Year&)
ENDFUNC



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:21 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z0ZPH-00ND8sC>; Mon, 27 Jul 1998 00:36:43 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id AAA29183;
	Mon, 27 Jul 1998 00:46:19 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BF6748A; Sat, 25 Jul 1998 23:29:49 +0000 (???)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BA6A6D.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Mon, 27 Jul 1998 00:30:20 +0000
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] New Web page
X-UIDL: 1eb1f1c1630a3ddcbba36574462e5f9c

Hallo,
I have re-activated my GFA Basic Web page:
http://userpage.fu-berlin.de/~alibaba/gfabasic/

It was built fully new now - but mostly for germans.
There are my journal articles in, some tools and so on.

Have a look at the page ;-)

By, Roland Walter

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:35 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z0pWe-00NDAAC>; Mon, 27 Jul 1998 17:49:24 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA11083;
	Mon, 27 Jul 1998 17:59:31 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BFE9A72; Sun, 26 Jul 1998 16:46:18 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BB5D5B.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc02.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980727154723.GQZU28282@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Mon, 27 Jul 1998 15:47:23 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 27 Jul 1998 15:47:23 +0000
Subject: [GFA] req for help   2707zz1-
X-UIDL: 49ffcc7265de662626eb6ea5cf7045ba

27/07/98 10:42:11 AM   req for help   2707zz1-

I keep seeing that I can get text to show up in a combobox window 
*before* it is activated or opened.  I see these all the time in 
dialogs & this has been the only time I can do it but it's automatic, 
not something I coded in.

Can somebody tell me how it's done - how is the EDITTEXT put in place?

A COMBOBOX is a combination of a LISTBOX with a static text field or 
with an EDITTEXT element. If the COMBOBOX contains a static text 
field, the selected entry from the LISTBOX is shown in it. Additional 
style elements for COMBOBOXes are WS_TABSTOP, WS_GROUP, WS_VSCROLL and 
WS_DISABLED. 

CONTROL		text$,ID&,class$,style&,x&,y&,w&,h&,

CONTROL creates a program defined control window with width w& and 
height h& at coordinates specified in x& and y&. The window shows the 
text specified in text$ and can be referred to with the value 
specified in ID&.  class$ specifies the class of the control elements 
which the control window can assign. The following strings are 
predefined:

COMBOBOX

Help is always appreciated.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:44 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z0xWn-00NC1eC>; Tue, 28 Jul 1998 02:22:05 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id CAA15660;
	Tue, 28 Jul 1998 02:32:48 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BF72696; Mon, 27 Jul 1998 01:18:55 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BBD57F.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 27 Jul 1998 17:19:43 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Importance: Normal
Subject: [GFA] TOOLMENU
X-UIDL: 314f741ce7d20f2c19d7b2e46fa59d2d

If you missed Roland Walters' new version (2.2) of TOOLMENU for the GFA
Basic editor it can be downloaded at the addresses below. If you don't have
it check it out.
Dale

http://www.gfawhelp.gfa.net

http://www.gfa.net/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:45 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z1077-00NDBiC>; Tue, 28 Jul 1998 05:07:45 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id FAA16318;
	Tue, 28 Jul 1998 05:17:22 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BFA7171; Mon, 27 Jul 1998 04:04:37 +0000 (???)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BBFC55.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 28 Jul 1998 12:32:56 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35BB5D5B.BeroList-2.5.7@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] req for help   2707zz1-
X-UIDL: fefe8876fba458090fbbfbaf65c06e6e

Tom Record wrote:
> 
> 27/07/98 10:42:11 AM   req for help   2707zz1-
> 
> I keep seeing that I can get text to show up in a combobox window
> *before* it is activated or opened.  I see these all the time in
> dialogs & this has been the only time I can do it but it's automatic,
> not something I coded in.
> 
> Can somebody tell me how it's done - how is the EDITTEXT put in place?
> 
> A COMBOBOX is a combination of a LISTBOX with a static text field or
> with an EDITTEXT element. If the COMBOBOX contains a static text
> field, the selected entry from the LISTBOX is shown in it. Additional
> style elements for COMBOBOXes are WS_TABSTOP, WS_GROUP, WS_VSCROLL and
> WS_DISABLED.
> 
> CONTROL         text$,ID&,class$,style&,x&,y&,w&,h&,
> 
> CONTROL creates a program defined control window with width w& and
> height h& at coordinates specified in x& and y&. The window shows the
> text specified in text$ and can be referred to with the value
> specified in ID&.  class$ specifies the class of the control elements
> which the control window can assign. The following strings are
> predefined:
> 
> COMBOBOX
> 
> Help is always appreciated.
> <G>
> TomR.
> 

Hello, Tom.
I may have something for you. I'll post it to you directly.
Basically, you can put the text in via several methods, depending on
which is best for what you're doing:

1. Put the text straight in using the SetWindowText API call
(Setcontents in my library). In this case the text may or may not
reflect what is in the list.

2. Put it in via the CB_SELECTSTRING message, thus choosing text from
the list.

3. Put it in by identifying something in the list by its index then
using method 1.

I'll send you an example.

---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:47 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z12Eo-00ND9aC>; Tue, 28 Jul 1998 07:23:50 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA25380;
	Tue, 28 Jul 1998 07:34:09 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BFE4A26; Mon, 27 Jul 1998 06:21:24 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BC1C65.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 28 Jul 1998 07:23:50 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] req for help   2707zz1-
X-UIDL: 453641bf917e4fee6edded7bd76935e8

This example should explain the COMBOBOX...

Init
Main
> PROCEDURE Init
  DIM kontakt$(6)
  kontakt$(0) = "-"
  kontakt$(1) = "Telefonat"
  kontakt$(2) = "per Mail"
  kontakt$(3) = "Besprechung"
  kontakt$(4) = "Einsatz (Lnw.)"
  kontakt$(5) = "Installation"
  kontakt$(6) = "Kontrolle (Test)"
RETURN
> PROCEDURE Main
  DIALOG #10,40,20,560,430,"Schoeller Network Design Mystery
Database",WS_SYSMENU | DS_MODALFRAME,16,"Helv"
    CONTROL "A k t i o n e n :",920,"static",SS_LEFT,20,195,80,22
    CONTROL "*",999,"static",SS_RIGHT,420,195,100,15
    CONTROL "",820,"static",$10000007,18,210,508,2
    CONTROL "&Techniker:",921,"static",SS_LEFT,20,221,80,22
    CONTROL "", 108, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD
| ES_UPPERCASE | ES_MULTILINE, 86, 219, 50, 24
    CONTROL "&Datum:",922,"static",SS_LEFT,190,221,80,22
    CONTROL "", 109, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD
| ES_MULTILINE, 242, 219, 70, 24
    CONTROL "&Kontakt:",923,"static",SS_LEFT,340,221,80,22
    COMBOBOX "",110,395,219,125,144, CBS_DROPDOWNLIST | WS_TABSTOP
  ENDDIALOG

  DLG FILL 10,RGB(192,192,192)

  FOR i& = 0 TO 6    // Fill Combolist
    ~SendMessage(DLGITEM(10,110),CB_ADDSTRING,0,kontakt$(i&))
  NEXT i&

  SHOWDIALOG #10

  ~SendMessage(DLGITEM(10,110),CB_SETCURSEL,3,0)   // Set 3rd Value of
Combolist !

  quit& = 0
  DO
    GETEVENT

    chosen& = SendMessage(DLGITEM(10,110),CB_GETCURSEL,0,0)     //
What's up ????
    _WIN$(DLGITEM(10,999)) = ">> " + STR$(chosen&) + " <<"

    SELECT _Mess

    CASE WM_SYSCOMMAND
      IF _wParam = SC_CLOSE THEN quit& = 1

    CASE WM_SYSKEYDOWN
      IF _wParam = 115 THEN quit& = 1   // Alt-F4

    CASE WM_KEYDOWN

    CASE WM_COMMAND
      SELECT _wParam
      CASE IDOK,IDCANCEL
        quit& = 1
      ENDSELECT
    ENDSELECT

  LOOP UNTIL quit&

  CLOSEDIALOG #10

RETURN
> PROCEDURE o
  ' Version 1.1
  ' 25.7.98, 19:59
  ' (c) Michael Vogel
RETURN
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:49 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z12JK-00NC2AC>; Tue, 28 Jul 1998 07:28:30 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA25484;
	Tue, 28 Jul 1998 07:39:23 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BFB1A9C; Mon, 27 Jul 1998 06:26:51 +0000 (???)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BC1DAB.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 28 Jul 1998 07:29:22 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Problems with Dialog-Button-Focus !
X-UIDL: bcb55975407ee18735154f533cda5518

Who can help me ?

I'd try to enable and disable buttons ("<" and ">" in the example)
depending of availability. This works in general, but sometimes I get a
black rectangle (like default buttons) around these two buttons - Who
can help ?

Try the "<" and ">" buttons forward and back in the example below and
look at these buttons...

dialog
PROCEDURE dialog
  canz& = 5
  csub& = 1
  DIALOG #10,30,16,580,450,"Schoeller Network Design Mystery
Database",WS_SYSMENU | DS_MODALFRAME,16,"Helv"
    CONTROL "1 von 1",120,"static",SS_RIGHT,220,295,125,15
    CONTROL "  &-  ",11,"button",$10010000,110,385,50,28
    CONTROL "  &+  ",12,"button",$10010000,170,385,50,28
    CONTROL "  &<  ",13,"button",$10010000,250,385,50,28
   CONTROL "  &>  ",14,"button",$10010000,310,385,50,28
  ENDDIALOG

  DLG FILL 10,RGB(192,192,192)
  updatedialog(1)
  SHOWDIALOG #10

  quit& = 0
  DO
    GETEVENT

    SELECT _Mess

    CASE WM_SYSKEYDOWN
      IF _wParam = 115 THEN quit& = 1   // Alt-F4

    CASE WM_COMMAND
      SELECT _wParam
      CASE 13
        IF csub& > 1
          csub& --
          updatedialog(0)
        ENDIF
      CASE 14
        IF csub& < canz&
          csub& ++
          updatedialog(0)
        ENDIF

      ENDSELECT
    ENDSELECT

  LOOP UNTIL quit&

  CLOSEDIALOG #10
RETURN
PROCEDURE updatedialog(dummy&)
  _WIN$(DLGITEM(10,120)) = STR$(csub&) + " von (of) " + STR$(canz&)
  '
  IF canz& = 1
    ~EnableWindow(DLGITEM(10,13),FALSE)
    ~EnableWindow(DLGITEM(10,14),FALSE)
  ELSE
    i& = GetFocus()
    IF csub& = 1
      IF i& = DLGITEM(10,13) THEN i& = DLG(10,14)
      ~EnableWindow(DLGITEM(10,13),FALSE)
    ELSE
      ~EnableWindow(DLGITEM(10,13),TRUE)
    ENDIF
    IF csub& = canz& // aber canz& > 1
      IF i& = DLGITEM(10,14)
        i& = DLGITEM(10,13)
        BEEP
      ENDIF
      ~EnableWindow(DLGITEM(10,14),FALSE)
    ELSE
      ~EnableWindow(DLGITEM(10,14),TRUE)
    ENDIF
    ~SetFocus(i&)
  ENDIF
RETURN
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:50 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z137J-00NDACC>; Tue, 28 Jul 1998 08:20:09 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA25811;
	Tue, 28 Jul 1998 08:31:06 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BF052A0; Mon, 27 Jul 1998 07:18:26 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BC29C2.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc03.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980728061937.EDOU24628@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 28 Jul 1998 06:19:37 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 28 Jul 1998 06:19:37 +0000
Subject: [GFA] ref: combobox situation   2807zz1-
X-UIDL: b74cb54f1587ec2bf761ccbb3f74654a

28/07/98 1:15:57 AM   ref: combobox situation   2807zz1-

Vogel Michael <vo@schoeller.at>

Dean Hodgson  dhodgson@nexus.edu.au

Gentlemen, thank you.  Somewhat similar approaches, not exactly what I 
was looking for but quite serviceable.  I am probably guilty of making 
an error in understanding what I think I see in the manual & helpfile.

I appreciate your time & effort - my problem is resolved.  I was 
getting _nothing_ altho attempting something *like* both responses.  I 
still have a lot to learn but I have good instructors.  Thank you!

<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:51 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z13KZ-00ND5HC>; Tue, 28 Jul 1998 08:33:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id IAA25948;
	Tue, 28 Jul 1998 08:44:45 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BF3CC0B; Mon, 27 Jul 1998 07:31:59 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BC2CEF.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc02.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980728063310.UMSZ28282@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 28 Jul 1998 06:33:10 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 28 Jul 1998 06:33:10 +0000
Subject: [GFA] Dialog-Button-Focus   2807MV1-
X-UIDL: e7049b049b8b8a8c8333251c75e11036

28/07/98 1:27:59 AM   Dialog-Button-Focus   2807MV1-

From: Vogel Michael <vo@schoeller.at>
To: gfabasic@aachen.linux.de
Date: Tue, 28 Jul 1998 07:29:22 +0200
Subject: [GFA] Problems with Dialog-Button-Focus !

Who can help me ?

I'd try to enable and disable buttons ("<" and ">" in the example)
depending of availability. This works in general, but sometimes I get a
black rectangle (like default buttons) around these two buttons - Who
can help ?

Try the "<" and ">" buttons forward and back in the example below and
look at these buttons...

+++++++++++++++
Michael
Hate to be a party pooper (spoil-sport), but your buttons function 
exactly as I would expect.  It took a moment to realize that I could 
incr/decr more than one, but when they max out or min out, they go 
unresponsive & the other one must be used to "move".  I get no 
"default" rectangle unless you mean the dashed-line rectangle inside 
the button that is active.

Very clever, Sir.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 13:22:53 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z13b9-00NCmiC>; Tue, 28 Jul 1998 08:50:59 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id JAA26124;
	Tue, 28 Jul 1998 09:01:53 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BF6B88D; Mon, 27 Jul 1998 07:49:02 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BC30EE.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980728065014.UPEK28282@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 28 Jul 1998 06:50:14 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 28 Jul 1998 06:50:14 +0000
Subject: [GFA] re: prfntdc.gfw   2807zz2-
X-UIDL: 925ce205fc0fdfc613ee238b9c16febe

28/07/98 1:49:16 AM   re: prfntdc.gfw   2807zz2-

// Prfntdc.gfw      Written 2-9-93 by Craig Randall

Is Craig still active?  Would really like to talk w/ him about 
prfntdc.gfw.

Thanks
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jul 28 19:44:20 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z1BCN-00NDEiC>; Tue, 28 Jul 1998 16:57:55 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA30039;
	Tue, 28 Jul 1998 17:08:16 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571BF3C9D9; Mon, 27 Jul 1998 15:54:46 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BCA2C6.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 28 Jul 1998 07:55:13 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <35BBFC55.BeroList-2.5.7@aachen.linux.de>
Subject: RE: [GFA] req for help   2707zz1-
X-UIDL: 76571a954a007366cf5833736d721e5b

Hi Dean,
Could I have a copy? Send to:
adbryant@gfa.net


> -----Original Message-----
> From: Dean Hodgson [mailto:dhodgson@nexus.edu.au]
> Sent: Monday, July 27, 1998 8:03 PM
> To: gfabasic@aachen.linux.de
> Subject: Re: [GFA] req for help 2707zz1-
> 
> 
> Tom Record wrote:
> > 
> > 27/07/98 10:42:11 AM   req for help   2707zz1-
> > 
> > I keep seeing that I can get text to show up in a combobox window
> > *before* it is activated or opened.  I see these all the time in
> > dialogs & this has been the only time I can do it but it's automatic,
> > not something I coded in.
> > 
> > Can somebody tell me how it's done - how is the EDITTEXT put in place?
> > 
> > A COMBOBOX is a combination of a LISTBOX with a static text field or
> > with an EDITTEXT element. If the COMBOBOX contains a static text
> > field, the selected entry from the LISTBOX is shown in it. Additional
> > style elements for COMBOBOXes are WS_TABSTOP, WS_GROUP, WS_VSCROLL and
> > WS_DISABLED.
> > 
> > CONTROL         text$,ID&,class$,style&,x&,y&,w&,h&,
> > 
> > CONTROL creates a program defined control window with width w& and
> > height h& at coordinates specified in x& and y&. The window shows the
> > text specified in text$ and can be referred to with the value
> > specified in ID&.  class$ specifies the class of the control elements
> > which the control window can assign. The following strings are
> > predefined:
> > 
> > COMBOBOX
> > 
> > Help is always appreciated.
> > <G>
> > TomR.
> > 
> 
> Hello, Tom.
> I may have something for you. I'll post it to you directly.
> Basically, you can put the text in via several methods, depending on
> which is best for what you're doing:
> 
> 1. Put the text straight in using the SetWindowText API call
> (Setcontents in my library). In this case the text may or may not
> reflect what is in the list.
> 
> 2. Put it in via the CB_SELECTSTRING message, thus choosing text from
> the list.
> 
> 3. Put it in by identifying something in the list by its index then
> using method 1.
> 
> I'll send you an example.
> 
> ------------------------------------------------------------------
> ---------
> Dean Hodgson
> The Book Mark Project -- School Library Automation Software
> Department of Education, Training and Employment  Adelaide, South
> Australia
> email to:  dhodgson@nexus.edu.au
> website:   http://www.nexus.edu.au/bookmark/
> phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
> ------------------------------------------------------------------
> ---------
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jul 29 13:10:36 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z1JJo-00NDAJC>; Wed, 29 Jul 1998 01:38:08 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id BAA01918;
	Wed, 29 Jul 1998 01:48:28 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C679033; Tue, 28 Jul 1998 00:32:18 +0000 (???)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BD1C12.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 29 Jul 1998 09:02:51 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35BC1DAB.BeroList-2.5.7@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Problems with Dialog-Button-Focus !
X-UIDL: 1a42c041df1ad5ece26ea4b64c3f316a

Vogel Michael wrote:
> 
> Who can help me ?
> 
> I'd try to enable and disable buttons ("<" and ">" in the example)
> depending of availability. This works in general, but sometimes I get a
> black rectangle (like default buttons) around these two buttons - Who
> can help ?
> 

I tried this and see exactly what you mean but like you I cannot figure
out why it is happening.

 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 31 00:09:22 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z1ZrQ-00NDEjC>; Wed, 29 Jul 1998 19:17:56 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id TAA16979;
	Wed, 29 Jul 1998 19:28:41 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6DDAA7; Tue, 28 Jul 1998 18:10:29 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BE1416.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 29 Jul 1998 10:13:29 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Proper
X-UIDL: 7fb9c0b85edce7ff4ef73f7563b06e95

Is it correct to say
Text is in 'German'
or 
Text is in'Deutsch'?

dale



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 31 00:09:31 1998
Return-Path: <abarbosa@jnoticias.pt>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z1pMd-00NDEuC>; Thu, 30 Jul 1998 11:51:11 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA31441;
	Thu, 30 Jul 1998 12:02:03 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6DC6F0; Wed, 29 Jul 1998 10:44:56 +0000 (???)
From: "ANTONIO BARBOSA" <abarbosa@jnoticias.pt>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BEFD29.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 30 Jul 1998 10:08:08
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject:  [GFA] Problems with Dialog-Button-Focus !
X-UIDL: 9aa2646799f52c70696a713b85b8cfcf

VOGEL MICHAEL Wrote:

> I'd try to enable and disable buttons ("<" and ">" in the example)
> depending of availability. This works in general, but sometimes I get a
> black rectangle (like default buttons) around these two buttons - Who
> can help ?

Why dont You use OWNERDRAW Button Style? They are nice and they don't have the  those problems.

    For that, instead of using:
    CONTROL "  &<  ",13,"button",$10010000,250,385,50,28
    You should use: 
    PUSHBUTTON "S  &<  ",10, 250,385,50,28,BS_OWNERDRAW

Notice the "S" at the beginning of Text field.

I hope to be helpfull.

-------------------------------------------------------------------
Antonio Barbosa                   - Emp. do Jornal de Noticias S.A.
Rua de Goncalo Cristovao, 195               telef.:   351-2-2096199
4000 Porto - Portugal                       fax.:     351-2-2096108
                                       email: abarbosa@jnoticias.pt
-------------------------------------------------------------------


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 31 00:09:33 1998
Return-Path: <ch.pelz@uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z1qJM-00NDEuC>; Thu, 30 Jul 1998 12:51:52 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA31912;
	Thu, 30 Jul 1998 13:03:31 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C68F5AD; Wed, 29 Jul 1998 11:45:26 +0000 (???)
From: Christian Pelz <ch.pelz@uni-bonn.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BF0B56.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Thu, 30 Jul 98 12:48:50 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Thu, 30 Jul 1998 12:41:58 +0200
In-Reply-To: <35BE1416.BeroList-2.5.7@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: ch.pelz@IBM.rhrz.uni-bonn.de
Subject: Re: [GFA] Proper
X-UIDL: b77d35915e67c6dd96b772e04333c190

Dale,

>Is it correct to say
>Text is in 'German'
>or
>Text is in'Deutsch'?
>
>dale
>
I'm not sure I understand your question. Is the sentence supposed to be
English or German? In German, you'd have to write "Text ist in 'Deutsch'".

Christian


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jul 31 00:09:38 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z1udk-00NDFKC>; Thu, 30 Jul 1998 17:29:12 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA01601;
	Thu, 30 Jul 1998 17:41:06 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C664800; Wed, 29 Jul 1998 16:24:12 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35BF4CAC.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 30 Jul 1998 08:26:55 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <35BF0B56.BeroList-2.5.7@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: RE: [GFA] Proper
X-UIDL: 2542718d74335f29c711cc7488917877

Hi Christian,
Thanks. That is exactly what I wanted to know.
Dale Bryant

> -----Original Message-----
> From: ch.pelz@IBM.rhrz.uni-bonn.de
> [mailto:ch.pelz@IBM.rhrz.uni-bonn.de]On Behalf Of Christian Pelz
> Sent: Thursday, July 30, 1998 3:42 AM
> To: gfabasic@aachen.linux.de
> Subject: Re: [GFA] Proper
>
>
> Dale,
>
> >Is it correct to say
> >Text is in 'German'
> >or
> >Text is in'Deutsch'?
> >
> >dale
> >
> I'm not sure I understand your question. Is the sentence supposed to be
> English or German? In German, you'd have to write "Text ist in 'Deutsch'".
>
> Christian
>
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
>



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 03 12:09:39 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z2Wgp-00NCmVC>; Sat, 1 Aug 1998 10:06:55 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA00563;
	Sat, 1 Aug 1998 10:19:47 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C620B24; Fri, 31 Jul 1998 09:01:14 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C187DA.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 1 Aug 1998 04:03:59 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Get 32-bit Info
X-UIDL: b3f1276061a162b5f29fd811eb4547cf


The following represents a procedure I've used to get SECTOR data
on 12-bit & 16-bit systems. I've tried the new INTR $21,$7305 that
is suppose to work with these & 32-bit but I must have did something
wrong -- I totally locked everthing up. Any help would be deeply
appreciated.

PROCEDURE get_data(xsec,numsec)
  buf$ = SPACE$(numsec * $200)
  IF dsk < 3
    _DS = HIWORD(V:buf$)
    _BX = LOWORD(V:buf$)
    ~INTR($25,_AH = 2,_AL = dsk - 1,_CX = numsec,_DX = xsec)
  ELSE
    temp$ = SPACE$(10)
    adr = V:temp$
    LONG{adr} = xsec
    WORD{adr + 4} = numsec
    LONG{adr + 6} = V:buf$
    _DS = HIWORD(V:temp$)
    _BX = LOWORD(V:temp$)
    ~INTR($25,_AL = dsk - 1,_CX = $FFFF,_DX = xsec)
  ENDIF
  flg! = TRUE
  IF ODD(_FL)
    DEFMOUSE 0
    CLS ltgray&
    BEEP
    @get_error_code
    mess$ = title$ + "||" + mess$ + " ..."
    ALERT 3,mess$,1,"&Abort",j
    flg! = FALSE
  ENDIF
RETURN

                                               -->Bev<--


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 03 12:09:41 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z2ndK-00ND5jC>; Sun, 2 Aug 1998 04:12:26 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id EAA06470;
	Sun, 2 Aug 1998 04:26:03 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C66D9F9; Sat, 01 Aug 1998 03:08:14 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C2869E.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc02.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980802021127.WAP11071@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Sun, 2 Aug 1998 02:11:27 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 2 Aug 1998 02:11:27 +0000
Subject: [GFA] Help, Please   0108xx1-
X-UIDL: 47c84220f227413c2f4bd66a2d25d9b8

01/08/98 9:10:08 PM   Help, Please   0108xx1-

''''  testbed.lst
TITLEW #1, " Testbed"
OPENW #1, 0,0,300,200,48
? "           <any key> closes me"
'
'
dc& = PrinterDC()
'
c& = GETDEVCAPS(TECHNOLOGY)
? c&

PRINT GETDEVCAPS(LOGPIXELSX)
PRINT GETDEVCAPS(LOGPIXELSY)
'
KEYGET k%
CLOSEW #1
END

This will get screen resolution only... Please - how do I get the 
printer's resolution?  Any alteration to the above bombs & I don't see 
my answer even listed in Programmer's Guide 2.

Thanks
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 03 12:09:42 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z2pAP-00NCmVC>; Sun, 2 Aug 1998 05:50:41 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id GAA06916;
	Sun, 2 Aug 1998 06:04:10 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6ED561; Sat, 01 Aug 1998 04:46:23 +0000 (???)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C29DA0.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 1 Aug 1998 23:49:05 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <35C2869E.BeroList-2.5.7@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: RE: [GFA] Help, Please   0108xx1-
X-UIDL: 20dcfdc25c21dc83d9e18cf74daa948a

Hi Tom:

Do you still have the copy of SysInfo I sent you; you know the one -- it had
the probs with the damn POPUPs when compiled (if not, let me know & I'll
send it) again. Run it & click on INFO (2nd button) & Printer (you'll get
the infamous POPUP giving you some choices -- I think you'll want
RESOLUTION). In the program, look for GET_RES & go from there; it's a little
convoluted because the routines are use for both the MONITOR & the PRINTER.

Enjoy <g>!

                                               -->Bev<--

> -----Original Message-----
> From: Tom Record [mailto:tiger.genealogical.rescue@worldnet.att.net]
> Sent: August 1, 1998 10:11 PM
> To: gfabasic@aachen.linux.de
> Subject: [GFA] Help, Please 0108xx1-
>
>
> 01/08/98 9:10:08 PM   Help, Please   0108xx1-
>
> ''''  testbed.lst
> TITLEW #1, " Testbed"
> OPENW #1, 0,0,300,200,48
> ? "           <any key> closes me"
> '
> '
> dc& = PrinterDC()
> '
> c& = GETDEVCAPS(TECHNOLOGY)
> ? c&
>
> PRINT GETDEVCAPS(LOGPIXELSX)
> PRINT GETDEVCAPS(LOGPIXELSY)
> '
> KEYGET k%
> CLOSEW #1
> END
>
> This will get screen resolution only... Please - how do I get the
> printer's resolution?  Any alteration to the above bombs & I don't see
> my answer even listed in Programmer's Guide 2.
>
> Thanks
> <G>
> TomR.
>
>
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 03 12:09:46 1998
Return-Path: <PeterGam@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z31A7-00ND6BC>; Sun, 2 Aug 1998 18:39:11 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA19660;
	Sun, 2 Aug 1998 18:52:57 +0200
From: PeterGam@compuserve.com
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6429BD; Sat, 01 Aug 1998 17:33:45 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C35179.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 2 Aug 1998 12:36:39 -0400
Sender: PeterGam@compuserve.com
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Help, Please   0108xx1-
X-UIDL: 396f62f3fdee4b07f0791bc16bca41f7

Hi

This should give you the resolution of the printer

//d& is the PrinterDC.

 DLG PRINT 1,0,d&
IF d&
    x% = GetDeviceCaps(d&,HORZRES)
    y% = GetDeviceCaps(d&,VERTRES)
PRINT x%,y%
ENDIF

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 03 12:09:47 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z33pF-00ND8VC>; Sun, 2 Aug 1998 21:29:49 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id VAA20751;
	Sun, 2 Aug 1998 21:43:27 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C666F04; Sat, 01 Aug 1998 20:24:55 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C37997.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sun, 2 Aug 1998 12:27:18 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] EMAIL ADDRESS
X-UIDL: 80c556a3ec1c888404a6c988f4e18d28

Hello all,
I am looking for a current email address for Harald Bonsel who programmed
waveutil that Roland Walter has on his site for download.
Ant help appreciated.
Dale Bryant


http://www.gfa.net/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 03 12:09:50 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z34fs-00ND8VC>; Sun, 2 Aug 1998 22:24:12 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA21216;
	Sun, 2 Aug 1998 22:38:00 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6BB447; Sat, 01 Aug 1998 21:19:39 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C3866B.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc03.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980802202247.PUYR16502@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Sun, 2 Aug 1998 20:22:47 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 2 Aug 1998 20:22:47 +0000
Subject: Re: [GFA] Help, Please   0108xx1-
X-UIDL: 48a7f290833b6825c02095587763eaa5

Peter
Thank you for the response.  I have a problem with terminology, but have
resolved the situation.  I was looking for dpi of the printer & kept
getting the screen.  I tried various things that didn't work before I
got the same response from Bev Brown as from you.  As usual, it made me
do a little more thinking & playing.  It turned out that I had the right 
statements, but one was in the wrong place & was of no use.  I was going
the wrong direction.

    d& = PrinterDC
    x% = GetDeviceCaps(d&,LOGPIXELSX)
    y% = GetDeviceCaps(d&,LOGPIXELSY)

The above is what I was trying to do... out of order, so it wasn't being
allowed.  It just won't allow one to use a DC without getting the DC first!

Thank you again.
<G>
TomR.


At 12:36 PM 02/08/98 -0400, Peter wrote:
>Hi
>
>This should give you the resolution of the printer
>
>//d& = PrinterDC.
>
> DLG PRINT 1,0,d&
>IF d&
>    x% = GetDeviceCaps(d&,HORZRES)
>    y% = GetDeviceCaps(d&,VERTRES)
>PRINT x%,y%
>ENDIF
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 03 12:10:02 1998
Return-Path: <Hannu.Pohjanheimo@phys.jyu.fi>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3DC5-00NCqfC>; Mon, 3 Aug 1998 07:30:01 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id HAA31876;
	Mon, 3 Aug 1998 07:43:21 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6A7297; Sun, 02 Aug 1998 06:24:54 +0000 (???)
From: Hannu Pohjanheimo <Hannu.Pohjanheimo@phys.jyu.fi>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C40636.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
 (Rockliffe SMTPRA 2.1.6) with ESMTP id <B0000039893@asterix.phys.jyu.fi> for <gfabasic@linux.net.eu.org>;
 Mon, 03 Aug 1998 08:27:10 +0300
Date: Mon, 03 Aug 1998 08:27:19 +0300
X-Mailer: Mozilla 4.04 [en] (WinNT; I)
MIME-Version: 1.0
References: <35C2869E.BeroList-2.5.7@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Subject: Re: [GFA] Help, Please   0108xx1-

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id HAA31876
X-UIDL: 0f990e8128a3ded463446a722269e3e5

You can get the resolution without the printer dialog. You should first
set the DC to printer in your code.

openw #1
cx&= GETDEVCAPS(LOGPIXELSX)  // get screen resolution
cy&= GETDEVCAPS(LOGPIXELSY)
dc&=_DC(1)                   // save current DC
pdc&=PrinterDC()             // get printer DC
SETDC pdc&                   // set to printer
px&= GETDEVCAPS(LOGPIXELSX)  // get printer resolution
py&= GETDEVCAPS(LOGPIXELSY)
SETDC dc&                    // restore to screen DC
closew #1

This is not tested becouse I dontt have GFA here, but it should work.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 03 12:10:03 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3Fvo-00ND8dC>; Mon, 3 Aug 1998 10:25:24 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id KAA32656;
	Mon, 3 Aug 1998 10:39:19 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6A5C69; Sun, 02 Aug 1998 09:20:49 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C42F71.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc01.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980803082400.HJYN6337@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Mon, 3 Aug 1998 08:24:00 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 3 Aug 1998 08:24:00 +0000
Subject: [GFA] Mercy   0308zz1-
X-UIDL: 7171d778464fab2bdbbe92d74def1972

03/08/98 3:12:38 AM   Mercy   0308zz1-

Is there no easy way to get more than 32K into any text editor in 
GFA-W?  I have tried multiple strings (1 per line) but all I get is 
locked out & have to reboot because the caption bar doesn't respond.

I have need of *looking* at files of up to 2M.  I can write more to a 
listbox - up to 32,000 lines, but all forms of textedit seem to have a 
severely fixed limit of 32K charactors.  A lostbox or combobox don't 
seem quite what I need (editing at the charactor or word level, not 
the whole line) but I am at a loss.

All help I receive is greatly appreciated.

<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:27 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3RCV-00NDFJC>; Mon, 3 Aug 1998 22:27:23 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242] (may be forged))
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA05706;
	Mon, 3 Aug 1998 22:41:26 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6C33E4; Sun, 02 Aug 1998 21:19:15 +0000 (???)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C4D7D3.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 02 Aug 1998 21:19:09 +0000 (???)
Subject: Re: [GFA] Help, Please   0108xx1-
X-UIDL: 6fdd2d583772d26c43b27be66c280406

From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>


Tom,

your listing will work with some slight modifications:

' 01/08/98 9:10:08 PM   Help, Please   0108xx1-

''''  testbed.lst
TITLEW #1, " Testbed"
OPENW #1, 0,0,300,200,48
? "           <any key> closes me"
'
'
dc& = PrinterDC()
SETDC dc& /* IMPORTANT
'
c& = GETDEVCAPS(TECHNOLOGY)

SX% = GETDEVCAPS(LOGPIXELSX) 
SY% = GETDEVCAPS(LOGPIXELSY)
SETDC _DC(1)
? c&
PRINT SX%
PRINT SY%
'
FREEDC dc& /* IMPORTANT
KEYGET k%
CLOSEW #1
END

>This will get screen resolution only... Please - how do I get the 
>printer's resolution?  Any alteration to the above bombs & I don't see 
>my answer even listed in Programmer's Guide 2.

The dc&=PrinterDC() line will get a new DC for printing only, but will
not activate it. You first have to set it explicitely using SETDC.
GETDEVCAPS uses the current DC to return results. If you do not use
SETDC dc&, GETDEVCAPS uses the DC of Window #1, and returns the screen
resolution.
Do not forget to release the DC handle with FREEDC after a SETDC to
avoid lack of memory.
Before printing the results to the screen, you have to re-activate
the Windows' DC; otherwise PRINT tries to print on the printer dc and
you will see nothing.

Sincerely

Sven Thomas
GFA Support


+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:29 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3RFH-00NDFJC>; Mon, 3 Aug 1998 22:30:15 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242] (may be forged))
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id WAA05806;
	Mon, 3 Aug 1998 22:44:30 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C74F7BB; Sun, 02 Aug 1998 21:24:02 +0000 (???)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C4D8F2.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 02 Aug 1998 21:23:57 +0000 (???)
Subject: Re: [GFA] Mercy   0308zz1-
X-UIDL: f895fd9652d52940429df3a41e79f66d

From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>

Tom,

>Is there no easy way to get more than 32K into any text editor in 
>GFA-W?  I have tried multiple strings (1 per line) but all I get is 
>locked out & have to reboot because the caption bar doesn't respond.

no, this is a Windows limitation. An editbox is limited up to a segment's
size (16 Bit), this is a maximum of 64 KB, with some dirty tricks, normally
32 KB only.
2 MB is impossible at all. The new RTF control in Win95 and up can handle
files limited to the computer's memory.
You can write your own viewer in a normal window with scrollbars etc, but
this will result in some more work, because you have to repaint it, handle
scrollbars etc.


Sincerely

Sven Thomas
GFA Support


+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:30 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3VLp-00NDFNC>; Tue, 4 Aug 1998 02:53:17 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242] (may be forged))
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA07626;
	Tue, 4 Aug 1998 03:00:56 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C7CA61F; Mon, 03 Aug 1998 01:39:43 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C514E0.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc01.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980804004251.UAJD6337@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 4 Aug 1998 00:42:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 4 Aug 1998 00:42:51 +0000
Subject: Re: [GFA] Mercy   0308zz1-
X-UIDL: a9f2e0753d81b02dbe1213eba8b92691

Sven
Yuck!
Thank you.  I'll stop bashing my head against the rough brick wall.
<G>
TomR.


At 09:23 PM 02/08/98 +0000, you wrote:
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>
>Tom,
>
>>Is there no easy way to get more than 32K into any text editor in 
>>GFA-W?  I have tried multiple strings (1 per line) but all I get is 
>>locked out & have to reboot because the caption bar doesn't respond.
>
>no, this is a Windows limitation. An editbox is limited up to a segment's
>size (16 Bit), this is a maximum of 64 KB, with some dirty tricks, normally
>32 KB only.
>2 MB is impossible at all. The new RTF control in Win95 and up can handle
>files limited to the computer's memory.
>You can write your own viewer in a normal window with scrollbars etc, but
>this will result in some more work, because you have to repaint it, handle
>scrollbars etc.
>
>
>Sincerely
>
>Sven Thomas
>GFA Support
>
>
>+++ How to contact GFA +++
>FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
>WWW: http://ourworld.compuserve.com/homepages/gfasoft
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:32 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3VPH-00NCmVC>; Tue, 4 Aug 1998 02:56:51 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242] (may be forged))
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA07629;
	Tue, 4 Aug 1998 03:00:56 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6EC14E; Mon, 03 Aug 1998 01:39:38 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C514DE.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc01.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980804004245.UAIH6337@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 4 Aug 1998 00:42:45 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 4 Aug 1998 00:42:45 +0000
Subject: Re: [GFA] Help, Please   0108xx1-
X-UIDL: f0f5162b5629ca4855f487cd6ca4f7f8

Sven
I got away without setDC(), etc., but I appreciate your outline of
the proper protocol.  When done by the rules, it should run on just
about any Windows PC just the way I intend.

Thank you very much.
<G>
TomR.


At 09:19 PM 02/08/98 +0000, you wrote:
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>
>
>Tom,
>
>your listing will work with some slight modifications:
>
>' 01/08/98 9:10:08 PM   Help, Please   0108xx1-
>
>''''  testbed.lst
>TITLEW #1, " Testbed"
>OPENW #1, 0,0,300,200,48
>? "           <any key> closes me"
>'
>'
>dc& = PrinterDC()
>SETDC dc& /* IMPORTANT
>'
>c& = GETDEVCAPS(TECHNOLOGY)
>
>SX% = GETDEVCAPS(LOGPIXELSX) 
>SY% = GETDEVCAPS(LOGPIXELSY)
>SETDC _DC(1)
>? c&
>PRINT SX%
>PRINT SY%
>'
>FREEDC dc& /* IMPORTANT
>KEYGET k%
>CLOSEW #1
>END
>
>>This will get screen resolution only... Please - how do I get the 
>>printer's resolution?  Any alteration to the above bombs & I don't see 
>>my answer even listed in Programmer's Guide 2.
>
>The dc&=PrinterDC() line will get a new DC for printing only, but will
>not activate it. You first have to set it explicitely using SETDC.
>GETDEVCAPS uses the current DC to return results. If you do not use
>SETDC dc&, GETDEVCAPS uses the DC of Window #1, and returns the screen
>resolution.
>Do not forget to release the DC handle with FREEDC after a SETDC to
>avoid lack of memory.
>Before printing the results to the screen, you have to re-activate
>the Windows' DC; otherwise PRINT tries to print on the printer dc and
>you will see nothing.
>
>Sincerely
>
>Sven Thomas
>GFA Support
>
>
>+++ How to contact GFA +++
>FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
>WWW: http://ourworld.compuserve.com/homepages/gfasoft
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:34 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3VnM-00NDF6C>; Tue, 4 Aug 1998 03:21:44 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242] (may be forged))
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id DAA07897;
	Tue, 4 Aug 1998 03:36:15 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6669E0; Mon, 03 Aug 1998 02:15:09 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C51D2D.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc01.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980804011816.UQFL6337@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 4 Aug 1998 01:18:16 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 4 Aug 1998 01:18:16 +0000
Subject: re: [GFA] Help, Please   0108xx1-   0308xx1-
X-UIDL: aaa151b61a807e0f5592e52344da4890

03/08/98 8:08:54 PM   re: [GFA] Help, Please   0108xx1-   0308xx1-

''''  testbed.lst
TITLEW #1, " Testbed"
OPENW #1, 0,0,300,200,48
? "           <any key> closes me"
dc& = PrinterDC()
SETDC dc& /* IMPORTANT
c& = GETDEVCAPS(TECHNOLOGY)
SX% = GETDEVCAPS(LOGPIXELSX) 
SY% = GETDEVCAPS(LOGPIXELSY)
SETDC _DC(1)
? c&
PRINT SX%
PRINT SY%
FREEDC dc& /* IMPORTANT
KEYGET k%
CLOSEW #1
END

Sven
I understand more now what was happening to me.  I got the devcaps 
without SetDC() because I wasn't trying to print to it yet.

I realize now that in the original routine I was working with, the 
printer's resolution (LOGPIXELSX), was never requested but when I 
attempted to query the printer at the point in the routine where it 
was mentioned I was working w/ the window DC.

Everything else was in the proper order.

Thank you once more.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:38 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3fGA-00NDBpC>; Tue, 4 Aug 1998 13:28:06 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id NAA19462;
	Tue, 4 Aug 1998 13:41:55 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C677BAA; Mon, 03 Aug 1998 12:19:51 +0000 (???)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C5AAE7.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc02.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980804112250.JHFN3321@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 4 Aug 1998 11:22:50 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 4 Aug 1998 11:22:50 +0000
Subject: Re: [GFA] Mercy   0308zz1-/0408zz1-
X-UIDL: 33371b2ee374b3680bd0fc0f1b3b3cbe

04/08/98 6:06:53 AM   Re: [GFA] Mercy   0308zz1-/0408zz1-

Sven Thomas

From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Date: Sun, 02 Aug 1998 21:23:57 +0000 (???)
Subject: Re: [GFA] Mercy   0308zz1-

From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>

Tom,

>Is there no easy way to get more than 32K into any text editor in 
>GFA-W?  I have tried multiple strings (1 per line) but all I get is 
>locked out & have to reboot because the caption bar doesn't respond.

no, this is a Windows limitation. An editbox is limited up to a 
segment's size (16 Bit), this is a maximum of 64 KB, with some dirty 
tricks, normally 32 KB only.

2 MB is impossible at all. The new RTF control in Win95 and up can 
handle files limited to the computer's memory.

+++ This is restricted to Win95, not desireable.

You can write your own viewer in a normal window with scrollbars etc, 
but this will result in some more work, because you have to repaint 
it, handle scrollbars etc.

+++ If you would kindly send me, or point me to, an example I'll do
the extra work gladly.  I can get scrollbars, but I cannot make them
work at all.  John Findlay did some for me one time for a *.bmp app,
but I'm unable to extract what I need from that.  No example I find
is anywhere near what I'm trying to do & it's very frustrating.

I'm 60 yrs old & once had a good mind (I was on the NASA design team
for the Lunar Lander).  Now, I'm old, busted up & becoming feeble
minded, I think - I can't remember tiny details as is needed & GFA-W
is rife with tiny details... many of them are seemingly undocumented.

Thank you for taking time to assist me.
<G>
TomR.


Sincerely

Sven Thomas
GFA Support



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:40 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3jJr-00NDBhC>; Tue, 4 Aug 1998 17:48:11 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id SAA27605;
	Tue, 4 Aug 1998 18:02:25 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C63EDCD; Mon, 03 Aug 1998 16:39:53 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C5E7D9.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Tue, 4 Aug 1998 08:42:04 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] INTERNET
X-UIDL: a09774325eb9fbea8449bee63f5d4770

Joe Hurst sent me a very interesting file. If you want to call a web page
URL or send Email message from GFA BASIC you can find the application on the
web page below. Select the 'download free files' line and grab INTERNET.ZIP.
It's great.
Dale Bryant

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:43 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z3lDB-00NDEWC>; Tue, 4 Aug 1998 19:49:25 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id UAA29544;
	Tue, 4 Aug 1998 20:04:17 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C64FC12; Mon, 03 Aug 1998 18:44:57 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C60529.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 4 Aug 1998 10:45:58 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] THANKS
X-UIDL: a57f4a7eef9a8682d7db799ddb1128c7

 I would  like to express my deep appreciation to  GFA Systemtechnik GmbH
for their assistance in making this file available in numerous places on the
World Wide Web. The GFAWHELP file now has its own web page on the GFA.NET
hosting service.  Without the cooperation of GFA  this file would never have
obtained the wide distribution that it has reached. Also, thanks to Sven
Thomas of GFA who has been helpful in so many ways, especially for his help
in getting me started on GFA.NET.
Thanks GFA and Sven Thomas

 Dale Bryant


http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:45 1998
Return-Path: <ch.pelz@uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z40Ml-00NDBpC>; Wed, 5 Aug 1998 12:00:19 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id MAA11393;
	Wed, 5 Aug 1998 12:15:03 +0200
From: ch.pelz@uni-bonn.de
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6BB065; Tue, 04 Aug 1998 10:53:27 +0000 (???)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C6E827.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Wed, 05 Aug 98 11:56:29 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Wed, 05 Aug 1998 11:49:14 +0200
In-Reply-To: <35C4D8F2.BeroList-2.5.7@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: ch.pelz@IBM.rhrz.uni-bonn.de
Subject: [GFA] GFA API-Help-File
X-UIDL: f93a291dfb974aeff8466b4ad9e80bf5

Hi guys,

there is a very nice file on the ftp-sever of GFA
(http://ftp.bero-online.ml.org/pub/gfabasic/windows/documentation/api-help/a
pi16.hlp) that documents quite some API-Functions, Window- and
Control-Messages and that stuff (for all only-English-Speakers: it is
unfortunately in German). It comes as a Windows-Help-File, so it can be
viewed easily. I used to have it, before my hard-disk crashed. Now, (with a
new hard-disk) I downloaded it again, and Windows-Help doesn't recognize it
any more as a help file and complains. Does anybody know what happened to
the file, or where I can get it nowadays?

Thank you

Christian


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:57:48 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0z454s-00NDHPC>; Wed, 5 Aug 1998 17:02:10 +0200 (MEST)
Received: from TNG.linux.net.eu.org (microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with ESMTP id RAA02014;
	Wed, 5 Aug 1998 17:06:58 +0200
Received: from aachen.linux.de (microsoft.sucks.eu.org 198.22.51.242)
	by TNG.linux.net.eu.org (VMailer) via SMTP
	id 571C6ED9A4; Tue, 04 Aug 1998 15:54:46 +0000 (???)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C72EC7.BeroList-2.5.7@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 5 Aug 1998 07:56:51 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] GFA API-Help-File
X-UIDL: b97f4818d1b24086357c94bdbd9ae4bd

Hi Christian,
I just downloaded it so it is still there. as you can see below. The pub
directory was not accessible for a day or so.  I don't know why.
Dale Bryant

http://ftp.bero-online.ml.org/pub/gfabasic/windows/documentation/api-help/
http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: ch.pelz@uni-bonn.de <ch.pelz@uni-bonn.de>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Wednesday, August 05, 1998 2:58 AM
Subject: [GFA] GFA API-Help-File


>Hi guys,
>
>there is a very nice file on the ftp-sever of GFA
>(http://ftp.bero-online.ml.org/pub/gfabasic/windows/documentation/api-help/
a
>pi16.hlp) that documents quite some API-Functions, Window- and
>Control-Messages and that stuff (for all only-English-Speakers: it is
>unfortunately in German). It comes as a Windows-Help-File, so it can be
>viewed easily. I used to have it, before my hard-disk crashed. Now, (with a
>new hard-disk) I downloaded it again, and Windows-Help doesn't recognize it
>any more as a help file and complains. Does anybody know what happened to
>the file, or where I can get it nowadays?
>
>Thank you
>
>Christian
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:04 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z4SJ6-00NEj4C>; Thu, 6 Aug 1998 17:50:24 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D4C89D067; Thu,  6 Aug 1998 18:57:44 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35C9E089.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 6 Aug 1998 08:49:01 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] THREE GUESSES
X-UIDL: 7fe8c474c75ec7934cf8df46cef06605

* List: gfabasic@aachen.linux.de

If you program in GFA BASIC on any platform
1. Would I like to have you name, city & country
2  Would I like to know your areas of interest
3. Would I like some personal information about you

If you would like to see others that have responded visit

http://www.gfa.net/adbryant/biogs.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:07 1998
Return-Path: <hherzog@student.uni-kl.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z4a6o-00NDGPC>; Fri, 7 Aug 1998 02:10:14 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A2AC7D068; Fri,  7 Aug 1998 03:17:47 +0200 (CEST)
From: "Holger Herzog [EI]" <hherzog@student.uni-kl.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CA55BB.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
           ( alma.student.uni-kl.de [131.246.90.25] ) by news.uni-kl.de
          id aa02724 for <gfabasic@linux.net.eu.org>; 6 Aug 98 23:55 MESZ
Date: Thu, 6 Aug 1998 23:54:47 +0200 (CETDST)
In-Reply-To: <35C9E089.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] THREE GUESSES
X-UIDL: 273b8e9aef68f9b4fa4b07197c24f2bd

* List: gfabasic@aachen.linux.de

On Thu, 6 Aug 1998, Dale Bryant wrote:

> * List: gfabasic@aachen.linux.de
> 
> If you program in GFA BASIC on any platform
> 1. Would I like to have you name, city & country
> 2  Would I like to know your areas of interest
> 3. Would I like some personal information about you
> 
> If you would like to see others that have responded visit

I'm the distributor for faceVALUE, an application-builder for GFA-Basic
for TOS-platforms.

Holger Herzog
Vorgartenstr. 9
D-66424 Homburg
Tel. +49 6841/994743
Fax. +49 6841/65338
eMail: hherzog@student.uni-kl.de (Internet, privat)
       Holger Herzog @ ZW (MausNet, privat)

Bye.

Holger


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:08 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z4bgM-00NBm0C>; Fri, 7 Aug 1998 03:51:02 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id F0590D069; Fri,  7 Aug 1998 04:58:30 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CA6D57.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 6 Aug 1998 18:49:49 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Biogs
X-UIDL: 8d187473543aaf1402e987467e8552b6

* List: gfabasic@aachen.linux.de

Holger sent me his biography. Who's next?

Holger Herzog
Vorgartenstr. 9
D-66424 Homburg


http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:10 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z4bkU-00NCmgC>; Fri, 7 Aug 1998 03:55:18 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E11A3D06A; Fri,  7 Aug 1998 05:02:51 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CA6E5C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 6 Aug 1998 18:54:11 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Fw: GFAWHELP problems
X-UIDL: 5304706267efc760430d03cb762b7a38

* List: gfabasic@aachen.linux.de

Is anyone else using the GFAWHELP help file on WFWG? If so, are you
experiencing problems?
Dale Bryant


http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: bill <bartolini@jps.net>
To: adbryant@email.msn.com <adbryant@email.msn.com>
Date: Thursday, August 06, 1998 12:04 PM
Subject: GFAWHELP problems


>Dale,
>
>I am running GFA in WFWG 3.11 trying to run your GFWHELP
>
>BWCC.DLL has been copied to C:\Windows\System
>all other dll's have been copied to C:\Windows
>when I execute GFWHELP.EXE I get a protection fault and loose the mouse
>if I execute GFWHELP.GFW I get a Peek/Poke error at this line
>  BITBLT bmpdc&,0,0,_X,_Y,_DC(hWndMain&),0,0,SRCCOPY
>Please let me know how to continue.
>
>Thanks
>Bill Bartolini
>bartolini@jps.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:11 1998
Return-Path: <linux@k5.sucks.eu.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z4bsk-00NDFaC>; Fri, 7 Aug 1998 04:03:50 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6B510D06B; Fri,  7 Aug 1998 05:11:23 +0200 (CEST)
From: Bernhard Rosenkraenzer <linux@microsoft.sucks.eu.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CA705B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 7 Aug 1998 03:01:49 +0200 (CEST)
X-Sender: linux@k6.bero
In-Reply-To: <35CA6E5C.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] Fw: GFAWHELP problems
X-UIDL: 677f97baba700ec7312dd497d2966b5c

* List: gfabasic@aachen.linux.de

On Thu, 6 Aug 1998, Dale Bryant wrote:

> Is anyone else using the GFAWHELP help file on WFWG? If so, are you
> experiencing problems?

I've used it in the wfwg emulation in Linux occasionally... without
problems.

LLaP
bero

-- 
Windows 98 supports real multitasking - it can boot and crash simultaneously.
***
Anyone sending unwanted advertising e-mail to this address will be charged
$25 for network traffic and computing time. By extracting my address from
this message or its header, you agree to these terms.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:12 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z4nrc-00NDKsC>; Fri, 7 Aug 1998 16:51:28 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8769ED06C; Fri,  7 Aug 1998 17:58:59 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CB2443.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 7 Aug 1998 07:50:18 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Fw: GFAWHELP problems
X-UIDL: 68c436e126e8938b59a1be9ecf61db80

* List: gfabasic@aachen.linux.de

Thanks, Bernhard
I received an email that it would not work on WGWG. I appreciate your
answering.
Dale

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: Bernhard Rosenkraenzer <linux@microsoft.sucks.eu.org>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Thursday, August 06, 1998 7:04 PM
Subject: Re: [GFA] Fw: GFAWHELP problems


>* List: gfabasic@aachen.linux.de
>
>On Thu, 6 Aug 1998, Dale Bryant wrote:
>
>> Is anyone else using the GFAWHELP help file on WFWG? If so, are you
>> experiencing problems?
>
>I've used it in the wfwg emulation in Linux occasionally... without
>problems.
>
>LLaP
>bero
>
>--
>Windows 98 supports real multitasking - it can boot and crash
simultaneously.
>***
>Anyone sending unwanted advertising e-mail to this address will be charged
>$25 for network traffic and computing time. By extracting my address from
>this message or its header, you agree to these terms.
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:18 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z4wly-00ND9WC>; Sat, 8 Aug 1998 02:22:14 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5F3D6D06B; Sat,  8 Aug 1998 03:29:47 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CBAA0B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 7 Aug 1998 17:20:47 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] EXE UTILITIES
X-UIDL: 492e7bff732946d130ad4dd522a5eb26

* List: gfabasic@aachen.linux.de

I am looking for small GFA demos for the GFAWHELP file. I am constructing a
page named Executables. These will be executed from the .HLP file.  Small
utilities such as Roland Walters' TEXTSRCH would be ideal. If you don't this
program get it from the GFAWHELP web site. I love it!
I would like the source code also if possible but just the exe would be
acceptable. Small utilities would be ideal..
Dale Bryant

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:19 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z50wz-00NDF4C>; Sat, 8 Aug 1998 06:49:53 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E6469D06D; Sat,  8 Aug 1998 07:57:28 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CBE8C9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 7 Aug 1998 17:14:34 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] INTR $21
X-UIDL: eb57ae60078817fee179b4cc844f3aa8

* List: gfabasic@aachen.linux.de

Received this from Bev Brown.

Sjouke or Bernhard, can you help?

Sure wish someone on Bero (Walter or Sjouke, for instance)
would answer my question about  how to use the new Interrupts,
especially INTR $21 $7305 (READ/write a sector on all drives,
including a 32-bit one)
                                                              --
http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:20 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z51Ic-00NBlgC>; Sat, 8 Aug 1998 07:12:14 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 823D8D06E; Sat,  8 Aug 1998 08:19:50 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CBEE06.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 7 Aug 1998 17:11:22 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] BIOGS
X-UIDL: ec28bb99bd9a1c644e591adf448541ef

* List: gfabasic@aachen.linux.de

I have one biography reply from an Atari GFA BASIC programmer. If you
program in GFA on the Atari and you would like to be listed on the GFAWHELP
GFA programmers biography page send me.
1. Your Name
2. Your city & country
3. Your main programming interest in GFA
4. Some personal facts if you desire.

Send to:
adbryant@gfa.net

PLEASE DO NOT SEND TO THE MAILING LIST!!
Dale Bryant

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Aug 08 14:58:22 1998
Return-Path: <t.maier@owl-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z57Fs-00NDH0C>; Sat, 8 Aug 1998 13:33:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7BD93D067; Sat,  8 Aug 1998 14:41:16 +0200 (CEST)
From: "Thomas Maier" <t.maier@owl-online.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CC4772.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 9 Aug 1998 13:34:26 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] I need Help !
X-UIDL: 98302add9fdb905d94d7decaefa0d2dd

* List: gfabasic@aachen.linux.de

Hi,

I need a Procedure to get the incoming Call number with Capi20.
I have tons of Information for Capi 2.0 but my English and "C" is not the
best.

I think i am not the first with this Problem.


DLL #1,"capi20.dll"
  DECL WORD CAPI_REGISTER(w,w,w,w,l) PASCAL GET
  DECL WORD CAPI_RELEASE(w) PASCAL GET
  DECL WORD CAPI_PUT_MESSAGE(w,l) PASCAL GET
  DECL WORD CAPI_GET_MESSAGE(w,l) PASCAL GET
  DECL WORD CAPI_SET_SIGNAL(w,l,w) PASCAL GET
  DECL WORD CAPI_GET_MANUFACTURER(l) PASCAL GET
  DECL WORD CAPI_GET_VERSION(l,l,l,l) PASCAL GET
  DECL WORD CAPI_GET_SERIAL_NUMBER(l) PASCAL GET
  DECL WORD CAPI_GET_PROFILE(l,w) PASCAL GET
  DECL WORD CAPI_INSTALLED() PASCAL GET
ENDDLL

OPENW #1,0,0,600,480,48
CLR ApplID&
fehler& = ^CAPI_REGISTER(2048,1,2,128,*ApplID&)
IF fehler& = 0
  buffer$ = SPACE$(2048)
  t& = 0
  DO
    GETEVENT
    fehler& = ^CAPI_GET_MESSAGE(ApplID&,*t&)
    if fehler&=0
    @Auswertung
    endif
    EXIT IF MENU(1) = 4 OR fehler& = 0
  LOOP
  fehler% = ^CAPI_RELEASE(ApplID&)
endif
FREEDLL 1
CLOSEW #1
EDIT

Procedure Auswertung
..
Return

This is my Example to start but, i dont no this is correct. I think the
Calling number come with
the D-Channel but how i can get this.

ciao Thomas







---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:14 1998
Return-Path: <c0028901@nwn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z5BCQ-00NDH9C>; Sat, 8 Aug 1998 17:46:30 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 22304D068; Sat,  8 Aug 1998 18:54:00 +0200 (CEST)
From: manfred fietkau <c0028901@nwn.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CC82A8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 08 Aug 1998 17:41:48 +0200
X-Mailer: Mozilla 3.01 [de] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] (Kein Bezug)
X-UIDL: 7c9d977f85b3747fd5cbc9321ff8146f

* List: gfabasic@aachen.linux.de

Hi,
I am an absolut beginner in programming for windows and cannot solve
this problem : the program starts doing some sort of graphic in a
subroutine returning to the main loop 
..
DO
SLEEP
UNTIL _Mess=WM_KEYDOWN
..
but the  graphic disappears and the screen turns to white.
There is no screen saver installed.
Can anybody tell me what happened?

Manfred Fietkau


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:18 1998
Return-Path: <linux@p.sucks.eu.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z5Qdk-00NDGPC>; Sun, 9 Aug 1998 10:15:44 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7D360D056; Sun,  9 Aug 1998 11:23:10 +0200 (CEST)
From: Bernhard Rosenkraenzer <linux@microsoft.sucks.eu.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CD6A7E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 8 Aug 1998 22:15:38 +0200 (CEST)
X-Sender: linux@k6.bero
In-Reply-To: <35CC82A8.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] (Kein Bezug)
X-UIDL: 44feb6e6726d353a5414feee719482e3

* List: gfabasic@aachen.linux.de

On Sat, 8 Aug 1998, manfred fietkau wrote:

> I am an absolut beginner in programming for windows and cannot solve
> this problem : the program starts doing some sort of graphic in a
> subroutine returning to the main loop 
> ..
> DO
> SLEEP
> UNTIL _Mess=WM_KEYDOWN
> ..
> but the  graphic disappears and the screen turns to white.

Very likely, this (SLEEP) is the first time you check for messages after
opening the window - in that case, you're probably getting some WM_PAINT
messages generated by OPENW.
Put

REPEAT
  PEEKEVENT
UNTIL _Mess=0

right after the OPENW command - that should fix it.

LLaP
bero

-- 
Windows 98 supports real multitasking - it can boot and crash simultaneously.
***
Anyone sending unwanted advertising e-mail to this address will be charged
$25 for network traffic and computing time. By extracting my address from
this message or its header, you agree to these terms.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:20 1998
Return-Path: <randywrenn@caro.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z5cFU-00NCqQC>; Sun, 9 Aug 1998 22:39:28 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0B6D1D058; Sun,  9 Aug 1998 23:46:52 +0200 (CEST)
From: "Randy Wrenn" <randywrenn@caro.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CE18CC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 9 Aug 1998 16:38:55 -0400
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Un-subscribe
X-UIDL: 0f848e8eae72d4752565cd785c580362

This is a multi-part message in MIME format.

------=_NextPart_000_0013_01BDC3B4.335E7580
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

From ???@??? Mon Aug 31 18:41:30 1998
Return-Path: <g.mazzotti@mbox.linknet.it>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z5mkP-00NDLeC>; Mon, 10 Aug 1998 09:52:05 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 29431D057; Mon, 10 Aug 1998 10:59:41 +0200 (CEST)
From: g.mazzotti@mbox.linknet.it
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CEB67D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-Sender: g.mazzotti@pop-ra.linknet.it
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Mon, 10 Aug 1998 10:01:02 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Un-subscribe
X-UIDL: 6f30dd24e5d1327e8ecc46ffd932d0a2

* List: gfabasic@aachen.linux.de




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:32 1998
Return-Path: <ch.pelz@uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z5qe7-00ND5TC>; Mon, 10 Aug 1998 14:01:51 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id ABB67D059; Mon, 10 Aug 1998 15:09:06 +0200 (CEST)
From: Christian Pelz <ch.pelz@uni-bonn.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CEF0F2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Mon, 10 Aug 98 14:01:24 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Mon, 10 Aug 1998 13:53:37 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: ch.pelz@IBM.rhrz.uni-bonn.de
Subject: Re: [GFA] (Kein Bezug)
X-UIDL: 6bbc212746b4c8f0b22ef37f6c43d1b1

* List: gfabasic@aachen.linux.de

At 17:41 08.08.1998 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi,
>I am an absolut beginner in programming for windows and cannot solve
>this problem : the program starts doing some sort of graphic in a
>subroutine returning to the main loop
>..
>DO
>SLEEP
>UNTIL _Mess=WM_KEYDOWN
>..
>but the  graphic disappears and the screen turns to white.
>There is no screen saver installed.
>Can anybody tell me what happened?
>
>Manfred Fietkau
>

Hi Manfred,

had the same problem when I started to programm in Windows. Windows gives
you nice windows, but it doesn't care for saving the contents of the window
for a redraw. So as soon as Windows sends a WM_PAINT-Message to the window,
it will be repainted with nice white, everything you've drawn is gone. 

I know of two ways to avoid this. For both, you need to catch the WM_PAINT
message: if menu(1)=21 then ... (or something equivalent with select ...
case etc).

1. After every redraw you completely start from scratch to paint the window
with you graphics or whatever. Guess that'll slow down your machine quite a
bit when your screens get more complicated.
2. You don't paint your graphics to the screen, but to a so-called
Memory-DC. That means, you create an identical Window somewhere else in the
memory of your PC, paint the stuff there, and when there is  WM_PAINT, you
just copy from the memory to the screen. You'll find a good example in the
GFA-Help (from the Help-Menu in the GFA-interpreter), look for the command
"MEMDC".

Hope you can make any sense of this

Christian




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:39 1998
Return-Path: <SIGNALSOFT@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z5uzz-00NDLJC>; Mon, 10 Aug 1998 18:40:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 52270D063; Mon, 10 Aug 1998 19:48:20 +0200 (CEST)
From: Richard Plokhaar <SIGNALSOFT@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CF3264.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 10 Aug 1998 12:40:20 -0400
Sender: Richard Plokhaar <SIGNALSOFT@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] un-subscribe
X-UIDL: 0ef1e70eb8b302278df072407f8e7b0e

* List: gfabasic@aachen.linux.de

un-subscribe

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:48 1998
Return-Path: <Hagen.Eckert@RSD.rsd.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z671x-00NDHHC>; Tue, 11 Aug 1998 07:31:33 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 41C16D064; Tue, 11 Aug 1998 08:39:12 +0200 (CEST)
From: Hagen.Eckert@RSD.rsd.de
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35CFE710.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
          via smtpd (for [198.22.51.242]) with SMTP; 11 Aug 1998 05:30:49 UT
X-Lotus-FromDomain: RSD@RUS
Date: Tue, 11 Aug 1998 07:31:07 +0200
Mime-Version: 1.0
Content-type: text/plain; charset=us-ascii
Content-Disposition: inline
Subject: [GFA] un-subscribe
X-UIDL: 167544373065ac10ebce99a064395383

* List: gfabasic@aachen.linux.de


un-subscribe






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:53 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z6Aza-00NDMHC>; Tue, 11 Aug 1998 11:45:22 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4A1D4D065; Tue, 11 Aug 1998 12:52:58 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D0228B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Tue, 11 Aug 1998 11:41:18 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] GFA-Problems ...
X-UIDL: 46ca43b621410716d9fe96b428dbec4e

* List: gfabasic@aachen.linux.de

Hi!

There are a few things which I can't solve in the GFA-Language and I need them 
for my projekt which has to run under Win 3.1(1), Win95/98 and perhaps NT4.

The main problem was to find a small an fast to load programm for 
word-processing which save the text in an easy to use format. This 
word-processing must have features like Fonts, left, right, center and block the 
written text and must have a textblock-function. So I decide to use the "good 
old" MS-Write, but this do not features textblocks.

So I decided to write a small programm that run as a small icon and has to wait 
for an special keystroke like "F7", then opens a prompt. The user has to type 
the search-word in and after that my programm looks in it's own database for 
this textblock. If it is found my programm has to send the text to the 
cursor-position in MS-Write and then still wait for the next "F7"-keystroke.

The two problems are to catch the "F7"-keystroke from MS-Write and to send the 
text founded to the cursor-position of MS-Write.

I have tried the text-sending in the following way, but I think, that this ist 
not the ideal solution:

~WinExec("c:\windows\mswrite.exe" + " " + "c:\text.wri",SW_SHOW)
app_handle% = GetActiveWindow()
focus& = GetFocus()
~SendMessage(focus&,WM_PASTE,0,0)

This works together with MS-Write, nevertheless I try to find a solution to use 
WM_SETTEXT, but without success.

BTW: Do you know a way to get the text direkt from MS-Write by using the handle 
of the cursor. I hacve tried it with the followin code, but it did not work:

focus& = GetFocus()
LET text$ = STRING$(32000,0)
menge% = SendMessage(focus&,WM_GETTEXTLENGTH,0,0)
~SendMessage(hd_dc&,WM_GETTEXT,menge%,V:text$)

Do you have got an idea?

And - last but not least - MS-Write is a good small programm which 
unfortunatelly uses his own format. Do you know a small and fast to load 
programm which has the same features as MS-WRITE and runs under Win3.1(1), 
Win95/98 and NT4 and uses the HTML- or the SGML-format and features WYSIWYG so 
that is good for use for "not so good" user?

I hope that you can help me in all this questions.

Many thanks in advance
yours

Thomas Gonschor


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:56 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z6Gfg-00NDMGC>; Tue, 11 Aug 1998 17:49:12 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 331EAD066; Tue, 11 Aug 1998 18:56:42 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D077CA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 11 Aug 1998 08:47:12 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Fw: GFA BASIC For Windows
X-UIDL: bb85f64de94ec9a9795c9c08ded9b4ce

* List: gfabasic@aachen.linux.de


http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: Dale Bryant <adbryant@email.msn.com>
Newsgroups: alt.lang.gfa-basic
Date: Monday, August 10, 1998 3:55 PM
Subject: GFA BASIC For Windows


>If you program in GFA BASIC for DOS or Windows there is a new web site
>devoted  to others that are new to GFA. All files for download contain the
>source code so you can study it. Also, large help file is available that
>contains hundreds of routines and hundreds of examples on calling the
>Windows API. All downloads are FREE and no remuneration of any kind is
>expected or desired. Also, the are many links to other GFA BASIC sites.
>
>http://www.gfa.net/adbryant
>
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:41:58 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z6UHw-00ND69C>; Wed, 12 Aug 1998 08:21:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E5480D069; Wed, 12 Aug 1998 09:29:12 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D1444B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Wed, 12 Aug 1998 08:19:27 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] GFA-Win problems ...
X-UIDL: cc8106e229b8bacac7f01a99164de319

* List: gfabasic@aachen.linux.de

Hi!

There are a few things which I can't solve in the GFA-Language and I need them 
for my projekt which has to run under Win 3.1(1), Win95/98 and perhaps NT4.

The main problem was to find a small an fast to load programm for 
word-processing which save the text in an easy to use format. This 
word-processing must have features like Fonts, left, right, center and block the 
written text and must have a textblock-function. So I decide to use the "good 
old" MS-Write, but this do not features textblocks.

So I decided to write a small programm that run as a small icon and has to wait 
for an special keystroke like "F7", then opens a prompt. The user has to type 
the search-word in and after that my programm looks in it's own database for 
this textblock. If it is found my programm has to send the text to the 
cursor-position in MS-Write and then still wait for the next "F7"-keystroke.

The two problems are to catch the "F7"-keystroke from MS-Write and to send the 
text founded to the cursor-position of MS-Write.

I have tried the text-sending in the following way, but I think, that this ist 
not the ideal solution:

~WinExec("c:\windows\mswrite.exe" + " " + "c:\text.wri",SW_SHOW)
app_handle% = GetActiveWindow()
focus& = GetFocus()
~SendMessage(focus&,WM_PASTE,0,0)

This works together with MS-Write, nevertheless I try to find a solution to use 
WM_SETTEXT, but without success.

BTW: Do you know a way to get the text direkt from MS-Write by using the handle 
of the cursor. I hacve tried it with the followin code, but it did not work:

focus& = GetFocus()
LET text$ = STRING$(32000,0)
menge% = SendMessage(focus&,WM_GETTEXTLENGTH,0,0)
~SendMessage(hd_dc&,WM_GETTEXT,menge%,V:text$)

Do you have got an idea?

And - last but not least - MS-Write is a good small programm which 
unfortunatelly uses his own format. Do you know a small and fast to load 
programm which has the same features as MS-WRITE and runs under Win3.1(1), 
Win95/98 and NT4 and uses the HTML- or the SGML-format and features WYSIWYG so 
that is good for use for "not so good" user?

I hope that you can help me in all this questions.

Many thanks in advance
yours

Thomas Gonschor


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:00 1998
Return-Path: <AlanLennon@alanl.globalnet.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z6eNo-00NEiYC>; Wed, 12 Aug 1998 19:08:20 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BEE47D06A; Wed, 12 Aug 1998 20:15:49 +0200 (CEST)
From: Alan Lennon <AlanLennon@alanl.globalnet.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D1DBD9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 08 Aug 1998 18:08:02 +0100
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] File Manager Extension
X-UIDL: 044135118622fb47b41d74b7e58136bc

* List: gfabasic@aachen.linux.de

The following code shows how to write an extension for WINFILE.EXE using
GFA. I haven't seen any other examples of this, or messages relating to
it, so I hope this code is of interest to the group. 

Note the comments about registering the extension in WINFILE.INI!!!!

Dale, if you like this feel free to add it to GFAWHELP.

'
'          GFA File manager extension demo DLL
'               Alan Lennon 11/08/98
'
'
' To load this add the following line to WINFILE.INI in the [Options]
section
' If there isn't an [Options] section then create one
'
' GFA Extension=C:\WINDOWS\SYSTEM\GFA_FMX.DLL
'
' The path must be as specified in the $LNK EXE command below
'
$DESCR GFA File Manager Extensions Demo. Alan Lennon 1998
$LIBRARY
$LNK EXE C:\WINDOWS\SYSTEM\GFA_FMX.DLL
'
> PROCEDURE LibMain(hInst&,DataSeg&,HeapSize&,lpCmd%)

  ' Initialize arrays and structures here

  crlf$ = CHR$(13) + CHR$(10)
  progname$ = "GFA File Manager Extensions"

  // Message definitions for messages from/to the file manager.
  // Refer to the SDK for other possibilities

  FMEVENT_LOAD&=            100
  FMEVENT_UNLOAD&    =      101
  FMEVENT_INITMENU&  =      102
  FMEVENT_USER_REFRESH&  =  103
  FMEVENT_SELCHANGE& =      104
  FM_GETFILESEL&      =     (WM_USER + $0204)

  TYPE tagFMS_LOAD:                         //Structure used to send
menu information
  - INT           fs_load_size              //from and to file manager
when the system
  - CHAR*40       fs_menuname$              //is initializing
  - CARD          fs_menu_handle
  - CARD          fs_menu_delta
  ENDTYPE
  tagFMS_LOAD:FMS_LOAD.
  FMS_LOAD.fs_load_size = LEN(FMS_LOAD.)
  LPFMS_LOAD% = V:FMS_LOAD.

  ' The fs_menu_delta item is an offset value assigned by file manager
to prevent
  ' custom menu handles from conflicting with it's own handles. The SDK
says you
  ' need it if you want to manipulate the custom menu after it's
installed but I
  ' found this not necessary. See the menu manipulation under CASE 1 in
PROC entry_point()

  TYPE tagFMS_GETFILESEL:                   //structure filled by file
manager in response
  - CARD         fs_time                    //to a FM_GETFILESEL message
  - CARD         fs_date
  - INT          fs_size
  - BYTE         fs_attr
  - CHAR*260     fs_name$
  ENDTYPE
  tagFMS_GETFILESEL:FMS_GETFILESEL.
  LPFMS_GETFILESEL% = V:FMS_GETFILESEL.
  FMS_GETFILESEL.fs_size = LEN(FMS_GETFILESEL.)

  RETVAL 1
RETURN
> PROCEDURE entry_point(al_handle&,al_message&,al_lparam%)

  $export FMExtensionProc              //  <<< **** MUST BE THIS NAME
  fileman& = al_handle&
  fileman_dc&=GetDC(al_handle&)
  SETDC fileman_dc&
  SELECT al_message&
  CASE 1
    IF enabled!
      enabled! = FALSE
      f! = CheckMenuItem(hpop&,0,MF_BYPOSITION|MF_UNCHECKED)
    ELSE
      enabled! = TRUE
      f! = CheckMenuItem(hpop&,0,MF_BYPOSITION|MF_CHECKED)
    ENDIF
    RETVAL 0
  CASE 2
    // menu item 2
  CASE 3
    // menu item 3
  CASE 4
    // menu item 4
  CASE    FMEVENT_LOAD&
    @create_extension_menu(al_lparam%)          //points to FMS_LOAD
type
    RETVAL al_lparam%
  CASE    FMEVENT_SELCHANGE&                    //a file has been
selected
    IF enabled!
      @handle_file
    ENDIF
    RETVAL 0
  CASE    FMEVENT_INITMENU&                     //our menu has been
accessed
    RETVAL 0
  CASE    FMEVENT_UNLOAD&                       //quit the DLL (without
quitting file manager)
    RETVAL 0
  CASE    FMEVENT_USER_REFRESH&                 //user has selected
refresh from the
    RETVAL 0                                    //windows menu
  DEFAULT
    RETVAL 0
  ENDSELECT

RETURN
> PROCEDURE create_extension_menu(al_fms_load_address%)

  delta_menu& = CARD{al_fms_load_address%+LEN(FMS_LOAD.)-2}
  hpop&=CreateMenu()
  ~AppendMenu(hpop&,MF_STRING,1,"GFA file info")
  ~AppendMenu(hpop&,MF_STRING,2,"GFA test menu 1")
  ~AppendMenu(hpop&,MF_STRING,3,"GFA test menu 2")
  ~AppendMenu(hpop&,MF_STRING,4,"GFA test menu 3")
  FMS_LOAD.fs_menuname$ = "GFA Extension" + CHR$(0)
  FMS_LOAD.fs_menu_handle = hpop&
  BMOVE LPFMS_LOAD%,al_fms_load_address%,LEN(FMS_LOAD.)

RETURN
> PROCEDURE handle_file

  ~SendMessage(fileman&,FM_GETFILESEL&,1,LPFMS_GETFILESEL%)  //ask file
manager for the filename
  filename$ = ZTRIM$(FMS_GETFILESEL.fs_name$)                //trim off
the rubbish
  ~@message_box(filename$,MB_OK | MB_ICONINFORMATION)        //display
it

  //at this point you know the filename and path so
  //
  // put your own code in here
  //

RETURN
> PROCEDURE WEP

  //Free any resources here

RETURN
> FUNCTION message_box(al_message$,al_flags%)

  al_flags% = al_flags% | MB_TASKMODAL
  MESSAGE al_message$,progname$,al_flags%,al_choice&
  RETURN al_choice&

ENDFUNC

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:02 1998
Return-Path: <c0028901@nwn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z6flc-00ND8NC>; Wed, 12 Aug 1998 20:37:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 70C0FD06C; Wed, 12 Aug 1998 21:44:34 +0200 (CEST)
From: Fietkau <c0028901@nwn.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D1F0A2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 12 Aug 1998 20:37:23 +0200
Organization: Nordhorn
X-Mailer: Mozilla 3.01 [de] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Information
X-UIDL: 0c703068d755b0e74c7158e14f5f9110

* List: gfabasic@aachen.linux.de

Hi,
thanks Bernhard and Christian. Once you understand the reason the
solution is clear.
I had minor problems in programming for ATARI ST or ASSEMBLER with the
ancient 6502, because all the needed Information was available.
Now there are thousands of books and articles about VISUAL BASIC but not
about GFAW. 
If there is a good source of Information - please let me know !

thanks
Manfred

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:05 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z6rRR-00NDGJC>; Thu, 13 Aug 1998 09:04:57 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3B9A3D06B; Thu, 13 Aug 1998 10:12:36 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D29FF4.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 13 Aug 1998 08:45:30 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] GFA-Win questions
X-UIDL: 97d338ba8dae8bd3c450a65feb30c95d

* List: gfabasic@aachen.linux.de

Hi!

There are a few things which I can't solve in the GFA-Language and I need them 
for my projekt which has to run under Win 3.1(1), Win95/98 and perhaps NT4.

The main problem was to find a small an fast to load programm for 
word-processing which save the text in an easy to use format. This 
word-processing must have features like Fonts, left, right, center and block the 
written text and must have a textblock-function. So I decide to use the "good 
old" MS-Write, but this do not features textblocks.

So I decided to write a small programm that run as a small icon and has to wait 
for an special keystroke like "F7", then opens a prompt. The user has to type 
the search-word in and after that my programm looks in it's own database for 
this textblock. If it is found my programm has to send the text to the 
cursor-position in MS-Write and then still wait for the next "F7"-keystroke.

The two problems are to catch the "F7"-keystroke from MS-Write and to send the 
text founded to the cursor-position of MS-Write.

I have tried the text-sending in the following way, but I think, that this ist 
not the ideal solution:

~WinExec("c:\windows\mswrite.exe" + " " + "c:\text.wri",SW_SHOW)
app_handle% = GetActiveWindow()
focus& = GetFocus()
~SendMessage(focus&,WM_PASTE,0,0)

This works together with MS-Write, nevertheless I try to find a solution to use 
WM_SETTEXT, but without success.

BTW: Do you know a way to get the text direkt from MS-Write by using the handle 
of the cursor. I hacve tried it with the followin code, but it did not work:

focus& = GetFocus()
LET text$ = STRING$(32000,0)
menge% = SendMessage(focus&,WM_GETTEXTLENGTH,0,0)
~SendMessage(hd_dc&,WM_GETTEXT,menge%,V:text$)

Do you have got an idea?

And - last but not least - MS-Write is a good small programm which 
unfortunatelly uses his own format. Do you know a small and fast to load 
programm which has the same features as MS-WRITE and runs under Win3.1(1), 
Win95/98 and NT4 and uses the HTML- or the SGML-format and features WYSIWYG so 
that is good for use for "not so good" user?

I hope that you can help me in all this questions.

Many thanks in advance
yours

Thomas Gonschor


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:07 1998
Return-Path: <pbullman@norex.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z6uWv-00NEiSC>; Thu, 13 Aug 1998 12:22:49 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 51DA7D06D; Thu, 13 Aug 1998 13:30:26 +0200 (CEST)
From: "Pat Bullman" <pbullman@norex.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D2CE52.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 13 Aug 1998 20:21:40 +1000
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1162
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] GFA-Win questions
X-UIDL: 7c09ad5d2041eaaae863317674ee3395

* List: gfabasic@aachen.linux.de

Thomas,

There are a couple of third party products that can be used to provide Word
Processing functionality to GFA.

They are usually in the form of a DLL and require very little GFA
programming to get running.  The one I have in mind is VisualWriter from
Visual Tools, I imagine there are many more with varying degrees of
sophistication and cost.

Pat

----------
> From: Thomas Gonschor <vph-bensberg@t-online.de>
> To: gfabasic@aachen.linux.de
> Subject: [GFA] GFA-Win questions
> Date: Thursday, 13 August 1998 18:45
> 
> * List: gfabasic@aachen.linux.de
> 
> Hi!
> 
> There are a few things which I can't solve in the GFA-Language and I need
them 
> for my projekt which has to run under Win 3.1(1), Win95/98 and perhaps
NT4.
> 
> The main problem was to find a small an fast to load programm for 
> word-processing which save the text in an easy to use format. This 
> word-processing must have features like Fonts, left, right, center and
block the 
> written text and must have a textblock-function. So I decide to use the
"good 
> old" MS-Write, but this do not features textblocks.
> 
> So I decided to write a small programm that run as a small icon and has
to wait 
> for an special keystroke like "F7", then opens a prompt. The user has to
type 
> the search-word in and after that my programm looks in it's own database
for 
> this textblock. If it is found my programm has to send the text to the 
> cursor-position in MS-Write and then still wait for the next
"F7"-keystroke.
> 
> The two problems are to catch the "F7"-keystroke from MS-Write and to
send the 
> text founded to the cursor-position of MS-Write.
> 
> I have tried the text-sending in the following way, but I think, that
this ist 
> not the ideal solution:
> 
> ~WinExec("c:\windows\mswrite.exe" + " " + "c:\text.wri",SW_SHOW)
> app_handle% = GetActiveWindow()
> focus& = GetFocus()
> ~SendMessage(focus&,WM_PASTE,0,0)
> 
> This works together with MS-Write, nevertheless I try to find a solution
to use 
> WM_SETTEXT, but without success.
> 
> BTW: Do you know a way to get the text direkt from MS-Write by using the
handle 
> of the cursor. I hacve tried it with the followin code, but it did not
work:
> 
> focus& = GetFocus()
> LET text$ = STRING$(32000,0)
> menge% = SendMessage(focus&,WM_GETTEXTLENGTH,0,0)
> ~SendMessage(hd_dc&,WM_GETTEXT,menge%,V:text$)
> 
> Do you have got an idea?
> 
> And - last but not least - MS-Write is a good small programm which 
> unfortunatelly uses his own format. Do you know a small and fast to load 
> programm which has the same features as MS-WRITE and runs under
Win3.1(1), 
> Win95/98 and NT4 and uses the HTML- or the SGML-format and features
WYSIWYG so 
> that is good for use for "not so good" user?
> 
> I hope that you can help me in all this questions.
> 
> Many thanks in advance
> yours
> 
> Thomas Gonschor
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:20 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z6yFf-00NDL7C>; Thu, 13 Aug 1998 16:21:15 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 2312DD067; Thu, 13 Aug 1998 17:28:46 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D30632.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 13 Aug 1998 15:46:23 +-200
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="---- =_NextPart_000_01BDC6D2.58F190E0"
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] GFA-Win questions
X-UIDL: 2993526c467d6dcaa10831620928e53d

Hi Pat!

There are a couple of third party products that can be used to provide Word
Processing functionality to GFA.
Okay, but I do not such products and I do not know where to get them. Please be so kind to tell me, where I can get such products.

They are usually in the form of a DLL and require very little GFA
programming to get running.  The one I have in mind is VisualWriter from
Visual Tools, I imagine there are many more with varying degrees of
sophistication and cost.
That sounds great - but I do not know where to get them ...

Many Thanks
Thomas

Attachment Converted: "c:\programme\eudora\attach\AW [GFA] GFA-Win questions"
From ???@??? Mon Aug 31 18:42:22 1998
Return-Path: <t.maier@owl-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z73eS-00NDGLC>; Thu, 13 Aug 1998 22:07:12 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1DDD4D068; Thu, 13 Aug 1998 23:14:30 +0200 (CEST)
From: "Thomas Maier" <t.maier@owl-online.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D3573A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 14 Aug 1998 22:07:38 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] I need Help !!!!
X-UIDL: 59aa10bdc291d21e82081e19ef137da3

* List: gfabasic@aachen.linux.de

Hi,

I need a Procedure to get the incoming Call number with Capi20.
I have tons of Information for Capi 2.0 but my English and "C" is not the
best.

I think i am not the first with this Problem.


DLL #1,"capi20.dll"
  DECL WORD CAPI_REGISTER(w,w,w,w,l) PASCAL GET
  DECL WORD CAPI_RELEASE(w) PASCAL GET
  DECL WORD CAPI_PUT_MESSAGE(w,l) PASCAL GET
  DECL WORD CAPI_GET_MESSAGE(w,l) PASCAL GET
  DECL WORD CAPI_SET_SIGNAL(w,l,w) PASCAL GET
  DECL WORD CAPI_GET_MANUFACTURER(l) PASCAL GET
  DECL WORD CAPI_GET_VERSION(l,l,l,l) PASCAL GET
  DECL WORD CAPI_GET_SERIAL_NUMBER(l) PASCAL GET
  DECL WORD CAPI_GET_PROFILE(l,w) PASCAL GET
  DECL WORD CAPI_INSTALLED() PASCAL GET
ENDDLL

OPENW #1,0,0,600,480,48
CLR ApplID&
fehler& = ^CAPI_REGISTER(2048,1,2,128,*ApplID&)
IF fehler& = 0
  buffer$ = SPACE$(2048)
  t& = 0
  DO
    GETEVENT
    fehler& = ^CAPI_GET_MESSAGE(ApplID&,*t&)
    if fehler&=0
    @Auswertung
    endif
    EXIT IF MENU(1) = 4 OR fehler& = 0
  LOOP
  fehler% = ^CAPI_RELEASE(ApplID&)
endif
FREEDLL 1
CLOSEW #1
EDIT

Procedure Auswertung
..
Return

This is my Example to start but, i dont no this is correct. I think the
Calling number come with
the D-Channel but how i can get this.

ciao Thomas



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:25 1998
Return-Path: <dlf@infinityonline.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z7A7p-00NCpxC>; Fri, 14 Aug 1998 05:01:57 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A9E91D06E; Fri, 14 Aug 1998 06:09:32 +0200 (CEST)
From: "Duane Forster" <dlf@infinityonline.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D3B880.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 7 Aug 1998 12:45:38 +1000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] THREE GUESSES
X-UIDL: b99c6367fb69436f01788fa1b1fe61ad

* List: gfabasic@aachen.linux.de

Duane Forster, Victoria, Australia
Amatuer Multimedia Software Developer for windows
Musician and full time Uni student
Currently in Funk band gigging around local area
20,male

Thanks.


-----Original Message-----
From: Dale Bryant <adbryant@email.msn.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Friday, August 07, 1998 1:50 AM
Subject: [GFA] THREE GUESSES


>* List: gfabasic@aachen.linux.de
>
>If you program in GFA BASIC on any platform
>1. Would I like to have you name, city & country
>2  Would I like to know your areas of interest
>3. Would I like some personal information about you
>
>If you would like to see others that have responded visit
>
>http://www.gfa.net/adbryant/biogs.htm
>webmaster.gfawhelp@gfa.net
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:29 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z7hzS-00NDMfC>; Sat, 15 Aug 1998 17:11:34 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 394C9D056; Sat, 15 Aug 1998 18:19:15 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D5B503.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 15 Aug 1998 08:09:58 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] THREE GUESSES
X-UIDL: 60575f8a9e3e9a2993aa086d9f8f37f5

* List: gfabasic@aachen.linux.de

Attn: Duane Frostier,
Hi Duane,
I would love to add you to the GFA programmers page bit I need your email
address.

Please send to:
adbryant@gfa.net
Dale

-----Original Message-----
From: Duane Forster <dlf@infinityonline.com.au>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Thursday, August 13, 1998 8:02 PM
Subject: Re: [GFA] THREE GUESSES


>* List: gfabasic@aachen.linux.de
>
>Duane Forster, Victoria, Australia
>Amatuer Multimedia Software Developer for windows
>Musician and full time Uni student
>Currently in Funk band gigging around local area
>20,male
>
>Thanks.
>
>
>-----Original Message-----
>From: Dale Bryant <adbryant@email.msn.com>
>To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>Date: Friday, August 07, 1998 1:50 AM
>Subject: [GFA] THREE GUESSES
>
>
>>* List: gfabasic@aachen.linux.de
>>
>>If you program in GFA BASIC on any platform
>>1. Would I like to have you name, city & country
>>2  Would I like to know your areas of interest
>>3. Would I like some personal information about you
>>
>>If you would like to see others that have responded visit
>>
>>http://www.gfa.net/adbryant/biogs.htm
>>webmaster.gfawhelp@gfa.net
>>
>>
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:31 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z7i5j-00NDMjC>; Sat, 15 Aug 1998 17:18:03 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E7E3BD057; Sat, 15 Aug 1998 18:25:45 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D5B68A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 15 Aug 1998 08:16:26 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] KEYS
X-UIDL: 83ea9f4d61ccbddc0eff5b8f1c42661a

* List: gfabasic@aachen.linux.de

Hi Dale!

Thomas Gonscher asks:

I am looking for a possibility of "catching" a special keystroke-message
from an application which I have started by using
"handle%=WinExec(app_name$,SW_SHOW)". My program becomes iconifyed and is
still waiting for a keystroke like "F7" or something else. That is
"everything".  :-)

After getting the message my program will send a small text to the clipboard
an sends a message to the handle of the cursor of the word processor (e. g.
WRITE). The handle do I get by using "item&=GetFocus()" which still works.

Do you have got an example to solve this problem?.

Thanks in advance, yours
Thomas

P. S. I had heard that there are possibilities to get a whole word processor
as an DLL-File. Do you know whether this is true an where I can get more
information's?
http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:38 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z7qAX-00NDM8C>; Sun, 16 Aug 1998 01:55:33 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6D218D058; Sun, 16 Aug 1998 03:03:14 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D62FD2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 15 Aug 1998 19:54:50 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] wmconst.txt
X-UIDL: 0f54889cb3bdffd5c19f66b44e95ef49

* List: gfabasic@aachen.linux.de

Undocumented issues:

1) Can someone post a copy of  wmconst.txt.

This file is referenced in the demo program for gfa functoin CB in the GFA
Help file.

2)  Also, my editor does not recognize the keyword SCROLL.  Does any one
else have this problem? ( fortunately the windows equivalent works)

3) Finally, Compuserve does not provide me  access to alt.lang.gfa-basic.
When I finally found it on a friend's server, it had 24 messages, and all
looked like junk mail. Is that an active site?

Regards,

Brent  

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:39 1998
Return-Path: <bero@p.sucks.eu.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z7rJo-00NDM8C>; Sun, 16 Aug 1998 03:09:12 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 499D8D059; Sun, 16 Aug 1998 04:16:47 +0200 (CEST)
From: Bernhard Rosenkraenzer <bero@p.sucks.eu.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D64112.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 15 Aug 1998 23:08:32 +0200 (CEST)
X-Sender: bero@k6.bero
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] Unsubscription instructions
X-UIDL: 0b6476a2de8a2506e5f6143bec169e98

* List: gfabasic@aachen.linux.de

I've just returned from a 1-week vacation to find this list full of
malformed unsubscription requests - so I guess I'd better explain it
again:
to remove yourself from this list, send a message to
gfabasic@aachen.linux.de with "unsubscribe" (without the quotation marks)
in the SUBJECT of the message. Don't add anything else (such as
"un-subscribe"), because the list processor can't recognize that as a
request.

LLaP
bero

-- 
Windows 98 supports real multitasking - it can boot and crash simultaneously.
***
Anyone sending unwanted advertising e-mail to this address will be charged
$25 for network traffic and computing time. By extracting my address from
this message or its header, you agree to these terms.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:41 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z846X-00NDLDC>; Sun, 16 Aug 1998 16:48:21 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 940FED063; Sun, 16 Aug 1998 17:56:00 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D70110.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 16 Aug 1998 07:46:35 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] wmconst.txt
X-UIDL: 3108314640f5304498d7c9987ffd569d

* List: gfabasic@aachen.linux.de

I have a copy of wmconst.txt. If you would send me an email with your email
address I would be glad to attach it as a file. I can't attach a file to a
mailing list message.
Dale Bryant
adbryant@gfa.net

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: BDD <BrentDeck@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Saturday, August 15, 1998 4:56 PM
Subject: [GFA] wmconst.txt


* List: gfabasic@aachen.linux.de

Undocumented issues:

1) Can someone post a copy of  wmconst.txt.

This file is referenced in the demo program for gfa functoin CB in the GFA
Help file.

2)  Also, my editor does not recognize the keyword SCROLL.  Does any one
else have this problem? ( fortunately the windows equivalent works)

3) Finally, Compuserve does not provide me  access to alt.lang.gfa-basic.
When I finally found it on a friend's server, it had 24 messages, and all
looked like junk mail. Is that an active site?

Regards,

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:44 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8Utc-00NEl2C>; Mon, 17 Aug 1998 21:24:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 79A22D064; Mon, 17 Aug 1998 22:32:26 +0200 (CEST)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D8935A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 17 Aug 1998 15:24:07 -0400
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Interrupt $21 $7305 -- Read an absolute sector
X-UIDL: b45a7d642436d3798711c4c58b54cb24

* List: gfabasic@aachen.linux.de

Hi:

I'm having problems getting info from the drives using the new Interrupts;
according to the reading I've done the following should give me info at the
sector level. I don't even seem to get 32-bit fat drives & I get the same
info if I go into the routine a 2nd time. It doesn't error code me so I must
be doing something right.

PROCEDURE Get_Data(xsec,numsec)     /* xsec = sector you want  numsec =
number of sectors to get
  buf$ = SPACE$(numsec * 512)                 /* dsk starts at 1
  temp$ = SPACE$(10)
  adr = V:temp$
  LONG{adr} = xsec
  WORD{adr + 4} = numsec
  LONG{adr + 6} = V:buf$
  _DS = HIWORD(V:temp$)
  _BX = LOWORD(V:temp$)
  ~INTR($21,_AX = $7305,_DL = dsk,_CX = -1,_DX = xsec,_SI = 0)
  flg! = TRUE
  IF ODD(_FL)      /* Carry flag if successful
        @GetErrorCode
        flg! = FALSE
  ENDIF
RETURN
'

Any help would be deeply appreciated!

                                                              -->Bev<--




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:46 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8V2d-00ND9WC>; Mon, 17 Aug 1998 21:34:07 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1DAE8D065; Mon, 17 Aug 1998 22:41:46 +0200 (CEST)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D8958A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 17 Aug 1998 15:33:10 -0400
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Interrupt $21 $7305 -- Read an absolute sector
X-UIDL: b566d260fbfdd6e0e46d62f3d275141f

* List: gfabasic@aachen.linux.de

Hi:

I'm having problems getting info from the drives using the new Interrupts;
according to the reading I've done the following should give me info at the
sector level. I don't even seem to get 32-bit fat drives & I get the same
info if I go into the routine a 2nd time. It doesn't error code me so I must
be doing something right.

PROCEDURE Get_Data(xsec,numsec)     /* xsec = sector you want  numsec =
number of sectors to get
  buf$ = SPACE$(numsec * 512)                 /* dsk starts at 1
  temp$ = SPACE$(10)
  adr = V:temp$
  LONG{adr} = xsec
  WORD{adr + 4} = numsec
  LONG{adr + 6} = V:buf$
  _DS = HIWORD(V:temp$)
  _BX = LOWORD(V:temp$)
  ~INTR($21,_AX = $7305,_DL = dsk,_CX = -1,_DX = xsec,_SI = 0)
  flg! = TRUE
  IF ODD(_FL)      /* Carry flag if successful
        @GetErrorCode
        flg! = FALSE
  ENDIF
RETURN
'

Any help would be deeply appreciated!

                                                              -->Bev<--




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:47 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8Yh4-00NEiyC>; Tue, 18 Aug 1998 01:28:06 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9C0F7D066; Tue, 18 Aug 1998 02:35:51 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D8CC67.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc03.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980817232707.CUVN29927@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Mon, 17 Aug 1998 23:27:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 17 Aug 1998 23:27:07 +0000
Subject: [GFA] req for assistance   1708xx1-
X-UIDL: 9cc3a95045725f2854afafcb33933078

* List: gfabasic@aachen.linux.de

17/08/98 6:17:04 PM   req for assistance   1708xx1-

In the following code, I wish to be able to alter attributs of a file, 
but my editor, v4.38 will NOT allow me to use BCHG, BCLR, or BSET.  It 
keeps changing the things to a GOSUB, as if I put "@" in front of them.

BCHG({dta%}.fs_attr,0), BCLR({dta%}.fs_attr,0), or 
BSET({dta%}.fs_attr,0) cannot be used.  I would appreciate it very 
much if this can be cleared up for me.  Thank you.

<G>
TomR.


''''  hotbed14.lst

TITLEW #1, " Hotbed v0.14 - a true file killer to be - file attribs 
confirmation scratchpad screen" // wrapped for e-mail
OPENW #1, 0,0,640,400,48

d&  = _DRIVE
p$ = DIR$(0)

FILESELECT #"Victim Locator","*.*","*.*",n$

? " Attribs breakdown...";SPACE$(35);" <any_key> closes me"
?
? " R - read only - (file, is write-protected, cannot be written to)"
? " H - hidden - (file or dir is hidden, will not show up in some dir 
lists)" // wrapped for e-mail
? " S - system - (hidden even w/o 'H', can be file or dir)"
? " V - disk volume label - (have to play w/ this!)"
? " D - directory or folder - (can have 'H' & 'S', also)"
? " A - archive (file - when 1st written may not have 'A' - means 
'backup')" // wrapped for e-mail
?
? " File to get rid of: ";n$
?
? " filename              atribs      size    date            time"

TYPE dta:
- CHAR *21 fs_donttouch$
- BYTE  fs_attr
- CARD  fs_time
- CARD  fs_date
- LONG  fs_size
- CHAR *14 fs_name$
ENDTYPE

dta% = FGETDTA()

e% = FSFIRST(n$,%10001)
a$ = SPACE$(60)
MID$(a$,2) = {dta%}.fs_name$

q$ = " "
IF BTST({dta%}.fs_attr,0)
  q$ = "R"
  qr$ = "R"
ELSE
  q$ = "-"
ENDIF
MID$(a$,18,1) = q$

IF BTST({dta%}.fs_attr,1)
  q$ = "H"
  qh$ = "H"
ELSE
  q$ = "-"
ENDIF
MID$(a$,19,1) = q$

IF BTST({dta%}.fs_attr,2)
  q$ = "S"
  qs$ = "S"
ELSE
  q$ = "-"
ENDIF
MID$(a$,20,1) = q$

IF BTST({dta%}.fs_attr,3)
  q$ = "V"
ELSE
  q$ = "-"
ENDIF
MID$(a$,21,1) = q$

IF BTST({dta%}.fs_attr,4)
  q$ = "D"
ELSE
  q$ = "-"
ENDIF
MID$(a$,22,1) = q$

IF BTST({dta%}.fs_attr,5)
  q$ = "A"
ELSE
  q$ = "-"
ENDIF
MID$(a$,23,1) = q$

qp$ = STR$({dta%}.fs_size)
q$ = SPACE$(10 - LEN(qp$)) + qp$
MID$(a$,26,10) = q$

a% = {dta%}.fs_date
q$ = DEC$(a% & 31,2) + "/"

q$ = q$ + DEC$((a% >> 5) & 15,2) + "/"
q$ = q$ + DEC$((a% >> 9) + 1980,4)
MID$(a$,38) = q$

a% = {dta%}.fs_time
q$ = DEC$(a% >> 11,2) + ":" + DEC$((a% >> 5) & 63,2) + ":"
q$ = q$ + DEC$((a% & 31) * 2,2)
MID$(a$,50) = q$

PRINT a$
?
IF qr$ = "R" OR qh$ = "H" OR qs$ = "S" THEN
  ? " Attribs 'H','S', &/or 'R' are detected, this will require 
confirmation" // wrapped for e-mail
  ? " & MUST be changed for the file or dir to be deleted!"
  ?
ENDIF

CHDRIVE d&
CHDIR p$
PRINT " Begin path: ";CHR$(d&) + ":" + p$ + "     ";
d1&  = _DRIVE
p1$ = DIR$(0)
? "End path: ";CHR$(d1&) + ":" + p1$
SETFONT SYSTEM_FONT
FREEFONT fnt&

KEYGET k%
CLOSEW #1
END



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:49 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8eUJ-00NDHJC>; Tue, 18 Aug 1998 07:39:19 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3691CD069; Tue, 18 Aug 1998 08:47:05 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D92369.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc03.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980818053915.JCZK29927@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 18 Aug 1998 05:39:15 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 18 Aug 1998 05:39:15 +0000
Subject: [GFA] req for assistance   1808zz1-
X-UIDL: 1a97a8c16f053abd61c54428aa1d11c6

* List: gfabasic@aachen.linux.de

18/08/98 12:38:32 AM   req for assistance   1808zz1-

Would someone please send me a copy of MicroSoft compress.exe?

Am registered w/ MSDN, but cannot get in to look for this file.

Thank you.
TomR.
Tiger.Genealogical.Rescue@worldnet.att.net


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:50 1998
Return-Path: <linux@k5.sucks.eu.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8hTQ-00NBWPC>; Tue, 18 Aug 1998 10:50:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 61E39D06A; Tue, 18 Aug 1998 11:58:15 +0200 (CEST)
From: Bernhard Rosenkraenzer <linux@k5.sucks.eu.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D95037.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 18 Aug 1998 01:51:11 +0200 (CEST)
X-Sender: linux@k6.bero
In-Reply-To: <35D8CC67.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] req for assistance   1708xx1-
X-UIDL: cb91d8e789144687fafcab04bd10d03e

* List: gfabasic@aachen.linux.de

On Mon, 17 Aug 1998, Tom Record wrote:

> In the following code, I wish to be able to alter attributs of a file, 
> but my editor, v4.38 will NOT allow me to use BCHG, BCLR, or BSET.  It 
> keeps changing the things to a GOSUB, as if I put "@" in front of them.
> 
> BCHG({dta%}.fs_attr,0), BCLR({dta%}.fs_attr,0), or 
> BSET({dta%}.fs_attr,0) cannot be used.

That's because they're functions rather than commands. Try:
{dta%}.fs_attr=BCHG({dta%}.fs_attr,0)
{dta%}.fs_attr=BCLR({dta%}.fs_attr,0)
{dta%}.fs_attr=BSET({dta%}.fs_attr,0)

LLaP
bero

-- 
Windows 98 supports real multitasking - it can boot and crash simultaneously.
***
Anyone sending unwanted advertising e-mail to this address will be charged
$25 for network traffic and computing time. By extracting my address from
this message or its header, you agree to these terms.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:54 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8j1a-00NElHC>; Tue, 18 Aug 1998 12:29:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9F05CD06B; Tue, 18 Aug 1998 13:37:33 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35D9677D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc03.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980818102937.KIIR29927@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Tue, 18 Aug 1998 10:29:37 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 18 Aug 1998 10:29:37 +0000
Subject: Re: [GFA] req for assistance   1708xx1-
X-UIDL: 4ac34e1fe1fd628bf5aedcd75a9b8d4c

* List: gfabasic@aachen.linux.de

At 01:51 AM 18/08/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>On Mon, 17 Aug 1998, Tom Record wrote:
>
>> In the following code, I wish to be able to alter attributs of a file, 
>
>That's because they're functions rather than commands. Try:
>{dta%}.fs_attr=BCHG({dta%}.fs_attr,0)
>{dta%}.fs_attr=BCLR({dta%}.fs_attr,0)
>{dta%}.fs_attr=BSET({dta%}.fs_attr,0)
>
+++ Thank you, kind sir.  Somehow, I knew it would be simple.
>
>LLaP
>bero
>
>-- 
>Windows 98 supports real multitasking - it can boot and crash simultaneously.
>
+++ Pretty neat trick, hunh.  It also crashes LibertyBasic programs... how does
it fare w/ GFA-W?
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:42:59 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8veO-00NCpzC>; Wed, 19 Aug 1998 01:58:52 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3579FD04B; Wed, 19 Aug 1998 03:06:38 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DA251E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 19 Aug 1998 09:31:17 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35D9677D.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] req for assistance   1708xx1-
X-UIDL: 18ae87c28c0026af93e07ca2849857cf

* List: gfabasic@aachen.linux.de

Tom Record wrote:
> 
> >Windows 98 supports real multitasking - it can boot and crash simultaneously.
> >
> +++ Pretty neat trick, hunh.  It also crashes LibertyBasic programs... how does
> it fare w/ GFA-W?
> <G>
> TomR.
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

I have not yet had it crash either Liberty Basic or GFA-W programs.
I have run into networking compatibility problems, however! If you have
some computers with Win95 or 3.11 on the network and introduce Win98 on
other machines they don't talk to each other.
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:01 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8wMI-00ND95C>; Wed, 19 Aug 1998 02:44:14 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 46282D04C; Wed, 19 Aug 1998 03:52:01 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DA2FC1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc03.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980819004318.DFXP20964@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Wed, 19 Aug 1998 00:43:18 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 19 Aug 1998 00:43:18 +0000
Subject: [GFA] developments   1808zz2-
X-UIDL: dbbc3086d45278ac7a1f122440da42b8

* List: gfabasic@aachen.linux.de

18/08/98 7:20:54 PM   developments   1808zz2-

As some know, I'm building HouseKeeper, "the ultimate" uninstaller.  
It's coming along pretty well now - so well that I've begun 
investigating installer programs for it.

In so doing, I ran into a need for MS's compress.exe.  An appeal for a 
copy got much better response than I imagined possible... I received 2 
copies of a 16-bit file & one that is apparently 32-bit (2x14.9K vs 
1x88.2K).  I also received several hints of where it could be 
downloaded.

I happily received copies of qilite & cabpack.  Qilite appears to be a 
16-bit installer, while cabpack is definitely 32-bit.  *This* one is 
of interest, because it identified just what *.cab is... another 
compressed archive.

Brings up a pair of questions for me... I work in 16-bit (my stuff 
runs on 386 & up, Win 3.1 or better).  Is ieak4.cab available in 
16-bit?  MSIE4 is, & this is a kit that builds self-extracting *.cab 
files.  The 2nd question is... does *.cab generate smaller files than 
*.zip?

Interesting enough, I've considered building my own installer around 
*.zip files instead of LZ-compressed files (I have an unzipping 
*.dll).  Compress.exe uses another LZ-based compression & it's files 
are considerably larger than corresponding *.zip files from WinZip.

To sum up, tremendous thanks to all who responded to my appeal.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:02 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z8xan-00NDKlC>; Wed, 19 Aug 1998 04:03:17 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E862DD04F; Wed, 19 Aug 1998 05:11:04 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DA4249.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 19 Aug 1998 11:35:39 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35D9677D.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Changing button text colours
X-UIDL: 6893ebe281942e74b4f7139403e33647

* List: gfabasic@aachen.linux.de

I have an interesting problem that someone might have a simple solution
for.

I would like to change the colour of the lettering (text) on buttons. I
have a GFA password demo that shows how to do this via a callback, but
it only seems to work with DLG 3D ON. If you turn off the 3d effects,
the colours don't change. I can get the colours to change for other
objects like statictext, editboxes, etc, but not buttons.  Here is some
sample code I'm using to test this.

'DLG 3D ON
DIALOG #0,70,5,300,200,"Test Dialog",$10000000                  //create
dialog (used RCS for this)
  CONTROL "OK",IDOK,"button",$10010000,110,130,64,32
  CONTROL "Radiobutton",101,"button",$10010009,30,10,100,20
  CONTROL "Checkbox",102,"button",$10010003,150,10,90,20
  CONTROL "Statictext",103,"static",$1000000b,30,40,110,20
  CONTROL "Editbox",104,"edit",$10810000,30,60,110,24
ENDDIALOG
SHOWDIALOG #0
bkg%=RGB(192,192,192)					    //set to grey
DLG FILL 0,bkg%                                             //fill
dialog
bk_color&=CreateSolidBrush(bkg%)                            //background
for controls
CB -1,0 TO -1,callback()				    // set up callback
event&=0
REPEAT
  GETEVENT
  IF _Mess=WM_COMMAND THEN event&=_wParam
  IF MENU(1)=4 OR event&=IDCANCEL OR event&=IDOK THEN event&=-1
UNTIL event&=-1							//exit upon enter or esc or Alt F4.
CLOSEDIALOG #0
'DLG 3D OFF
END

'set controls to white on blue except for editbox
PROCEDURE callback(whandle&,message&,w&,l%)
  LOCAL n&
  n&=GetDlgCtrlID(LOWORD(l%))
  IF message&=WM_CTLCOLOR
    SELECT n&
    CASE IDOK                            //button
      ~SetBkColor(w&,RGB(0,0,192))
      ~SetTextColor(w&,RGB(255,255,255))
      RETVAL bk_color&
    CASE 101                            //radiobutton
      ~SetBkColor(w&,RGB(0,0,192))
      ~SetTextColor(w&,RGB(255,255,255))
      RETVAL bk_color&
    CASE 102                            //checkbox
      ~SetBkColor(w&,RGB(0,0,192))
      ~SetTextColor(w&,RGB(255,255,255))
      RETVAL bk_color&
    CASE 103                            //statictext
      ~SetBkColor(w&,RGB(0,0,192))
      ~SetTextColor(w&,RGB(255,255,255))
      RETVAL bk_color&
    CASE 104                            //editbox
      ~SetBkColor(w&,bkg%)
      ~SetTextColor(w&,RGB(0,0,192))
      RETVAL bk_color&
    ENDSELECT
  ENDIF
RETURN


If anyone could let me know how to make this colour change without using
DLG 3D, I would be most grateful.


---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:05 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z92gg-00NDH8C>; Wed, 19 Aug 1998 09:29:42 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 73BB4D050; Wed, 19 Aug 1998 10:37:20 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DA8EC3.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id AE911F021A; Wed, 19 Aug 1998 09:28:17 +0200
Date: Wed, 19 Aug 1998 09:10:27 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Changing button text colours
X-UIDL: eb45632c2da4b138d900bca6e6fa4cd7

* List: gfabasic@aachen.linux.de

Hi Dean,

Buttons don't use the background and foreground colors set to their DCs. This
is by design.
CTL3D uses a different approach and completely replaces the standard
button-drawing routines. To do this, it handles the WM_SETTEXT, WM_KILLFOCUS,
WM_ENABLE, WM_SETFOCUS, WM_PAINT, BM_SETSTATE, and BM_SETCHECK messages. CTL3D
does not subclass buttons that have the BS_OWNERDRAW or BS_LEFTTEXT style.

Use an ownerdraw button to add your own colors.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:16 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z97bh-00NDGWC>; Wed, 19 Aug 1998 14:44:53 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5AFD8D051; Wed, 19 Aug 1998 15:51:04 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DAD848.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 19 Aug 1998 14:34:20 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"

X-Sender: 02204410-0001@t-online.de
Subject: [GFA] MS-Write, etc. ...
X-UIDL: 395ebb4fd58218ac43862e19bda8ba19

* List: gfabasic@aachen.linux.de

Hi!

I've got two questions, first a would like to know how to write the MS-WRITE document-format? And secondly I need (!) to know how to use the Original Windows-FTP-Programm by using a script-file. I had tried to find out how it works by using a script, but I had no success.

Many thanks in advance
yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:22 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z98h0-00NEjPC>; Wed, 19 Aug 1998 15:54:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id AF772D053; Wed, 19 Aug 1998 17:02:03 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DAE8EB.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mtiwmhc02.worldnet.att.net (InterMail v03.02.03 118 118 102)
          with SMTP id <19980819135401.IJIW4230@PREINSTALLEDCOM>
          for <gfabasic@linux.net.eu.org>; Wed, 19 Aug 1998 13:54:01 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 19 Aug 1998 13:54:01 +0000
Subject: Re: [GFA] MS-Write, etc. ...
X-UIDL: be9d790b87635d1d9236c4b05e2f92de

* List: gfabasic@aachen.linux.de

At 02:34 PM 19/08/98 +-200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi!
>
>I've got two questions, first a would like to know how to write the
MS-WRITE document-format? And secondly I need (!) to know how to use the
Original Windows-FTP-Programm by using a script-file. I had tried to find
out how it works by using a script, but I had no success.
>
>Many thanks in advance
>yours
>
>Thomas
>
Announcing the new improved Wotsit's Format! 

Wotsit's Format has moved to http://www.wotsit.org and now features a search 
facility, discussion forum and a programming links page as well as being bigge
r 
and faster than before.

The site not only houses a large collection of file format information, but is
 
now extended so programmers can share ANY useful programming information there

From ???@??? Mon Aug 31 18:43:41 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9B1l-00NElLC>; Wed, 19 Aug 1998 18:24:01 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0BD65D054; Wed, 19 Aug 1998 19:31:38 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DB0BFA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 19 Aug 1998 09:21:56 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] INTR $21
X-UIDL: ac6be630e4a6073ebf4fb2ab54d6175b

* List: gfabasic@aachen.linux.de

I know that some of the finest programmer monitor this site. Surely someone
must be familiar with the new INTR$21. All help greatly appreciated.
Dale Bryant


I can't seem to get an answer from
   our resident experts (on Bero) on how to use the new Intr $21
   stuff so I won't be able to complete MINISCAN any time soon.

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:42 1998
Return-Path: <URaatz5552@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9BKp-00NDMaC>; Wed, 19 Aug 1998 18:43:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5A81CD055; Wed, 19 Aug 1998 19:51:14 +0200 (CEST)
From: <URaatz5552@aol.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DB1092.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Wed, 19 Aug 1998 12:31:43 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0.i  for Windows sub 85
Subject: [GFA] Bitte um Hilfe!
X-UIDL: fc6c4add58fa3c231ee4129b5a465907

* List: gfabasic@aachen.linux.de

Liebe Gleichgesinnte!

ich erbitte Loesungsvorschlaege zu den folgenden Problemstellungen:
-------------------------------------------------------------------
1.) 
Unter Win 3.11 (ja, ich weiss, "etwas alt"...) moechte ich ein
Programm "fernsteuern".
Beide Programme, mein, noch zu schreibendes GFA-Basic Prog.,
als auch das "fernzusteuernde" sind auf (m)einem Computer /
KEINE  (NUll-) Modem-, Netzwerk-, etc., Verbindung!

So moechte ich, per API-Funktion(en), in dem "ferngesteuerten" Programm
einen bestimmten Menupunkt aufrufen und den so "angeklickten" Menupunkt
vom "ferngesteuerten" Programm "ganz normal ausfuehren" lassen.
Dies soll also NICHT ueber setzen des Mauszeigers + Doppelklick... passieren!

Das Fenster- und (Sub-) Menu-Handle bestimmt mein Programm bereits korrekt. 
Es gelingt mir, den Menupunkt ansich grafisch(!) zu veraendern...
(... was mich aber nicht wirklich weiterbringt !)
So funktioniert, zum Beispiel: 
f!=EnableMenuItem(f&,element&,MF_BYPOSITION | MF_DISABLED | MF_GRAYED)
..und auch: Auslesen des MenuStrings per:
anz&=GetMenuString(f&,element&,V:temp$,max&,MF_BYPOSITION)


WAS NICHT KLAPPT...
.. ist der Aufruf/die Aktivierung/das "Anklicken" des Menueintrages,
sodass das "ferngestuerte" Programm den Menupunkt so abarbeitet, alsoob
ein User den betreffenden Menu-Eintrag "ganz normal", z.B. mit der Maus,
selektiertiert und ihn "doppelgeklickt" haette!

Beispiel (Programm-Manager):
Menu besteht aus vier Punkten:
Datei / Optionen / Fenster / Hilfe

"Fenster" hat, ZUM BEISPIEL, die Eintraege:
-Ueberlappend
-Nebeneinander
-Symbole anordnen

Wenn das Menu (Datei/Optionen/...) das Handle m&,
der Menupunkt "Fenster" das  (Sub-) Handle "f&" hat ( f&=GetSubMenu(m&,2) )
und mein Programm den ZWEITEN Eintrag (= "Nebeneinander" )
(=Variabel element& ; IM BEISPIEL =1 , da OPTION BASE 0)
"aufrufen/aktivieren/anklicken" (wie sagt man dazu?) soll,
so weiss ich NICHT mit welchen API-Befehlsfolgen man dies realisiert!

~SendMessage(f&, BEFEHL , element&,0)   ?
~PostMessage( ...wie zuvor... )         ?
~PostAppMessage( ...wie zuvor...)       ?

Es hat den Anschein, dass mir nur ein einziger Befehl fehlt!
Kann man das Problem mit der erstgenannten ~SendMessage
und einem mir nicht bekannten Befehl loesen ? 

Bitte beachten:
Ich weiss, dass es sich im HIER gewaehlten Beispiel um ein
SYSTEM-Menu handelt... bei dem Programm das ich "fernsteuern"
moechte handelt es sich aber um eine "ganz normales" Menu / also
KEIN SYSTEM Menu!

-----------------------------------------------------------------------

2.)
Ich versuche aus einer Combobox EINES ANDEREN PORGRAMMS Eintraege
auszulesen.
Das "Merkwuerdige":
Bei einem "sauber programmierten" Programm funktioniert meine im folgenden 
wiedergegebene Programmierung einwandfrei, aber bei dem Programm, dass
ich "fernsteuern" moechte ueberhaupt nicht! 
 
Jedoch: In beiden Faellen(!) erhalte ich die korrekte Anzahl der Combobox-
Eintraege.

Anmerkung:
cb& = korrektes Comboboxhandle!
Habe es mit "WINDFIND MOUSESX,MOUSESY,w&" ueberprueft!

// Meine Programmzeilen:
ncb&=SendMessage(cb&,CB_GETCOUNT,0,0)
PRINT ncb&;" Eintraege in der Combobox."

For a&=0 to ncb&-1	// Optionbase NULL beachten!

// Folgende Zeile zum Auslesen der Elemente NICHT
// unbedingt notwendig ! Ich weiss...
~SendMessage(cb&,CB_SETCURSEL,a&,0)	 

len&=SendMessage(cb&,CB_GETLBTEXTLEN,a&,0)
in$=SPACE$(len&)+CHR$(0)
adr%=V:in$

~SendMessage(cb&,CB_GETLBTEXT,a&,adr%)
in$=CHAR{adr%}
print a&+1;".: ausgelesen: >";in$;"< len=";LEN(in$)
next a&

Ich glaube ca. 200 Varianten schon ausprobiert zu haben
(jeweils in Kombination mit SendMessage/PostMessage/PostAppMessage
und den entsprechend "definierten/vorbereiteten" Variabeln/Puffern/etc.)

   - EM_GETLINE / unter Beachtung, dass im 1. Word des Puffers die
   Anzahl der eingelesenen Bytes STETS steht ... WORD{V:temp$}=anz&...
   - WM_GETTEXT
   - LB_GETTEXT
   - ...=GetWindowTex()
   - Handle-/Identifikations-Aenderungen... 
      id&=GetDlgItem() / id&=GetMenuItem() / id&=GetDlgCtrlID()
      mdi&=SendMessage(cb&,WM_MDINEXT,0,0)
   - ~SendMessage(cb&,CB_SETEDITSEL,MAKELONG(... , ...) ,...)
   - f!=GetDlgItemText()
   - item%=SendMessage(cb&,CB_GETITEMDATA,0,0)
   - LoadString()

Interessant auch hier:
Durch ~SendMessage(cb&,CBN_DROPDOWN,0,0) (und anschliessender
REPEAT / PEEKEVENT / UNTIL INKEY$=" ") muesste die Combobox "grafisch" 
aufklappen; dies tut sie jedoch nicht! Denkfehler meinerseits ?

Vom "fernzusteuernden" Programm bekomme ich vier Bytes ( 5.Byte=CHR$(0) )
zurueck!
Beispiel: 4 / 105 / 237 / 38 / 0
Handelt es sich hier um einen Offset, sodass man per _HUGE(base%,offset%)
an den gesuchten Combobox-Eintrag gelangt ?? Vorgehensweise ?
Hat bei mir (bisher) NICHT funktioniert!
OemToAnsi, und umgekehrt, hat mich auch nicht weitergebracht!!

Liegt im "ferngesteuerten" Programm eine "OWNER-Combobox-structur" vor?
Wie handhabt man diese? 
-------------------------------------------------------------------------

Im Rahmen beider Problemstellungen habe ich mich auch mit den folgenden 
API - Befehlen beschaeftigt:

.. funktioniert alles nicht so wie ich es mir erhofft habe ...
diverste SendMessage-Befehle:
  MSGF_MENU / MF_CHECKED 

GetCodeHandle() ? GetModuleHandle() ? Local(Un)Lock() ?
(Un)LockSegment() ? LocalSize() ? (Un)LockData() ?
FindAtom() ?
Task ? Yield() ? 

-------------------------------------------------------------------------

B I T T E  emailt mir Loesungsvorschlag unter


URaatz5552@aol.com


D A N K E ! Im Voraus !!!


ANREGUNG an GFA:
Bitte stellen Sie doch auch die 
WINSDK.hlp  (SDKWIN.hlp ?) in Ihren ftp-Server!!!

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:45 1998
Return-Path: <t.maier@owl-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9Dj2-00NEinC>; Wed, 19 Aug 1998 21:16:52 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C2612D067; Wed, 19 Aug 1998 22:24:33 +0200 (CEST)
From: "Thomas Maier" <t.maier@owl-online.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DB3485.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 19 Aug 1998 21:17:37 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] i need Help !!
X-UIDL: b831673a6f3156e3ad8ad13042b585fe

* List: gfabasic@aachen.linux.de

Hi,

I need a Procedure to get the incoming Call number with Capi20.
I have tons of Information for Capi 2.0 but my English and "C" is not the
best.

I think i am not the first with this Problem.


DLL #1,"capi20.dll"
  DECL WORD CAPI_REGISTER(w,w,w,w,l) PASCAL GET
  DECL WORD CAPI_RELEASE(w) PASCAL GET
  DECL WORD CAPI_PUT_MESSAGE(w,l) PASCAL GET
  DECL WORD CAPI_GET_MESSAGE(w,l) PASCAL GET
  DECL WORD CAPI_SET_SIGNAL(w,l,w) PASCAL GET
  DECL WORD CAPI_GET_MANUFACTURER(l) PASCAL GET
  DECL WORD CAPI_GET_VERSION(l,l,l,l) PASCAL GET
  DECL WORD CAPI_GET_SERIAL_NUMBER(l) PASCAL GET
  DECL WORD CAPI_GET_PROFILE(l,w) PASCAL GET
  DECL WORD CAPI_INSTALLED() PASCAL GET
ENDDLL

OPENW #1,0,0,600,480,48
CLR ApplID&
fehler& = ^CAPI_REGISTER(2048,1,2,128,*ApplID&)
IF fehler& = 0
  buffer$ = SPACE$(2048)
  t& = 0
  DO
    GETEVENT
    fehler& = ^CAPI_GET_MESSAGE(ApplID&,*t&)
    if fehler&=0
    @Auswertung
    endif
    EXIT IF MENU(1) = 4 OR fehler& = 0
  LOOP
  fehler% = ^CAPI_RELEASE(ApplID&)
endif
FREEDLL 1
CLOSEW #1
EDIT

Procedure Auswertung
..
Return

This is my Example to start but, i dont no this is correct. I think the
Calling number come with
the D-Channel but how i can get this.

ciao Thomas



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:47 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9P1Q-00NEmUC>; Thu, 20 Aug 1998 09:20:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 288CCD06D; Thu, 20 Aug 1998 10:28:16 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DBDE24.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id ADF12A180040; Thu, 20 Aug 1998 09:19:13 +0200
Date: Thu, 20 Aug 1998 09:08:16 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Bitte um Hilfe!
X-UIDL: a53b12b86d7f0f51d6b0cf00f189e142

* List: gfabasic@aachen.linux.de

Hi,

What you need is a sendkey command. This is implemented using a journal
playback hook. There are C examples available on the internet. Please search
for sendkeys or try www.r2m.com/windev.

I located the code at: sendkey.arc from ftp.microsoft.com

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:48 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9P2M-00NDMGC>; Thu, 20 Aug 1998 09:21:34 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B5753D071; Thu, 20 Aug 1998 10:28:39 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DBDE38.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
  (SMTPD32-4.06) id ADF02A180040; Thu, 20 Aug 1998 09:19:12 +0200
Date: Thu, 20 Aug 1998 08:59:00 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] INTR $21
X-UIDL: 030cb41997b155cd7286ea156085b94e

* List: gfabasic@aachen.linux.de

>> I know that some of the finest programmer monitor this site. Surely someone
must be familiar with the new INTR$21. All help greatly appreciated.

Shortly, I looked into the mentioned interrupt but did not find any hints
about it. Please check /msdn and /kb on microsoft.com.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:49 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9P3A-00NEmUC>; Thu, 20 Aug 1998 09:22:24 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3FA2AD070; Thu, 20 Aug 1998 10:28:29 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DBDE2D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id ADF22A180040; Thu, 20 Aug 1998 09:19:14 +0200
Date: Thu, 20 Aug 1998 09:12:28 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] i need Help !!
X-UIDL: 3297aa7ea1bc6443312f5f788e895455

* List: gfabasic@aachen.linux.de

Your problem is unclear to me. Does the message end up in the message queue or
is it sent to the window procedure? What does AppIID represent? You provide
little or no info at all.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:50 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9P3p-00NEmYC>; Thu, 20 Aug 1998 09:23:05 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A8653D06F; Thu, 20 Aug 1998 10:28:24 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DBDE28.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id ADF02A180040; Thu, 20 Aug 1998 09:19:12 +0200
Date: Thu, 20 Aug 1998 08:59:00 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] INTR $21
X-UIDL: 1e109a9e6826c8d7ecd1e6a4eedc9f55

* List: gfabasic@aachen.linux.de

>> I know that some of the finest programmer monitor this site. Surely someone
must be familiar with the new INTR$21. All help greatly appreciated.

Shortly, I looked into the mentioned interrupt but did not find any hints
about it. Please check /msdn and /kb on microsoft.com.

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:52 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9WR0-00NDMiC>; Thu, 20 Aug 1998 17:15:30 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 60D4FD06E; Thu, 20 Aug 1998 18:23:10 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DC4D73.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 20 Aug 1998 08:13:35 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] INTR $21
X-UIDL: c6adeeee630f6bbc95f937fcbe2da509

* List: gfabasic@aachen.linux.de

Thanks, Sjouke I will try and do that today. How's the new job?
Dale

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: Sjouke Hamstra <shamstra@gelrevision.nl>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Thursday, August 20, 1998 12:23 AM
Subject: Re: [GFA] INTR $21


>* List: gfabasic@aachen.linux.de
>
>>> I know that some of the finest programmer monitor this site. Surely
someone
>must be familiar with the new INTR$21. All help greatly appreciated.
>
>Shortly, I looked into the mentioned interrupt but did not find any hints
>about it. Please check /msdn and /kb on microsoft.com.
>
>Regards,
>Sjouke Hamstra
>GFA-related homepage: http://www.gfa.net/home/shamstra
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:43:53 1998
Return-Path: <nauglin@sie.es>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0z9Z20-00NEmdC>; Thu, 20 Aug 1998 20:01:52 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 55869D057; Thu, 20 Aug 1998 21:09:36 +0200 (CEST)
From: nauglin@sie.es
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DC7470.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
 (EMWAC SMTPRS 0.83) with SMTP id <B0000002694@www.gtsnet.net>;
 Thu, 20 Aug 1998 19:53:47 +0200
Date: Thu, 20 Aug 1998 16:51:41 +0200
X-Mailer: Mozilla 3.04Gold (Win95; I)
MIME-Version: 1.0
References: <35AD0B77.BeroList-2.5.7@linux.net.eu.org> <35AD4198.BeroList-2.5.7@linux.net.eu.org>
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Subject: Re: [GFA] FW: Krazee!
X-UIDL: ed7f1dae83d2676e9c548e419c755c06

* List: gfabasic@aachen.linux.de

> -------------------------- Dale Bryant wrote:
>
>Any ideas on this?


> -------------------------- Bev Brown wrrote
>
> Hi Guys:
>
> This business of setting up Windows, Menu Bar, Toolbar & Statusbar (there's
> at least 6 different ways) is driving me krazee! I can get most of them to
> work BUT try having one of the hot buttons (toolbar) call up a POPUP & your
> probs begin (but only in the compiled version -- nutz!). Any suggestions????
>
>                                                -->Bev<--

> ---------------------------Alan Lennon wrote:
> I found this as well when I tried to generate a popup by trapping a
> WM_RBUTTONDOWN message in a callback. Worked fine in the interpreter
> but  failed to produce a popup menu when compiled. I converted the popup
> to a dialog and it then worked. I put it down at the time to a compiler
> bug.
> 
> Regards Alan Lennon


Hi Dale, Bev, Alan, and sorry for the delay...

Try to open an invisible window somewhere (at 5000,5000 for example),
then make the popup, and finally close the window. I guess the popup is
a bit shy creature, and it needs some kind of a home to feel safe... (It
might be a computing bug too, who knows)


	Nauglin



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:44:41 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zA4zt-00NDHEC>; Sat, 22 Aug 1998 06:09:49 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8FED8D058; Sat, 22 Aug 1998 07:17:33 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DE5470.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 22 Aug 1998 00:09:03 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] input function
X-UIDL: dba63d54d633e5bb4529a189d645acf9

* List: gfabasic@aachen.linux.de

Its been 6 years now since the release of GFAW.

Has anyone written a decent Windows compatible replacement for the GFA
INPUT statement?

I have been struggling with it, but I can't get a callback routine to
recognize the the return keystoke.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:44:53 1998
Return-Path: <rlaporte@abo.rhein-zeitung.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zAAC2-00NDHEC>; Sat, 22 Aug 1998 11:42:42 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9EF90D059; Sat, 22 Aug 1998 12:50:31 +0200 (CEST)
From: Ralf La Porte <rlaporte@abo.rhein-zeitung.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DEA277.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 22 Aug 1998 11:43:27 +0200
X-Mailer: Ralf La Porte's registered AK-Mail 3.0b sppb1 [ger]
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1

Subject: Re: [GFA] i need Help !!
X-UIDL: 1eaa0ac7ca7e0975d98675168d31086c

* List: gfabasic@aachen.linux.de

> * List: gfabasic@aachen.linux.de

> Hi,
Hallo,


> I need a Procedure to get the incoming Call number with Capi20.
> I have tons of Information for Capi 2.0 but my English and "C" is not the
> best.

> I think i am not the first with this Problem.


> DLL #1,"capi20.dll"
>   DECL WORD CAPI_REGISTER(w,w,w,w,l) PASCAL GET
>   DECL WORD CAPI_RELEASE(w) PASCAL GET
>   DECL WORD CAPI_PUT_MESSAGE(w,l) PASCAL GET
>   DECL WORD CAPI_GET_MESSAGE(w,l) PASCAL GET
>   DECL WORD CAPI_SET_SIGNAL(w,l,w) PASCAL GET
>   DECL WORD CAPI_GET_MANUFACTURER(l) PASCAL GET
>   DECL WORD CAPI_GET_VERSION(l,l,l,l) PASCAL GET
>   DECL WORD CAPI_GET_SERIAL_NUMBER(l) PASCAL GET
>   DECL WORD CAPI_GET_PROFILE(l,w) PASCAL GET
>   DECL WORD CAPI_INSTALLED() PASCAL GET
> ENDDLL

> OPENW #1,0,0,600,480,48
> CLR ApplID&
> fehler& = ^CAPI_REGISTER(2048,1,2,128,*ApplID&)
> IF fehler& = 0
>   buffer$ = SPACE$(2048)
>   t& = 0
>   DO
>     GETEVENT
>     fehler& = ^CAPI_GET_MESSAGE(ApplID&,*t&)
>     if fehler&=0
>     @Auswertung
>     endif
>     EXIT IF MENU(1) = 4 OR fehler& = 0
>   LOOP
>   fehler% = ^CAPI_RELEASE(ApplID&)
> endif
> FREEDLL 1
> CLOSEW #1
> EDIT

> Procedure Auswertung
> ..
> Return

> This is my Example to start but, i dont no this is correct. I think the
> Calling number come with
> the D-Channel but how i can get this.

> ciao Thomas



> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org



ich habe zwar auch einen ISDN-Anschluss und mir immer vorgenommen hierzu mittels GFA-Basic etwas zu entwickeln, kam aber bisher nicht dazu.

Das obige Pgm. erkennt keinen Anruf, bisher hatte ich keine Zeit es mir genauer anzuschauen. Es gibt jedoch zwei interessante WWW-Seiten:

	WWW.AVM.DE		- Support von AVM-Karten und Doku, Beispiel-Pgm. zu CAPI
	WWW.CAPI.ORG	- Infos zu Capi, Doku etc.

Ich wuerde Dir empfehlen dort einmal nachzuschauen. Es gibt einige in C geschriebene Beispiele.

Gruesse Ralf

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:44:56 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zAAS1-00NEmYC>; Sat, 22 Aug 1998 11:59:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D0D4AD063; Sat, 22 Aug 1998 13:06:56 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DEA653.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980822095827.BNRH18415@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 22 Aug 1998 09:58:27 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 22 Aug 1998 09:58:27 +0000
Subject: [GFA] whew!
X-UIDL: fc8ea1c3ccd2216f12c1506bd95d423d

* List: gfabasic@aachen.linux.de

22/08/98 4:45:25 AM   whew!

Have been 7-1/2 hrs, 3 full Win95 reinstalls, 3 registry reinstalls 
from DOS & 6 from within Win95 setup.  I'm tired!

Used an upgrade CD... 8 files were older than what I already had.  
That's out of how many hundred?

Learned one thing... the GFA-W routine I used to copy the registry 
somehow mucques with it & corrupts it from Tulsa to Paris, France & 
back (the looooonnnnnnnnng way around!)!

Have possibly sped things up a bit, but I gotta sleep on it before I 
can say for sure.  It seems to boot a little faster now.  Next trip, 
it's strip & make it 3.1!

Something was mucqued before w/ Windows... the 1st re-install said 
there was problems w/ the HD, so scandisk locked out a bunch of 
sectors.  The last time thru, it said there wasn't anything wrong & 
unlocked them.

Why am I doin this instead of raisin lizards or something for a hobby?

G'nite!
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:44:59 1998
Return-Path: <dlf@net-tech.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zATvH-00ND9lC>; Sun, 23 Aug 1998 08:46:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id EC828D064; Sun, 23 Aug 1998 09:54:24 +0200 (CEST)
From: "Duane Forster" <dlf@net-tech.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35DFCAB1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 23 Aug 1998 16:46:25 +1000
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
X-Info: Network Technology Internet
Subject: [GFA] Basic Problem for someone to solve
X-UIDL: 333e0bc0a512efa869547bfe412cb883

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Mon Aug 31 18:45:00 1998
Return-Path: <benny@zeb.be>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zAeq0-00NDHSC>; Sun, 23 Aug 1998 20:26:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3CB95D065; Sun, 23 Aug 1998 21:33:50 +0200 (CEST)
From: Benny Sels <benny@zeb.be>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E06E9E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id AEB3D97001AA; Sun, 23 Aug 1998 20:25:55 +03d0
X-Sender: benny@mail.zeb.be
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Sun, 23 Aug 1998 20:20:26 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] LM78 monitoring in GFA Basic
X-UIDL: 0f01b159fe5f2412bade3dc1f7d6d0fa

* List: gfabasic@aachen.linux.de

Hello,

I like to monitor the LM78 chip (found on modern mainboards) in gfa basic
to check temperature, fan etc...
but my knowledge of C++ is not so good.
Can anyone help me with the examples in C++??

You can find the examples at
http://www.national.com/sw/LM/LM78/lm78vxd.zip
http://www.national.com/sw/LM/LM78/lm78sys.zip

Thanks

Benny Sels




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:02 1998
Return-Path: <karl@pcpostal.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zAgAE-00NDHSC>; Sun, 23 Aug 1998 21:50:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 041F6D066; Sun, 23 Aug 1998 22:58:29 +0200 (CEST)
From: Karl Phan <karl@pcpostal.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E08279.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 23 Aug 1998 15:50:03 -0400
Organization: Karl Phan
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] WHAT IS THE DESCRIPTOR MEAN?
X-UIDL: 99ace25137c0037edcee1599655810a4

* List: gfabasic@aachen.linux.de

What is the descriptor mean and what is it use for?

DEFSTR "s"
DEFINT "a, d"

s = "Hello"
d=*s                        // address of s descriptor

Thanks,

Karl

--------------------------------------------------------------
ARRPTR() Function

Function: returns the address of a variable of any type.

Syntax: ARRPTR(x)

x: variable or field name

Abbreviation: *

Explanation: ARRPTR(a()) and ARRPTR(a$) return the addresses of array
and string descriptors respectively.

Example: OPENW #1

DIM a(1)
PRINT ARRPTR(a())         // prints the address of a()
       //  descriptor
PRINT *a$                  // prints the address of a$
       //  descriptor
PRINT ARRPTR(n%)           // prints the address of n%
PRINT *n%                  // prints the address of n%
KEYGET a%
CLOSEW #1

Remark: *x is synonymous with ARRPTR()  and can be used instead.

See Also: VARPTR(), V:, PEEK(), DPEEK(), LPEEK()




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:15 1998
Return-Path: <karl@pcpostal.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zAkpC-00NEj9C>; Mon, 24 Aug 1998 02:49:34 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 63E97D04C; Mon, 24 Aug 1998 03:57:16 +0200 (CEST)
From: Karl Phan <karl@pcpostal.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E0C87C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 23 Aug 1998 20:48:51 -0400
Organization: Karl Phan
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] WHAT IS A DESCRIPTOR?
X-UIDL: a2d41f4c90ac6ddce69faf9287d6aef9

* List: gfabasic@aachen.linux.de

DEFSTR "s"
DEFINT "a, d"

LET s = "Hello"
LET d = *s               // address of s descriptor -- what is it?

Karl


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:16 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zAkvQ-00ND9lC>; Mon, 24 Aug 1998 02:56:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BFD63D052; Mon, 24 Aug 1998 04:03:49 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E0CA05.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 23 Aug 1998 17:52:51 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Apology
X-UIDL: 9c7f6dc03e0a95bdace4a062aa93ed30

* List: gfabasic@aachen.linux.de

All,
If anyone on the mailing list has downloaded the GFAWHELP file in the past
week I apologize that it somehow got corrupted in transfer. It has been
corrected and  I am sorry.
RECINDX.ZIP by Bev brown has been added to the file list as of today. Very
nice recipe filing program. Coming soon is Little Black Book by Bev. A phone
and address filing program that will even dial the phone number if you are
the lazy type.
Also, two great utilities by Roland Walter have been made available for
download. One, called TEXTSRCH will search all GFA .LST files for a command
you know you have used but need a little refreshing on its exact syntax. An
example :  LB_GETCURSEL. It searches all the list files in a folder,and sub
folders, and displays the code on the screen.  It will even find OPENW in
case your memory is really bad.(G) Also available is SHUTDOWN by Roland.
SHUTDOWN shows all active modules and can be shut down when selected.  Great
for those unreleased .dlls.
Joe Hurst sent INTERNET.ZIP which allows sending Email from a GFA program.
INTERNET also will sign on the internet and load the selected web page from
within a GFA program.


http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:18 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zAuff-00NGbOC>; Mon, 24 Aug 1998 13:20:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 36305D04F; Mon, 24 Aug 1998 14:27:36 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E15C38.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 24 Aug 1998 07:18:55 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Basic Problem for someone to solve
X-UIDL: fe9e19f99ceebf099e269ef58a7b8ebc

* List: gfabasic@aachen.linux.de

// Hellow.gfw  8/98   B.Deck
//
// This is the absolute minimum windows compatible program for GFAW
//
// GFA has no automatic screen redraw capablity, so you must do all your
output to a // memdc and then blit that to the screen.
//
// The use of callbacks would be an alternative to menu() functions.
// However, I could not get invalidated areas to repaint correctly using
callbacks.
// If someone knows how to call repaint()  correctly from a callback,
please post.
//

DIM hm&(10),hb&(10)

OPENW #1,0,0,300,200,48 + 512 + 128 + 64
~SelectPalette(_DC(1),_PAL(1),FALSE)  // foreground

xx = _X
yy = _Y

hm&(1) = MEMDC(_DC(1))    // create a compatible MemoryDeviceContext
hb&(1) = CREATEBMP(xx,yy)     // create a bitmap
~SelectPalette(_DC(2),_PAL(1),FALSE)  // use same palette in bitmap

dostuff // here is your screen output


DO
  GETEVENT
  // This is how stuff gets to the screen. Never write directly to screen
  IF MENU(1) = 21 && MENU(14) = 1 THEN repaint(1)

UNTIL MENU(1) = 4 && MENU(14) = 1



FREEDC hm&(w)  // GDI resources must be released before ending
FREEBMP hb&(w)  // GDI resources must be released before ending
CLOSEW #1
END

> PROCEDURE repaint(w)
  SETDC _DC(w)
  REALIZE w
  CLS
  BITBLT hm&(w),0,0,xx,yy,_DC(w),0,0,SRCCOPY

RETURN

> PROCEDURE sfbm(w) // redirect graphic output to bitmap in memory
  SETBMP hm&(w),hb&(w)
  SETDC hm&(w)
  CLS
RETURN


> PROCEDURE dostuff

  sfbm(1) // set focus to bitmap for graphic output

  // Draw some stuff into the bitmap

  COLOR RAND(16)
  BOX 50,50,xx - 50,yy - 50

  COLOR RAND(16)
  CIRCLE xx / 2,yy / 2,yy / 2

  COLOR RAND(16)
  TEXT xx / 2.,yy / 2,"Hello"

  COLOR 0
  LOCATE 0,0
  PRINT "Hi there"   // Even the print statement is redirected to bitmap



  repaint 1


RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:20 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zAw5M-00NDBWC>; Mon, 24 Aug 1998 14:51:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4A628D04C; Mon, 24 Aug 1998 15:58:21 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E1717D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 24 Aug 1998 11:04:41 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"

X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Background-Color
X-UIDL: 3c43d5e5da591d7d6e32ca22caa8de33

* List: gfabasic@aachen.linux.de

Hi!

How can I set the background-color for an object of an dialog? For example I have to set the background of the "LTEXT"-object from white to gray (or any color).

Many thanks in advance,
yours

Thomas

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:21 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zB0H5-00NDM8C>; Mon, 24 Aug 1998 19:19:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 77F6CD04F; Mon, 24 Aug 1998 20:27:03 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E1B07A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 24 Aug 1998 13:18:14 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Basic Problem for someone to solve
X-UIDL: 84131a9cf61b142ab506e9a45757d4e2

* List: gfabasic@aachen.linux.de

> When I have text on a window and either minimize,maximize etc..the =
> window=20
> I loose the text with a blank window.

// HELLOMIN.LST  Revised 8/22/98   B.Deck
//
// Here's the simple version of Hello.
// This is the absolute minimum Windows compatible program for GFAW
// to put text and graphics in a standard window, without using bitmaps or
metafiles.
// It has the least requirement in terms of resources, and has the
advantage that
// PRINT works correctly with scrolling, because you are printing tho the
actual screen.
//
// If someone knows how to do this using metafiles, please post.
//
// Text or predifined windows controls may be put in a dialog box.
// Dialogs/controls have automatic repaint by default. User-defined windows
// in GFAW have no automatic repaint.

OPENW #1,0,0,300,200,48 + 512 + 128 + 64
~SelectPalette(_DC(1),_PAL(1),FALSE)  // This should not be necessary, but
it is
xx = _X
yy = _Y

dostuff // here is your screen output

DO
  GETEVENT
  IF MENU(1) = 21 && MENU(14) = 1 THEN repaint(1)
UNTIL MENU(1) = 4 && MENU(14) = 1

FOR x = 0 TO 31
  CLOSEW #x
NEXT x

END



PROCEDURE repaint(w)  // blit the bitmap from memdc to the screen
  SETDC _DC(w)
  REALIZE w
  CLS
  dostuff
RETURN

PROCEDURE dostuff
  w = 1

  // Draw some stuff into the bitmap

  COLOR RAND(16)
  BOX 50,50,xx  - 50,yy  - 50

  COLOR RAND(16)
  CIRCLE xx / 2,yy / 2,yy / 2

  COLOR 0
  TEXT xx / 2 - 20,yy / 2 - 8,"Hello"

  LOCATE 0,0
  PRINT " Hi there ..."   // print is redirected to bitmap, but it won't
scroll !!!

RETURN





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:23 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zB14Q-00NGbXC>; Mon, 24 Aug 1998 20:10:22 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4254DD051; Mon, 24 Aug 1998 21:18:06 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E1BC71.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 24 Aug 1998 11:07:02 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Basic Problem for someone to solve
X-UIDL: d7481bbf2301b9c9d8c50cb749107f17

* List: gfabasic@aachen.linux.de

Hi Brent,
Sent you an attachment to your email address called TEXTMETA.ZIP
Please let me know if received.
Dale Bryant

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: BDD <BrentDeck@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Monday, August 24, 1998 10:20 AM
Subject: [GFA] Basic Problem for someone to solve


* List: gfabasic@aachen.linux.de

> When I have text on a window and either minimize,maximize etc..the =
> window=20
> I loose the text with a blank window.

// HELLOMIN.LST  Revised 8/22/98   B.Deck
//
// Here's the simple version of Hello.
// This is the absolute minimum Windows compatible program for GFAW
// to put text and graphics in a standard window, without using bitmaps or
metafiles.
// It has the least requirement in terms of resources, and has the
advantage that
// PRINT works correctly with scrolling, because you are printing tho the
actual screen.
//
// If someone knows how to do this using metafiles, please post.
//
// Text or predifined windows controls may be put in a dialog box.
// Dialogs/controls have automatic repaint by default. User-defined windows
// in GFAW have no automatic repaint.

OPENW #1,0,0,300,200,48 + 512 + 128 + 64
~SelectPalette(_DC(1),_PAL(1),FALSE)  // This should not be necessary, but
it is
xx = _X
yy = _Y

dostuff // here is your screen output

DO
  GETEVENT
  IF MENU(1) = 21 && MENU(14) = 1 THEN repaint(1)
UNTIL MENU(1) = 4 && MENU(14) = 1

FOR x = 0 TO 31
  CLOSEW #x
NEXT x

END



PROCEDURE repaint(w)  // blit the bitmap from memdc to the screen
  SETDC _DC(w)
  REALIZE w
  CLS
  dostuff
RETURN

PROCEDURE dostuff
  w = 1

  // Draw some stuff into the bitmap

  COLOR RAND(16)
  BOX 50,50,xx  - 50,yy  - 50

  COLOR RAND(16)
  CIRCLE xx / 2,yy / 2,yy / 2

  COLOR 0
  TEXT xx / 2 - 20,yy / 2 - 8,"Hello"

  LOCATE 0,0
  PRINT " Hi there ..."   // print is redirected to bitmap, but it won't
scroll !!!

RETURN





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:25 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zB2bb-00NDL7C>; Mon, 24 Aug 1998 21:48:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C8D8ED04F; Mon, 24 Aug 1998 22:56:26 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E1D37B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 24 Aug 1998 15:48:01 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="26310374-3b87-11d2-b418-00805feae8d8"
Subject: Re: [GFA] Basic Problem for someone to solve
X-UIDL: daae1961fca2a477b029487d45106684

>> Hi Brent,
>> Sent you an attachment to your email address called TEXTMETA.ZIP

Thanks for the post. Heres my copy of my efforts to create a reuseable
metafile in memory.
Let me know if you can point me in the right direction.

Best Regards,
Brent

Attachment Converted: "c:\programme\eudora\attach\PROTMETM.GFW"
From ???@??? Mon Aug 31 18:45:27 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zB2zw-00NEmiC>; Mon, 24 Aug 1998 22:13:52 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A4430D052; Mon, 24 Aug 1998 23:21:42 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E1D966.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 24 Aug 1998 16:13:11 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="7c4ae13b-3b87-11d2-b8f1-00805ffe6ed5"
Subject: [GFA] Basic Problem for someone to solve
X-UIDL: e0d070db53f0fe82ae3a740dd7d84862

>>>When I have text on a window and either minimize,maximize etc..the =
window=20
I loose the text with a blank window. <<<

Attached are updates for HELLOWIN.GFW  and HELLOMIN.GFW in HELLO.ZIP
The mail system was unkind to the files previously sent as text.


Attachment Converted: "c:\programme\eudora\attach\HELLO.ZIP"
From ???@??? Mon Aug 31 18:45:36 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zB743-00NGb8C>; Tue, 25 Aug 1998 02:34:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9D765D050; Tue, 25 Aug 1998 03:42:08 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E21670.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 24 Aug 1998 17:31:58 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] LBB
X-UIDL: 546df40b12a5bfc335227735210293c8

* List: gfabasic@aachen.linux.de

Bev Browns newest, Little Black Box, will be available for downloading on
the 25th of August at the web site below. This is a good one. It evens dial
a phone number from a record in its data base.

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:45:40 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zB8Hl-00NEjMC>; Tue, 25 Aug 1998 03:52:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 14AA7D050; Tue, 25 Aug 1998 05:00:28 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E228CC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 24 Aug 1998 21:52:09 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="ef7b7bb5-3bb4-11d2-9aab-00805fbe1e57"
Subject: [GFA] memory metafiles
X-UIDL: 38d74d5f45c2fc8e4941e425ec768b6e

See attached file METAMEM.LST in METAMEM.ZIP for an example of creating
reuseable 
metafiles in memory.

Attachment Converted: "c:\programme\eudora\attach\METAMEM.ZIP"
From ???@??? Mon Aug 31 18:45:44 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBMK8-00NEiWC>; Tue, 25 Aug 1998 18:52:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id DA7F5D055; Tue, 25 Aug 1998 19:59:43 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E2FB93.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id SAA14894 for <gfabasic@aachen.linux.de>; 
          Tue, 25 Aug 1998 18:51:32 +0200 (MET DST)
Date: Tue, 25 Aug 1998 18:48:46 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: [GFA] Register source code
X-UIDL: 8f9dfa926a89afcbc0863bbf0e9b5783

* List: gfabasic@aachen.linux.de

To all,

I'm looking for a simple register program in LST format.
Three fields and search function is needed. Load, save and print functions can
I do myself.

I need it for use in a calendar/diary program of my own. Can anyone give me a
tip?

Sven

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:04 1998
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBUDz-00NElsC>; Wed, 26 Aug 1998 03:18:11 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 03D7ED055; Wed, 26 Aug 1998 04:26:01 +0200 (CEST)
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E3723A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
X-BlackMail: 192.168.1.202, default, <michael@bonbit.org>, 192.168.1.202
X-Authenticated-Timestamp: 18:57:31(GMT) on August 25, 1998
X-Sender: michael@bonbit.org
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Tue, 25 Aug 1998 20:53:46 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] Date calculations
X-UIDL: db0e6288f184c58a43229dca85ad1bbc

* List: gfabasic@aachen.linux.de

Hi!

I have two problems to solve:

1. When a date is given, I need the week and the weekday

2. When week and weekday are given, I need the date

Any clues?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:05 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBVBi-00NEiUC>; Wed, 26 Aug 1998 04:19:54 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9059DD055; Wed, 26 Aug 1998 05:27:42 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E380AF.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 25 Aug 1998 19:17:39 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Date calculations
X-UIDL: c032d607a4e637ab07873b37606213b9

* List: gfabasic@aachen.linux.de

//From GFAWHELP
daycode("Today")
PROCEDURE daycode(wt$) //Expects window title
  // Time and date - Windows only allows interrupt $21
  OPENW #1,150,200,250,200,-1
  TITLEW #1,wt$
  PRINT "ALT. F4 To Close"
  ~INTR($21,_AH = $2A)
  DL = _DL,DH = _DH,CX = _CX
  D$ = "  /  /    "
  IF DH < 10
    MID$(D$,1) = "0"
    MID$(D$,2) = STR$(DH)
  ELSE
    MID$(D$,1) = STR$(DH)
  ENDIF
  MID$(D$,4) = STR$(DL)
  MID$(D$,7) = STR$(CX)

  PRINT "TODAY IS ";D$
  SWITCH _AL
  CASE 0
    a$ = "Sunday"
  CASE 1
    a$ = "Monday"
  CASE 2
    a$ = "Tuesday"
  CASE 3
    a$ = "Wednesday"
  CASE 4
    a$ = "Thursday"
  CASE 5
    a$ = "Friday"
  CASE 6
    a$ = "Saturday"
  ENDSWITCH
  PRINT "This is ";a$
  DO
    PEEKEVENT
  LOOP UNTIL MENU(1) = 4
  COLOR 0,15
  CLOSEW #1
RETURN

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: Michael Weigand <michael@bonbit.org>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Tuesday, August 25, 1998 6:56 PM
Subject: [GFA] Date calculations


>* List: gfabasic@aachen.linux.de
>
>Hi!
>
>I have two problems to solve:
>
>1. When a date is given, I need the week and the weekday
>
>2. When week and weekday are given, I need the date
>
>Any clues?
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:07 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBWIN-00NGbSC>; Wed, 26 Aug 1998 05:30:51 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id F10D5D055; Wed, 26 Aug 1998 06:38:31 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E39148.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 26 Aug 1998 13:02:50 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35E380AF.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Window template and scrolling
X-UIDL: 49f373c891bd80308d101038c6ad269b

* List: gfabasic@aachen.linux.de

The code posted recently for a Windows template is useful. Thank you for
posting it. I have one question arising from it. This may require a
larger answer or modification of that template. If a vertical scrollbar
is defined in OPENW, how to you then get it to work in order to display
text, graphics, etc that have been written to areas below the visible
window?
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:09 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBWsd-00NEm9C>; Wed, 26 Aug 1998 06:08:19 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 916FCD063; Wed, 26 Aug 1998 07:16:11 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E39A1B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980826040813.OAVE20411@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 26 Aug 1998 04:08:13 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 26 Aug 1998 04:08:13 +0000
Subject: Re: [GFA] Window template and scrolling
X-UIDL: 84a121cdd393a918697ce6cd59348250

* List: gfabasic@aachen.linux.de

At 01:02 PM 26/8/98 +0930, you wrote:
>* List: gfabasic@aachen.linux.de
>
>The code posted recently for a Windows template is useful. Thank you for
>posting it. I have one question arising from it. This may require a
>larger answer or modification of that template. If a vertical scrollbar
>is defined in OPENW, how to you then get it to work in order to display
>text, graphics, etc that have been written to areas below the visible
>window?
> 
+++
Will send graphics part when I can get on my P-100 again... W95 crashed.
Text would be much the same I think but I haven't made it work yet.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:11 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBWtG-00NGbQC>; Wed, 26 Aug 1998 06:08:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5C4C6D065; Wed, 26 Aug 1998 07:16:13 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E39A1D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980826040805.OATF20411@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 26 Aug 1998 04:08:05 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 26 Aug 1998 04:08:05 +0000
Subject: Re: [GFA] Date calculations
X-UIDL: cff7a38d049226693eeb0e163e03a744

* List: gfabasic@aachen.linux.de

At 08:53 PM 25/8/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi!
>
>I have two problems to solve:
>
>1. When a date is given, I need the week and the weekday
>
>2. When week and weekday are given, I need the date
>
>Any clues?
>
>
>M!chael
>
+++
A starting point... ?

gg1a$ = "as of " + @get_date$() + " at " + @tim$()

FUNCTION get_date$()
  LOCAL temp$,ctr%,i%
  LOCAL mon$="JanFebMarAprMayJunJulAugSepOctNovDec"
  LOCAL day$="SunMonTueWedThuFriSat"
  ~INTR($21,_AH = $2A)
  temp$ = MID$(day$,3 * _AL + 1,3) + " " + STR$(_DL) + " " + MID$(mon$,3 *
_DH - 2,3)
  temp$ = temp$ + " " + STR$(_CX)
  RETURN temp$
ENDFUNC

FUNCTION tim$()
  tm$ = TIME$
  IF VAL(LEFT$(tm$,2)) =< 12 THEN
    tm$ = tm$ + " a.m."
  ENDIF
  IF VAL(LEFT$(tm$,2)) > 12 THEN
    tm1& = VAL(LEFT$(tm$,2)) - 12
    tm1$ = STR$(tm1&),tm2$ = RIGHT$(tm$,6)
    tm$ = tm1$ + tm2$ + " p.m."
  ENDIF
  RETURN tm$
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:12 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBa6a-00NGbAC>; Wed, 26 Aug 1998 09:34:56 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0E02CD063; Wed, 26 Aug 1998 10:42:39 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E3CA82.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 26 Aug 1998 09:35:29 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] String Functions in IF sequence..
X-UIDL: 9840a38490bad083cbb13a6c4361c2d9

* List: gfabasic@aachen.linux.de

Just an Information:

GFA seems to have problems with doing a code like

	if @a$() = @b$()
and	if @a$() = "nok"
but	if "ok" = @b$()	' works !

Michael.
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:18 1998
Return-Path: <ch.pelz@uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBeZa-00NEn1C>; Wed, 26 Aug 1998 14:21:10 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 773E2D055; Wed, 26 Aug 1998 15:28:54 +0200 (CEST)
From: ch.pelz@uni-bonn.de
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E40D96.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Wed, 26 Aug 98 14:20:59 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Wed, 26 Aug 1998 14:19:23 +0200
In-Reply-To: <35E39148.BeroList-2.5.8@aachen.linux.de>
References: <35E380AF.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: ch.pelz@IBM.rhrz.uni-bonn.de
Subject: Re: [GFA] Window template and scrolling
X-UIDL: 82a07048828254830ccbefecca3ce0ac

* List: gfabasic@aachen.linux.de

Hi Dean,

you have to catch the scrollbar message in the Window-Function. If you use
the simple way like

DO
GETEVENT (or PEEKEVENT or SLEEP)
(your code)
LOOP UNTIL finished!=TRUE

then you can do that with the MENU()-Function of GFA. On its help page,
you'll find a description of which value means that the scrollbar was moved.

Then you have to react to the message: Scroll the window up with

~ScrollWindow(hWnd&, x&, y&, adr_r%, adr_clp%)
hWnd&: Handle of your Window (e.g. Win(1))
x&: number of pixels you want to scroll x-wards, positive value means
scroll right, negative value means scroll left.
y&: same y-wards, positive up, negative down
adr_r%: adress of a rect-struct (in Gfa-Basic: Types, see TYPE) describing
the area that will be scrolled
adr_clp%: adress of a rect-strct describing the clipping-area. If this is
smaller than the first rectangle, only the smaller one will be scrolled (so
just use the same struct as before)

and display the text that was hidden before in the botton part of the
window that is now unused. How you do that depends on how you organize your
redraw. If you copy a bitmap from a MEMDC to the Window, then just copy the
needed part of the bitmap. If you draw you text anew with every
WM_PAINT-Message, then you have to redraw the "new" part of the window on
your own. 

Or you redraw the whole window (then the ScrollWindow() doesn't make
sense), but give your draw-function an offset of as many bytes as you
wanted to scroll (you don't start with the top of the original window, but
with maybe 20 dots lower, so the top of the window is not visible, but you
have more room for the stuff that was hidden before).

Does this make sense to you?

Christian

At 13:02 26.08.98 +0930, you wrote:
>The code posted recently for a Windows template is useful. Thank you for
>posting it. I have one question arising from it. This may require a
>larger answer or modification of that template. If a vertical scrollbar
>is defined in OPENW, how to you then get it to work in order to display
>text, graphics, etc that have been written to areas below the visible
>window?
>



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:22 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBgF2-00ND98C>; Wed, 26 Aug 1998 16:08:04 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3AFB8D066; Wed, 26 Aug 1998 17:15:56 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E426AC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 26 Aug 1998 15:48:06 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"

X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Change of background-color
X-UIDL: 27e428ae2f8c172321aca2fd4d818d73

* List: gfabasic@aachen.linux.de

Hi!

How can I set the background-color for an object of an dialog? For example I have to set the background of the "LTEXT"-object from white to gray (or any color).

Many thanks in advance,
yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:23 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBju3-00NEn0C>; Wed, 26 Aug 1998 20:02:39 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 239BCD070; Wed, 26 Aug 1998 21:10:24 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E45DA4.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 26 Aug 1998 11:00:08 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] ha
X-UIDL: 1162f893cf70d5e619dc6dbc6a549ac4

* List: gfabasic@aachen.linux.de

> A computer was something on TV
> from a science fiction show of note
> a window was something you hated to clean....
> And ram was the cousin of a goat.....
>
> Meg was the name of my girlfriend
> and gig was a job for the nights
> now they all mean different things
> and that really mega bytes
>
> An application was for employment
> a program was a TV show
> a cursor used profanity
> a keyboard was a piano
>
> Memory was something that you lost with age
> a cd was a bank account
> and if you had a 3 1/2" floppy
> you hoped nobody found out
>
> Compress was something you did to the garbage
> not something you did to a file
> and if you unzipped anything in public
> you'd be in jail for a while
>
> Log on was adding wood to the fire
> hard drive was a long trip on the road
> a mouse pad was where a mouse lived
> and a backup happened to your commode
>
> Cut you did with a pocket knife
> paste you did with glue
> a web was a spider's home
> and a virus was the flu
>
> I guess I'll stick to my pad and paper
> and the memory in my head
> I hear nobody's been killed in a computer crash
> but when it happens they wish they were dead
>
http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:24 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBm2B-00NElXC>; Wed, 26 Aug 1998 22:19:11 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 88A99D070; Wed, 26 Aug 1998 23:26:56 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E47DA0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 26 Aug 1998 13:16:43 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] TRACKER
X-UIDL: c51d35d195427cface3b6574108552ba

* List: gfabasic@aachen.linux.de

HI,
INFO ONLY:
If any of you have your on web pages the tracking service below is FREE and
the reports it gives you are fantastic.
Dale


http://www.extreme-dm.com/tracking/?reg


http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:35 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBqOh-00NElNC>; Thu, 27 Aug 1998 02:58:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 84B91D055; Thu, 27 Aug 1998 04:06:35 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E4BF2B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 27 Aug 1998 10:30:53 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35E380AF.BeroList-2.5.8@aachen.linux.de> <35E40D96.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Window template and scrolling
X-UIDL: ac75f7964fab95c00b1e2c128b4aeebf

* List: gfabasic@aachen.linux.de

ch.pelz@uni-bonn.de wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> Hi Dean,
> 
> you have to catch the scrollbar message in the Window-Function. If you use
> the simple way like
> 
 --- snip ---
>
> Does this make sense to you?
> 
> Christian
> 

Yes, it does. Sort of. I'm familar with MENU() and TYPE variables. But
it sure seems like a lot of work. I was hoping there'd be a nice, easy
way of doing this. Guess not. What about this possiblity? Say you create
the window using a hidden bitmap or a non-visible window. Can I write
text and graphics to the bitmap area then PUT (or equivalent) the bitmap
to the visible window using an appropriate offset? I have not yet spent
any time using bitmaps or MEMDC.
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:37 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBr95-00NDGOC>; Thu, 27 Aug 1998 03:46:39 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7F4BBD06E; Thu, 27 Aug 1998 04:54:32 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E4CA68.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 26 Aug 1998 21:46:21 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Window template and scrolling
X-UIDL: da158fcb73989c89565b25d2c0ed8b5f

* List: gfabasic@aachen.linux.de

>>  Can I write text and graphics to the bitmap area then PUT (or
equivalent) the bitmap
to the visible window using an appropriate offset? I have not yet spent
any time using bitmaps or MEMDC. <<

Yes you can.

BUT if you are only going to have scrollable editable  text in the window,
then you're better off using a predefined child window of style EDIT. (or a
dialog)


OPENW #1,0,0,_X,_Y,1008

edit_text$="This is an Edit Text Box.  Please type in some text."

edit_param%=WS_VISIBLE | WS_CHILDWINDOW | WS_BORDER | WS_TABSTOP |
WS_HSCROLL | WS_VSCROLL | ES_AUTOHSCROLL | ES_LEFT | ES_AUTOVSCROLL |
ES_MULTILINE

id_edit&=CreateWindow("EDIT",edit_text$,edit_param%,0,0,_X,_Y,WIN(1),1,_INS
TANCE,0)

~SetFocus(id_edit&)

~SendMessage(id_edit&,WM_SETTEXT,0,V:edit_text$)

DO
  PEEKEVENT
  m1%=MENU(1)
  IF m1%=6 || m1%=18
    ~MoveWindow(id_edit&,0,0,_X,_Y,1)
  ENDIF
LOOP UNTIL m1%=4

CLOSEW #1















---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:38 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBrCN-00NDGOC>; Thu, 27 Aug 1998 03:50:03 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3FEB3D06E; Thu, 27 Aug 1998 04:57:57 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E4CB35.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 26 Aug 1998 21:49:32 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="1785775e-3d4c-11d2-9aab-00805fbe1e57"
Subject: [GFA] colors in metafiles....resource leak
X-UIDL: 387becb9caea480f9090493d5259c79e

I need help finding the leak in the attached file.

If colors are used in a metafile, resources are depleted.

Thanks, Brent


Attachment Converted: "c:\programme\eudora\attach\HELLOMET.LST"
From ???@??? Mon Aug 31 18:46:41 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBrwk-00NEicC>; Thu, 27 Aug 1998 04:37:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 75FD6D06E; Thu, 27 Aug 1998 05:45:52 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E4D670.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 01 Feb 1998 12:09:57 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35E4CA68.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Window template and scrolling
X-UIDL: d3337b6017d8ccde052c96a359254f9f

* List: gfabasic@aachen.linux.de

BDD wrote:
> 
> 
> Yes you can.
> 
> BUT if you are only going to have scrollable editable  text in the window,
> then you're better off using a predefined child window of style EDIT. (or a
> dialog)

Thank you. I am familiar with using the editbox approach. What I am
considering is a scrollable window having a large number of database
fields and possibly some graphics. Each field could be inside its own
editbox but some of these might be out of sight until scrolled. A few
fields are several K in length.

---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:42 1998
Return-Path: <ch.pelz@uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zBzB9-00NEnOC>; Thu, 27 Aug 1998 12:21:19 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 68769D06E; Thu, 27 Aug 1998 13:28:54 +0200 (CEST)
From: ch.pelz@uni-bonn.de
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E542F6.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Thu, 27 Aug 98 12:20:54 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Thu, 27 Aug 1998 12:19:14 +0200
In-Reply-To: <35E4BF2B.BeroList-2.5.8@aachen.linux.de>
References: <35E380AF.BeroList-2.5.8@aachen.linux.de>
 <35E40D96.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: ch.pelz@IBM.rhrz.uni-bonn.de
Subject: Re: [GFA] Window template and scrolling
X-UIDL: 2c275213727c3098bbd585ba2be416f6

* List: gfabasic@aachen.linux.de

Hi Dean,

>What about this possiblity? Say you create
>the window using a hidden bitmap or a non-visible window. Can I write
>text and graphics to the bitmap area then PUT (or equivalent) the bitmap
>to the visible window using an appropriate offset? I have not yet spent
>any time using bitmaps or MEMDC.

yes, I guess that's the best way to do it. And it's not hard, actually. You
can find a very nice example in the GfA-Basic-Help under "MEMDC". Works
perfectly fine.

Christian



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:45 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zC4YK-00NDMQC>; Thu, 27 Aug 1998 18:05:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 18CFBD06E; Thu, 27 Aug 1998 19:13:30 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E593BA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980827160425.EUSZ13633@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 27 Aug 1998 16:04:25 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 27 Aug 1998 16:04:25 +0000
Subject: Re: [GFA] Window template and scrolling
X-UIDL: 1f0c395ef503f44df26024e343d3fa78

* List: gfabasic@aachen.linux.de

+++ This is fine.  For <32K.  Question I pose is equal to Deans... making
a normal window display text, scroll, NO LIMIT.  100K+ txt files are NOT
at all uncommon.  I'm battling reading & perhaps editing a 2M file.

Dean
Will get the image bit out to you today.  I just got up.

<G>
TomR.


At 09:46 PM 26/8/98 -0400, you wrote:
>* List: gfabasic@aachen.linux.de
>
>>>  Can I write text and graphics to the bitmap area then PUT (or
>equivalent) the bitmap
>to the visible window using an appropriate offset? I have not yet spent
>any time using bitmaps or MEMDC. <<
>
>Yes you can.
>
>BUT if you are only going to have scrollable editable  text in the window,
>then you're better off using a predefined child window of style EDIT. (or a
>dialog)
>
>
>OPENW #1,0,0,_X,_Y,1008
>
>edit_text$="This is an Edit Text Box.  Please type in some text."
>
>edit_param%=WS_VISIBLE | WS_CHILDWINDOW | WS_BORDER | WS_TABSTOP |
>WS_HSCROLL | WS_VSCROLL | ES_AUTOHSCROLL | ES_LEFT | ES_AUTOVSCROLL |
>ES_MULTILINE
>
>id_edit&=CreateWindow("EDIT",edit_text$,edit_param%,0,0,_X,_Y,WIN(1),1,_INS
>TANCE,0)
>
>~SetFocus(id_edit&)
>
>~SendMessage(id_edit&,WM_SETTEXT,0,V:edit_text$)
>
>DO
>  PEEKEVENT
>  m1%=MENU(1)
>  IF m1%=6 || m1%=18
>    ~MoveWindow(id_edit&,0,0,_X,_Y,1)
>  ENDIF
>LOOP UNTIL m1%=4
>
>CLOSEW #1
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:46 1998
Return-Path: <URaatz5552@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zC6ZO-00NEilC>; Thu, 27 Aug 1998 20:14:50 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1253FD06E; Thu, 27 Aug 1998 21:22:42 +0200 (CEST)
From: URaatz5552@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E5B202.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 27 Aug 1998 14:13:35 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=ISO-8859-1

X-Mailer: AOL 3.0.i  for Windows sub 85
Subject: [GFA] How to press a pushbutton ?
X-UIDL: 6cedfd1208e7f403ca9bcd13ef5fadbe

* List: gfabasic@aachen.linux.de

Hi,

I have absolutely no MORE ideas on this: 
(PLEASE HELP ME !)

I want to control other Windows (3.11 !!!) -Programs 
by my GFA Windows Porgam.

For example:
I need two "methods" to 

1) press a pushbutton

and 

2) to "click" on a Menu-entry.
So, the result on this "clicking" should be,
that the controlled program does his "normal" work;
the work thats "behind" the selected and,
through my gfa program,
"activated / clicked" Menu-entry...

I know how to get the (Sub-) Menu Handels, 
I know about the Optionbase 0, I know how to
"gray", "enable", "select", ...,  a Menu-entry,
I know how to read out a Menu-entry / -string,
I can change it, ...,

BUT:
I didnt know how to "activate" / how to "click" a Menu-entry!!

How can i solve this problems ?

With the API function ~SendMessage(h&, .., .., ..,) ?

It seems(?!?) this doesnt work:
sendkey&=VkKeyScan(CHR$(13))
~SendMessage(h&,sendkey&,0,0)  


For me NOTHING(!!!) seems to work ! Sh.. !


I would be very keindly to here from you 
- and to get some help/ideas to solve this problems!


Thanx a lot !!!

URaatz5552@aol.com   

(Germany / near Munich
- see u on Oktoberfest !
- ... the third thing thats make fun !)


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:48 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zC7ow-00NDLrC>; Thu, 27 Aug 1998 21:34:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 68967D069; Thu, 27 Aug 1998 22:42:46 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E5C4C6.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 27 Aug 1998 12:32:32 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] How to press a pushbutton ?
X-UIDL: 2316415da04ff8655fe0e48f03975ab1

* List: gfabasic@aachen.linux.de

Are you saying that after you create a menu you cannot select a menu item to
do an  operation of some kind?

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net

-----Original Message-----
From: URaatz5552@aol.com <URaatz5552@aol.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Thursday, August 27, 1998 11:15 AM
Subject: [GFA] How to press a pushbutton ?


* List: gfabasic@aachen.linux.de

Hi,

I have absolutely no MORE ideas on this:
(PLEASE HELP ME !)

I want to control other Windows (3.11 !!!) -Programs
by my GFA Windows Porgam.

For example:
I need two "methods" to

1) press a pushbutton

and

2) to "click" on a Menu-entry.
So, the result on this "clicking" should be,
that the controlled program does his "normal" work;
the work thats "behind" the selected and,
through my gfa program,
"activated / clicked" Menu-entry...

I know how to get the (Sub-) Menu Handels,
I know about the Optionbase 0, I know how to
"gray", "enable", "select", ...,  a Menu-entry,
I know how to read out a Menu-entry / -string,
I can change it, ...,

BUT:
I didnt know how to "activate" / how to "click" a Menu-entry!!

How can i solve this problems ?

With the API function ~SendMessage(h&, .., .., ..,) ?

It seems(?!?) this doesnt work:
sendkey&=VkKeyScan(CHR$(13))
~SendMessage(h&,sendkey&,0,0)


For me NOTHING(!!!) seems to work ! Sh.. !


I would be very keindly to here from you
- and to get some help/ideas to solve this problems!


Thanx a lot !!!

URaatz5552@aol.com

(Germany / near Munich
- see u on Oktoberfest !
- ... the third thing thats make fun !)


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:50 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zCDQV-00NDMgC>; Fri, 28 Aug 1998 03:34:07 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 56BF3D071; Fri, 28 Aug 1998 04:42:02 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E618FA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 28 Aug 1998 11:06:27 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35E593BA.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Window template and scrolling
X-UIDL: fd46cfb3fc7c253a6c8418c9ebf6f838

* List: gfabasic@aachen.linux.de

I'd like to thank everyone for responding to my query about scrolling. I
have had several bits of code sent to me and hopefully I'll be able to
put something together from it. This is one of the things lists like
this are useful for.
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:51 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zCDVU-00NDH3C>; Fri, 28 Aug 1998 03:39:16 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A8D14D072; Fri, 28 Aug 1998 04:47:10 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E61A2E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 28 Aug 1998 11:11:34 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35E593BA.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Day of Week 
X-UIDL: a3dd677c2d00bad0a73d3b64669bf922

* List: gfabasic@aachen.linux.de

A week or so ago someone asked how to determine the day of week.
I have some code here that I've been using for years. It is based on
Gregorian-to-Julian date conversion. I have included the functions that
do that, too. The G-J conversion functions are year 2000 compliant and
seem to work over hundreds of years in either direction. The original
code for the G & J functions was for QuickBasic and is from an article
by Raoul Watson in Inside Basic magazine, volume 5, no 1, January 1995,
page 20.

The advantage of this code over using the computer's function is that it
can potentially be independent of any Y2K problems inherit in the
hardware.

Dale, you have my permission to add this to GFA Help.


//DAYOFWK.LST = Calculates the day of the week given a date
//provided by Dean Hodgson, 1998

OPENW #1                        //open windiw
MODE 0                          //set date for dd.mm.yyyy format
dt$=DATE$                       //pick up current date
PRINT "Today's date is ";dt$    //display current date
PRINT
j%=@gregtojul(dt$)              //get julian date
PRINT "Julian date value is ";j%
b$=@jultogreg$(j%)              //convert back to gregorian
PRINT "Gregorian date from julian value ";b$
IF b$=dt$ THEN PRINT "We have correct date translation"
PRINT
a$=@dayofweek$(dt$)             //get day of week from function
PRINT "The day of the week is ";a$
PRINT
PRINT "Press a key"
KEYGET a%                       //wait for keypress
CLOSEW #1                       //close window
END

//this function calcualtes the julian date value into jd%
//it then adds 2 and works out the day of week from that
FUNCTION dayofweek$(d$)
  LOCAL n&,dw%
  dw%=@gregtojul(d$)+2            //get julian value for date and adjust
for next function
  n&=FIX((dw%/7-FIX(dw%/7))*7+.5) //calculate weekday value 0 to 6
(0=Saturday)
  n&=(n&+1)*9-8                 //get position in string
  i$=MID$("Saturday Sunday   Monday   Tuesday  WednesdayThursday
Friday   ",n&,9)
  RETURN i$
ENDFUNC

//convert normal gregorian date into a julian number
FUNCTION gregtojul(d$)
  LOCAL d&,m&,y&,w%,b%
  d&=VAL(LEFT$(d$,2))           //collect day
  m&=VAL(MID$(d$,4,2))          //collect month
  y&=VAL(MID$(d$,7))            //collect year
  w%=FIX((m&-14)/12)
  jd%=INT(1461*(y&+4800+w%)/4)
  b%=FIX(367*(m&-2-w%*12)/12)
  jd%=jd%+b%
  b%=INT(INT(3*(y&+4900+w%)/100)/4)
  jd%=jd%+d&-32075-b%           //julian date value returned here in jd%
  RETURN jd%
ENDFUNC

//convert julian value to gregorian date
FUNCTION jultogreg$(jc%)
  LOCAL w%,r%,y&,m&,d&,y%
  w%=jc%+68569
  r%=INT(4*w%/146097)
  w%=w%-INT((146097*r%+3)/4)
  y%=INT(4000*(w%+1)/1461001)
  w%=w%-INT(1461*y%/4)+31
  m&=INT(80*w%/2447)
  d&=w%-INT(2447*m&/80)         //day
  w%=INT(m&/11)
  m&=m&+2-12*w%                 //month
  y&=100*(r%-49)+y%+w%          //year
  d$=STR$(d&)                   //put into string format like mode 0
  IF LEN(d$)=1 THEN d$="0"+d$   //add leading 0 if single-digit day
  m$=STR$(m&)
  IF LEN(m$)=1 THEN m$="0"+m$   //add leading 0 if single-digit month
  da$=d$+"."+m$+"."+STR$(y&)    //put it all together
  RETURN da$
ENDFUNC
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:46:58 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zCKk0-00NEjIC>; Fri, 28 Aug 1998 11:22:44 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0DE08D071; Fri, 28 Aug 1998 12:30:19 +0200 (CEST)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E686BB.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 28 Aug 1998 05:22:27 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3155.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: [GFA] Date
X-UIDL: 5ed02de021dff92a5fcc818a51213028

* List: gfabasic@aachen.linux.de

Hi:

Saw Dean's response & thought it pretty long. Here's what I've been using.

tdate$ = @get_date$()
'
FUNCTION get_date$()
  LOCAL ctr,i,j
  LOCAL mon$="JanFebMarAprMayJunJulAugSepOctNovDec"
  LOCAL day$="SunMonTueWedThuFriSat"
  ~INTR($21,_AH = $2A)
  temp$ = MID$(day$,3 * _AL + 1,3) + ", " + MID$(mon$,3 * _DH - 2,3) + " " +
STR$(_DL)
  temp$ = temp$ + "/" + RIGHT$(STR$(_CX),2)
  RETURN temp$
ENDFUNC

                                                              -->Bev<--



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:47:28 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zCtn7-00NEjNC>; Sun, 30 Aug 1998 00:48:17 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A642CD06A; Sun, 30 Aug 1998 01:56:12 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E8951C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 29 Aug 1998 15:45:50 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] WINSOCK.DLL
X-UIDL: 02406b9a6c2d387742f38708a2dd968f

* List: gfabasic@aachen.linux.de

Received from Steve Scrocker. Help appreciated.
Could anyone show me how to use winsock.dll in GFA-Basic? I am good at
learning by example too, perhaps better than being taught, so if you
have an example program that calls winsock.dll, please send it to me,
thanks

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:47:30 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zD0lz-00NDMfC>; Sun, 30 Aug 1998 08:15:35 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A2230D074; Sun, 30 Aug 1998 09:23:30 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E8FDF5.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980830061521.PHBQ21053@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 30 Aug 1998 06:15:21 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 30 Aug 1998 06:15:21 +0000
Subject: [GFA] Wellllll.........   3008zz1-
X-UIDL: 086475ab78906a11c60a866e7a99855c

* List: gfabasic@aachen.linux.de

30/08/98 01:07:03 AM   Wellllll.........   3008zz1-

Fairly certain this isn't MS but there's no ID in it to go by.

Donno if Borland or not, but I see this unwise.exe w/ a lot of the
better software.  It's capable of removing EVERYTHING an install
puts on your computer, but... it requires that the installer used
generates a complete install.log - including registry keys.

As you can see, I'm getting somewhere now.  Anybody know who wrote 
this?  Would be good to know if it costs to use it.  I have a fair
sample of an install.log that gets the registry cleaned out.

Date: Sun, 30 Aug 1998 at 00:58:47 a.m.
Grab 5h, a component of TomR.'s HouseKeeper
We're working on C:\GFAWIN\PROJ_1\UNWISE\UNWISE.EXE
!This program requires Microsoft Windows. 
UNWISE 
___EXPORTEDSTUB 
KERNEL 
KEYBOARD 
COMMDLG 
DDEML 
SHELL 
UNWISE.exe 

RemoveDirectoryA 
DeleteFileA 
SetFileAttributesA 
FindFirstFileA 
FindNextFileA 
FindClose 
GetSystemDirectoryA 
GetVersionExA 
RegOpenKeyExA 
RegSetValueExA 
RegCloseKey 
RegDeleteKeyA 
RegEnumValueA 
RegDeleteValueA 
RegEnumKeyExA 
RegQueryValueExA 
Software\Microsoft\Windows\CurrentVersion\SharedDLLs 
GLBSUninstall 
CTL3D.DLL 
CTL3DV2.DLL 
Ctl3dRegister 
Ctl3dUnregister 
Ctl3dAutoSubclass 
install.log 
INSTALL.LOG 
%s: [%s] %s=%s 
%s Value Name: %s 
%s Value Name: %s=%s 
%s=%s 
%3d%% 
\WIN32S 
Title: 
 INSTALLATION 
 INSTALL 
%s Uninstall 
File Copy:  
Shell Link:  
Self-Register:  
INI New:  
INI File:  
INI Sect:  
INI Item:  
INI Val:  
INI Old:  
Icon Group:  
Icon Name:  
Icon Cmd:  
SubSystem: B 
Made Dir:  
RegDB Key:  
RegDB Val:  
RegDB Name:  
RegDB Type:  
RegDB Root:  
RegDB Old:  
PROGMAN 
GROUPS 
[ShowGroup(%s,2)] 
[ShowGroup(%s,1)] 
[DeleteItem(%s)] 
STARTUP 
[DeleteGroup(%s)] 
OLE32.DLL 
OleInitialize 
DllUnregisterServer 
OleUninitialize 
OLE2.DLL 
OC25.DLL 
Software\Borland\Database Engine 
UseCount 
IB_Server 
Uninstall 
The local interbase server must be stopped before BDE can be 
uninstalled. Please shutdown the interbase server and press the Retry 
button. 
Software\Borland\BLW32 
Software\Borland 
KERNEL 
LoadLibraryEx32W 
FreeLibrary32W 
GetProcAddress32W 
CallProc32W 
KERNEL32.DLL 
ADVAPI32.DLL 
SHELL32.DLL 
SHChangeNotify 
_C_FILE_INFO= 
         (((((                  H 
R6000 
- stack overflow 
R6003 
- integer divide by 0 
R6009 
- not enough space for environment 
R6018 
- unexpected heap error 
R6020 
- unexpected QuickWin error 
R6008 
- not enough space for arguments 
R6021 
- no main procedure 
run-time error  
R6002 
- floating-point support not loaded 
Select Type of Uninstall 
MS Sans Serif 
This program will remove the following software/data files from your 
computer: 
Uninstall Options 
Automatic 
Press this button to automatically remove the software and related 
data files. 
Custom 
Press this button if you want full control over the uninstall process. 
Cancel 
You should press this button if you do not want to uninstall the 
software now. 
MS Sans Serif 
Continue 
Cancel 
Select All 
Select None 
Uninstalling 
MS Sans Serif 
Cancel 
Installation Logs 
Wise Uninstall Could not open INSTALL.LOG file. 
Invalid INSTALL.LOG file. 
Select Private Files to Remove 
The following files should be deleted to remove the software from your 
system.  Press the Select All button to remove all of the listed files 
or select the files individually.\Press the Continue button to remove 
the selected files. 
Press Cancel to abort the uninstall. 
Select System Files to Remove 
The following files were copied to your Windows/System directories 
during the installation.  Use caution when removing these files, they 
may be in use by other programs.\Press the Continue button to remove 
the selected files. 
Press Cancel to abort the uninstall. 
Select Directories to Remove 
The following directories were created during the installation.  
Selecting a directory will remove it and all files and directories 
that are contained within it.bPress the Continue button to remove the 
selected directories. 
Press Cancel to abort the uninstall. 
Select INI Files to RemovenThe following INI files were created during 
the installation.  Select those INI files that you want to remove. 
\Press the Continue button to remove the selected files. 
Press Cancel to abort the uninstall. 
Select INI Items to EditwThe following INI entries were changed during 
the installation.  Select those INI entries that you want to change 
back.\Press the Continue button to edit the selected entries. 
Press Cancel to abort the uninstall.+Select Registration Database Keys 
to RemovezThe following Registration Database Keys were created during 
the installation.  Select those keys that you want to remove.[Press 
the Continue button to remove the selected keys. 
Press Cancel to abort the uninstall.)Select Registration Database Keys 
to Edit 
The following Registration Database Keys were changed during the 
installation.  Select those keys that you want to change back.YPress 
the Continue button to edit the selected keys. 
Press Cancel to abort the uninstall. 
Select icons to Remove 
The following icons were added to the Program Manager during the 
installation.  Select those icons that you want to remove.\Press the 
Continue button to remove the selected icons. 
Press Cancel to abort the uninstall. 
Removing File: 
Removing System File: 
Removing Directory: 
Removing Empty Directories: 
Removing INI File: 
Editing INI File: 
%Removing Registration Database Key: 
$Editing Registration Database Key: 
Removing Icon: 
The system indicates that the following shared file is no longer used 
by any programs and should be deleted. 
If any programs are still using this file and it is removed those 
programs may not function. Do you want to remove the shared file 
Remove Shared File 
Self-Unregistering file: 
vThe following sub-systems were configured during the installation.  
Select those sub-systems that you want to removed. 
Select Sub-Systems to RemovebPress the Continue button to remove the 
selected sub-systems. 
Press Cancel to abort the uninstall. 
Removing Sub-System: 
DDDDI 
DDDDD 
DDDDDI 
DDDDDD 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:47:38 1998
Return-Path: <dlf@net-tech.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zD4BI-00NDLvC>; Sun, 30 Aug 1998 11:53:56 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 83CEFD070; Sun, 30 Aug 1998 13:01:52 +0200 (CEST)
From: "Duane Forster" <dlf@net-tech.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E93120.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 30 Aug 1998 19:53:53 +1000
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Writing to the keyboard queue
X-UIDL: f32b501a7c5e8e45530c2e26321ae965

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Mon Aug 31 18:47:47 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDCNq-00NEjPC>; Sun, 30 Aug 1998 20:39:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 807AFD075; Sun, 30 Aug 1998 21:47:15 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35E9AC46.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 30 Aug 1998 11:36:55 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] email and web
X-UIDL: 943ed4858632f1252646f8b2c046cca5

* List: gfabasic@aachen.linux.de

Have you down loaded the files EMAILIT.ZIP and WEBIT.ZIP from the GFAWHELP
files page.  EMAILIT allows you to send email from within your GFA program
and WEBIT allows you to call up any Web Site you desire from you GFA
program. These examples are very small and requires no RUNTIME DLL. such as
VB5 dll
Sent to me by Sven Thomas of GFA and they work great!!
Try them out.
Dale Bryant

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:47:51 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDJWP-00NDLlC>; Mon, 31 Aug 1998 04:16:45 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 85DE9D078; Mon, 31 Aug 1998 05:24:43 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EA177B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 30 Aug 1998 19:14:11 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] UUCODE
X-UIDL: f8070c2d59d3597b5a8101f822a6c3a6

* List: gfabasic@aachen.linux.de

UUCODE.ZIP is now available from the GFAWHELP Web page. Sent to me by GFA
the zip contains both UUENCODE and UUDECODE files.
Thanks to GFA
Dale

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:47:52 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDMfr-00NDLZC>; Mon, 31 Aug 1998 07:38:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6292BD06B; Mon, 31 Aug 1998 08:46:41 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EA46D1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 31 Aug 1998 07:39:39 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Combolist with colors ?
X-UIDL: 442ba016112d2366e208aaf7feaa7fe4

* List: gfabasic@aachen.linux.de

Hey,

who is able to show a combobox with different colors for some line
entries ?
I am using a combobox in a dialog for showing the result of a report (by
the way, I didn't find a way to sort the lines by certain tab seperated
columns) and want to "mark" some special lines with a certain color. I
found only an example to fill the whole combobox with an color, not
special entries only.

Thanks,
	Michael

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:47:53 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDNqJ-00NEiVC>; Mon, 31 Aug 1998 08:53:35 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B9759D077; Mon, 31 Aug 1998 10:01:33 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EA585D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 31 Aug 1998 02:52:50 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Combolist with colors ?
X-UIDL: 0064d24d9cb67a6f0ad190b2a279848e

* List: gfabasic@aachen.linux.de

look at the example under CB in  GFAW  HELP.

This shows setting a brush for  some dialog elements.

Hope this helps,

BD

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:47:55 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDRyP-00NEn6C>; Mon, 31 Aug 1998 13:18:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 61FB0D074; Mon, 31 Aug 1998 14:25:49 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EA964E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 31 Aug 1998 13:18:45 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Combolist with colors ?
X-UIDL: 54f842cf4c2b689253ce43fed3692609

* List: gfabasic@aachen.linux.de


No, because it sets the color only for the whole combobox, not for some
certain entries...

>
>look at the example under CB in  GFAW  HELP.
>
>This shows setting a brush for  some dialog elements.
>
>Hope this helps,
>
>BD
>
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:48:27 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDUjK-00NGafC>; Mon, 31 Aug 1998 16:14:50 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6A6CAD070; Mon, 31 Aug 1998 17:22:38 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EABFBE.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 31 Aug 1998 12:51:31 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"

X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Background-Color
X-UIDL: f9ca0f23cc56a924cdae360a5062805d

* List: gfabasic@aachen.linux.de

Hi!

How can I set the background-color for an object of an dialog without using a callback? For example I have to set the background of the "LTEXT"-object from white to gray (or any color).

Many thanks in advance,
yours

Thomas



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:48:30 1998
Return-Path: <benny@zeb.be>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDVRK-00NEneC>; Mon, 31 Aug 1998 17:00:18 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 56D04D075; Mon, 31 Aug 1998 18:07:58 +0200 (CEST)
From: Benny Sels <benny@zeb.be>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EACA62.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id AA54F801F2; Mon, 31 Aug 1998 16:59:32 +03d0
X-Sender: benny@mail.zeb.be
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Mon, 31 Aug 1998 16:59:32 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Minimize Other window
X-UIDL: 6b54f0a88faa98fc098a438e8e73ea17

* List: gfabasic@aachen.linux.de

Hello

How can I minimize a windows from another program
I test if the window is open
hw& = FindWindow(0,"Microsoft Access")
Now i like to minimize the windowd in hw&

Thanks

Benny Sels




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 18:48:31 1998
Return-Path: <benny@zeb.be>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDVZk-00NEm1C>; Mon, 31 Aug 1998 17:09:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D55B5D078; Mon, 31 Aug 1998 18:16:57 +0200 (CEST)
From: Benny Sels <benny@zeb.be>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EACC7A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id AC7EFE01F0; Mon, 31 Aug 1998 17:08:46 +03d0
X-Sender: benny@mail.zeb.be
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Mon, 31 Aug 1998 17:08:46 +0200
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Monitor motherboard
X-UIDL: ed5b3cdb94776f61c6b4f20b161b06c7

* List: gfabasic@aachen.linux.de

Hello,

I like to monitor the LM78 chip (found on modern mainboards) in gfa basic
to check temperature, fan etc...
but my knowledge of C++ is not so good.
Can anyone help me with the examples in C++??

You can find the examples at
http://www.national.com/sw/LM/LM78/lm78vxd.zip
http://www.national.com/sw/LM/LM78/lm78sys.zip

Thanks

Benny Sels






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Aug 31 22:55:15 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDZFn-00NEmyC>; Mon, 31 Aug 1998 21:04:39 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BE8CDD06B; Mon, 31 Aug 1998 22:12:28 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EB03AD.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 31 Aug 1998 12:01:57 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] mag_indx
X-UIDL: 34323c52454508477eef7ecc78eaa16a

* List: gfabasic@aachen.linux.de

Try MAG_INDX by Bev Brown which is available as of today on the GFAWHELP web
URL below.  MAG_INDX handles 10,000 records and you can store just the title
and author or a lot more information for each record if you desire. Source
code is included in the zip file. All GFA programs from this site contain
the source code. Don't forget to check out EMAILIT, WEBIT and UUCODE from
Sven Thomas of GFA>
Dale

http://www.gfa.net/adbryant/index.htm
webmaster.gfawhelp@gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:09:00 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDb0V-00NEn8C>; Mon, 31 Aug 1998 22:56:59 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0FEE7D06B; Tue,  1 Sep 1998 00:04:56 +0200 (CEST)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EB1E09.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Mon, 31 Aug 1998 20:55:30 +0000
In-Reply-To: <35CBAA0B.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] EXE UTILITIES
X-UIDL: 3cac8cd4791ffb0db8c35d947a1771f1

* List: gfabasic@aachen.linux.de

At 17:20 07.08.1998 -0700, you wrote:

>I am looking for small GFA demos for the GFAWHELP file. I am constructing a
>page named Executables. These will be executed from the .HLP file.  Small
>utilities such as Roland Walters' TEXTSRCH would be ideal.

Did You have a look at my Web page? There are some of those tools
and may be there will come more in future time ;-)
http://userpage.fu-berlin.de/~alibaba/gfabasic/

By the way:
There is a better way then making 100s of files for Your gfawhelp project.
I am also "deeper" involved in making WinHelp files and have written
a DLL wich it makes possible to work with binary files inside a WinHelp
file. For example You can play WAV file wich are inside (!) the
help file or You can extract binary files from the help file to Your disk.
I don't like to make the sources free but I would make a free DLL
with the functions You need. I think so it is possible to go the way that
one help file and one DLL is all what the user needs.
Would this be O.K.?

Bye, Roland Walter


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:09:04 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDc0S-00NEm0C>; Tue, 1 Sep 1998 00:01:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5C8BFD070; Tue,  1 Sep 1998 01:08:49 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EB2D01.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 31 Aug 1998 14:57:55 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] EXE UTILITIES
X-UIDL: 414a033d3e4e03ceae4ace970d5bf684

* List: gfabasic@aachen.linux.de

OK? Roland, it would be fantastic! I don't know how to thank you for such a
great offer.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Roland Walter <alibaba@zedat.fu-berlin.de>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Monday, August 31, 1998 1:58 PM
Subject: Re: [GFA] EXE UTILITIES


>* List: gfabasic@aachen.linux.de
>
>At 17:20 07.08.1998 -0700, you wrote:
>
>>I am looking for small GFA demos for the GFAWHELP file. I am constructing
a
>>page named Executables. These will be executed from the .HLP file.  Small
>>utilities such as Roland Walters' TEXTSRCH would be ideal.
>
>Did You have a look at my Web page? There are some of those tools
>and may be there will come more in future time ;-)
>http://userpage.fu-berlin.de/~alibaba/gfabasic/
>
>By the way:
>There is a better way then making 100s of files for Your gfawhelp project.
>I am also "deeper" involved in making WinHelp files and have written
>a DLL wich it makes possible to work with binary files inside a WinHelp
>file. For example You can play WAV file wich are inside (!) the
>help file or You can extract binary files from the help file to Your disk.
>I don't like to make the sources free but I would make a free DLL
>with the functions You need. I think so it is possible to go the way that
>one help file and one DLL is all what the user needs.
>Would this be O.K.?
>
>Bye, Roland Walter
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:09:08 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDcoh-00NEmyC>; Tue, 1 Sep 1998 00:52:55 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1ACC9D074; Tue,  1 Sep 1998 02:00:53 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EB3936.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 31 Aug 1998 15:50:29 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] INTERRUPTS
X-UIDL: fb5574baea9924c0454f6c59288875fa

* List: gfabasic@aachen.linux.de

The famous Ralf Brown Interrupt list can be found at the URL immediately
below. 8000 pages but pretty well categorized.
Dale

http://www.ctyme.com/intr/INT.HTM



http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:09:12 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDfvb-00NEnOC>; Tue, 1 Sep 1998 04:12:15 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1D13BD06B; Tue,  1 Sep 1998 05:20:12 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EB67EE.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 31 Aug 1998 19:08:50 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] TESTSRCH & TEXTSUCH
X-UIDL: fffcd69a337816dbeee2e6330bfcdafa

* List: gfabasic@aachen.linux.de

TEXTSRCH.ZIP is available from the URL below. Also available is TEXTSUCH.ZIP
in the original Deutsch. Don't miss these!

(31kb) I transposed this great utility by Roland Walter from Deutsch to
English. This is a great utility! You know that you have seen the command
LB_GETCURSEL but forgot exactly how to use it. This utility will search all
LST files in a chosen directory and its sub directories for the command
that you wish to search for. This one should convince you that your programs
are not only 'Saved' to disk but that a .LST version is 'Written' out as
well. Thanks Roland for sharing it and please be kind about the translation
http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:09:19 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDoY9-00NDMOC>; Tue, 1 Sep 1998 13:24:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B99A9D075; Tue,  1 Sep 1998 14:32:14 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EBE94F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980901112318.OKDH21955@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 1 Sep 1998 11:23:18 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 1 Sep 1998 11:23:18 +0000
Subject: [GFA] info   0109xx1-
X-UIDL: 86fae45b5b58b78d860c9d1037c1545a

* List: gfabasic@aachen.linux.de

01/09/98 05:31:59 AM   info   0109xx1-

To all interested...

Am working on a list of extensions & their descriptions (content).

Am extracting lists of the files contained in MSCF files (*.cab) of my 
OEM Win95 install CD.  Some upgrade CDs may contain later versions & 
it would be nice to have the capability.  At the moment, only the 
module names appear to be available this way - no details show up.  
*Some* install CDs may even have other modules that aren't included in 
mine.

The program I'm working on at the moment does the above.  Anybody 
interested in being able to look into MS's *.cab archives need only 
request it from me - it will shortly be refined enough to release.

Followup to this will be the possibility to extract the files from 
within these archives individually instead of as a whole (typically, 
an install or reinstall).  This one may take a little while - using 
MS's extract.exe appears to be complicated to make function properly.

One of the aims of all this is to make it possible to locate & 
retrieve OEM modules (drivers, etc.) that it is becoming extremely 
difficult to get into the proper area of MS's archives to obtain.

Any interested parties letting me know will be kept informed of 
progress.  HouseKeeper has managed to get a little out of hand.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:09:24 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDtoz-00NEnBC>; Tue, 1 Sep 1998 19:02:21 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0E7C6D077; Tue,  1 Sep 1998 20:10:16 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EC3888.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id TAA04771 for <gfabasic@aachen.linux.de>; 
          Tue, 1 Sep 1998 19:02:08 +0200 (MET DST)
Date: Tue, 1 Sep 1998 19:01:47 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: [GFA] Register source code
X-UIDL: 434f4b518d97ce0039cbf2700be44d05

* List: gfabasic@aachen.linux.de

To all,

I'm looking for a simple register program in LST format.
Three fields and search function is needed. Load, save and print functions can
I do myself.

I need it for use in a calendar/diary program of my own. Can anyone give me a
tip?

Sven



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:09:26 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zDw78-00NEmOC>; Tue, 1 Sep 1998 21:29:14 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 31743D078; Tue,  1 Sep 1998 22:37:09 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EC5AF5.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 1 Sep 1998 15:28:06 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Colors in metafiles
X-UIDL: 6d0150b7c36e1e41c1ce93c01f941b5f

* List: gfabasic@aachen.linux.de

I tracked down the source problem with colors in memory metafiles.

 Note that if a COLOR or RGBCLOR  is used when modifying a memory metafile,
 the program will degrade available resoruces unless you can figure out how
to delete
 the pens and brushes created by those commands. GFA does not know ablut
memory metafiles,
so it can't automatically delete its own GDI objects in that context. 

Use the windows API functions CreatePen(),  CreateBrush() instead: 

c% = SHL(RAND &hff,16) + SHL(RAND &hff,8) + RAND &hff
  hpen& = CreatePen(PS_SOLID,3,c%)
  ~SelectObject(hin&(w),hpen&)
  LINE RAND xxmeta&(w), RAND yymeta&(w),RAND xxmeta&(w), RAND yymeta&(w)
  ~DeleteObject(hpen&)

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:08 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEFln-00NEnZC>; Wed, 2 Sep 1998 18:28:31 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BE43CD07A; Wed,  2 Sep 1998 19:36:28 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35ED821D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980902162726.VZG13493@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 2 Sep 1998 16:27:26 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 2 Sep 1998 16:27:26 +0000
Subject: [GFA] font help, please   0209zz1-
X-UIDL: 884602833a278f5e4b00de286fe6c158

* List: gfabasic@aachen.linux.de

02/09/98 11:19:19 AM   font help, please   0209zz1-

GETFONT FNT& /* get characteristics of font FNT&

RFONT ITALIC I,FAMILY F,CHARSET C,QUALITY Q,PITCH P,WEIGHT W,WIDTH 
WI,HEIGHT H,ORIENTATION O,ESCAPEMENT E

HEIGHT comes in a large number... 
10 = 65523
11 = 65521
12 = 65520
14 = 65517
etc., etc.

There must be a "simple" formula to derive the left half of the 
equation from the right half, but I'm unable to decipher it.  The only 
way I can get the right numbers is to set up an array in a 
FOR-IF-ENDIF-NEXT situation.  I'd rather just have a simple conversion 
factor.

Thank you.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:17 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zELHg-00NDMaC>; Thu, 3 Sep 1998 00:21:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9BE6DD07C; Thu,  3 Sep 1998 01:29:45 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EDD4EC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980902222135.KTF1386@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 2 Sep 1998 22:21:35 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 2 Sep 1998 22:21:35 +0000
Subject: [GFA] font help
X-UIDL: 753519a74520f2296f61ddc1630859a8

* List: gfabasic@aachen.linux.de

Dale

FONT1.GFW has the answer.  Thank you.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:19 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEMN4-00NDHOC>; Thu, 3 Sep 1998 01:31:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 788EBD07E; Thu,  3 Sep 1998 02:39:21 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EDE539.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 2 Sep 1998 16:28:45 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] font help
X-UIDL: e95ae29305d8d5d20f8a3504aed06972

* List: gfabasic@aachen.linux.de

I don't care what your wife says about you, it was my pleasure. (G)Found it
the GFAWHELP file.  Just did a search on Fonts.
Take care,
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Wednesday, September 02, 1998 3:23 PM
Subject: [GFA] font help


>* List: gfabasic@aachen.linux.de
>
>Dale
>
>FONT1.GFW has the answer.  Thank you.
>
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:20 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zENMa-00NDLdC>; Thu, 3 Sep 1998 02:35:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id AD51BD077; Thu,  3 Sep 1998 03:42:58 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EDF422.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 2 Sep 1998 17:32:25 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] STILL LOOKING
X-UIDL: 12b6b42b1dd0316aa1189f865c0a4b03

* List: gfabasic@aachen.linux.de

HI Everyone,
I am still looking for facts on GFA programmers. If you program in GFA in
DOS or Windows send me some information for the GFA programmers page on the
web site below.
1. Name
2. City/Country
3. Main programming interest
4. Some personal information if you desire.
5. Email address (unless you prefer being a hermit)
Thanks,
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:22 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zENR8-00NDMaC>; Thu, 3 Sep 1998 02:39:42 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id F1ADED080; Thu,  3 Sep 1998 03:47:42 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EDF53F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 2 Sep 1998 17:37:11 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Files
X-UIDL: f21e166313d25967da4d259683b83cf3

* List: gfabasic@aachen.linux.de

If you have any GFA-BASIC files you are willing to share I am looking for
GFA programs for the download page on the GFAWHELP site. If you haven't
checked out TEXTSRCH.ZIP and SHUTDOWN.ZIP by Roland Walter you are missing
two great utilities.  If you need these in Deutsch there is a link to
Rolands' site form the GFAWHELP Links page.
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:23 1998
Return-Path: <blackbug@adnc.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zESGt-00NEiuC>; Thu, 3 Sep 1998 07:49:27 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7A481D06B; Thu,  3 Sep 1998 08:57:22 +0200 (CEST)
From: Marten N Thieman <blackbug@adnc.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EE3DD2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 02 Sep 1998 20:49:40 -0700
X-Mailer: Mozilla 4.05 [en] (Win95; I)
MIME-Version: 1.0
References: <35EDF422.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] STILL LOOKING
X-UIDL: af3377940b26d5ce15885038f6239cf5

* List: gfabasic@aachen.linux.de

> DOS or Windows send me some information for the GFA programmers page on the web site below.
> 1. Name
> 2. City/Country
> 3. Main programming interest
> 4. Some personal information if you desire.
> 5. Email address (unless you prefer being a hermit)
> Thanks,
> Dale Bryant

1. Marten N Thieman
2. Oceanside, Ca / United States of America
3. Gameing utilities, Databases, Drawing programs.
4. 6' , 158 lbs, I  write songs, Play guitar, Repair computers, build
Networks, spent 22 years as a metrologist (calibrationist) for the
United States Marine Corps & will retire in september, Carve leather,
Write HTML, Learning JAVA - C++ - GFA - visual basic.  I serve the Lord
Jesus the Christ.
5. whitehart@netscape.com / blackbug@adnc.com /
thiemanm@pendleton.usmc.mil

just a little something  When I was programming on my ATARI ST I wrote a
program for fantasy gamers that allowed them to create different games
styles or systems.

Tring to port it over to windows on IBM.  any ideas.  I don't have any
windows GFA stuff.  My GFA DOS won't work on my Pentium 166 w/mmx.

nick

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:31 1998
Return-Path: <M.KUNTNER@tirol.gv.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEVHO-00NEmYC>; Thu, 3 Sep 1998 11:02:10 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 65AEDD073; Thu,  3 Sep 1998 12:09:58 +0200 (CEST)
From: KUNTNER Markus <M.KUNTNER@tirol.gv.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EE6AF9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 3 Sep 1998 10:54:07 +0200 
Mime-Version: 1.0
X-Mailer: Internet Mail Service (5.0.1460.8)
Content-Type: text/plain
Subject: [GFA] Eintragung in die Mailing-Liste
X-UIDL: 7f7936a00e91438bf859c18162397fdb

* List: gfabasic@aachen.linux.de



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:33 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEbhA-00NEnzC>; Thu, 3 Sep 1998 17:53:12 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8B856D06B; Thu,  3 Sep 1998 19:01:06 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EECB52.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 3 Sep 1998 08:50:12 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] STILL LOOKING
X-UIDL: b183d2d749c11390a82564a5ad0bfde5

* List: gfabasic@aachen.linux.de

Marten Thieman sent his biography information.
Where is YOURS?
Dale
http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Marten N Thieman <blackbug@adnc.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Wednesday, September 02, 1998 10:50 PM
Subject: Re: [GFA] STILL LOOKING


>* List: gfabasic@aachen.linux.de
>
>> DOS or Windows send me some information for the GFA programmers page on
the web site below.
>> 1. Name
>> 2. City/Country
>> 3. Main programming interest
>> 4. Some personal information if you desire.
>> 5. Email address (unless you prefer being a hermit)
>> Thanks,
>> Dale Bryant
>
>1. Marten N Thieman
>2. Oceanside, Ca / United States of America
>3. Gameing utilities, Databases, Drawing programs.
>4. 6' , 158 lbs, I  write songs, Play guitar, Repair computers, build
>Networks, spent 22 years as a metrologist (calibrationist) for the
>United States Marine Corps & will retire in september, Carve leather,
>Write HTML, Learning JAVA - C++ - GFA - visual basic.  I serve the Lord
>Jesus the Christ.
>5. whitehart@netscape.com / blackbug@adnc.com /
>thiemanm@pendleton.usmc.mil
>
>just a little something  When I was programming on my ATARI ST I wrote a
>program for fantasy gamers that allowed them to create different games
>styles or systems.
>
>Tring to port it over to windows on IBM.  any ideas.  I don't have any
>windows GFA stuff.  My GFA DOS won't work on my Pentium 166 w/mmx.
>
>nick
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:34 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEbi0-00NEmMC>; Thu, 3 Sep 1998 17:54:04 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B5537D07C; Thu,  3 Sep 1998 19:02:01 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EECB8A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 3 Sep 1998 08:51:22 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Eintragung in die Mailing-Liste
X-UIDL: 74f91a8bcfb6abb58022c6dcd48d9954

* List: gfabasic@aachen.linux.de

Welcome to the mailing list.

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: KUNTNER Markus <M.KUNTNER@tirol.gv.at>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Thursday, September 03, 1998 2:03 AM
Subject: [GFA] Eintragung in die Mailing-Liste


>* List: gfabasic@aachen.linux.de
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:35 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEcXa-00NEn4C>; Thu, 3 Sep 1998 18:47:22 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 35BC3D07E; Thu,  3 Sep 1998 19:55:11 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EED7FF.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id SAA11720 for <gfabasic@linux.net.eu.org>; 
          Thu, 3 Sep 1998 18:46:58 +0200 (MET DST)
Date: Thu, 3 Sep 1998 18:48:02 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: [GFA] STILL LOOKING
X-UIDL: 2cc3270ff44beb0d96b13a021ba37ad0

* List: gfabasic@aachen.linux.de

1. Sven Kumlin
2. Gothenburg, Sweden
3. Working on a calendar/diary program. Started 4-5
    years ago on Atari ST 1040, but it's not yet finished.
4. I was a designer of mechanical test equipment at
    Volvo. Now I am a pensioner (66).
5. sven.kumlin@swipnet.se

----------
> Frn: Dale Bryant <adbryant@email.msn.com>
> Till: gfabasic@aachen.linux.de
> mne: [GFA] STILL LOOKING
> Datum:  den 3 september 1998 02:32
> 
> * List: gfabasic@aachen.linux.de
> 
> HI Everyone,
> I am still looking for facts on GFA programmers. If you program in GFA in
> DOS or Windows send me some information for the GFA programmers page on the
> web site below.
> 1. Name
> 2. City/Country
> 3. Main programming interest
> 4. Some personal information if you desire.
> 5. Email address (unless you prefer being a hermit)
> Thanks,
> Dale Bryant
> 
> http://www.gfawhelp.gfa.net
> webmaster.gfawhelp@gfa.net
> 
> 
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:37 1998
Return-Path: <SYSOP@CCASTLE2.prometheus.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEdIR-00NElbC>; Thu, 3 Sep 1998 19:35:47 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E3A3AD081; Thu,  3 Sep 1998 20:43:47 +0200 (CEST)
From: SYSOP@CCASTLE2.prometheus.de (Martin Brueckner)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EEE364.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
>X-Dummy: YES
X-ZC-VIA: 19980903153446S+2@dame.de
X-ZC-POST: Buddestr. 16 / 33602 Bielefeld
X-ZC-TELEFON: Voice: 0521 179463 Fax: 179200 Modem: 179227 ISDN: 179200
X-Mailer: WinPoint V1.92 Beta ABSOLUTE TESTVERSION by M.Brueckner SER:A0000016
X-ZC-PGP-KEY-AVAIL: wird bei Empfangsbestaetigung mitgeschickt
References: <35EDF53F.BeroList-2.5.8@aachen.linux.de>
Date: Thu,  3 Sep 1998 11:12:06 +0200
X-Gateway: ZCONNECT dame.de [UUWORLD RFC/ZC V2.2 SER#A4583577]
Content-Type: text
Sender: dame!CCASTLE2.prometheus.de!SYSOP@lynet4.lynet.de
Subject: Re: [GFA] Files
X-UIDL: e48c391ae747f982b91937edb12585ed

* List: gfabasic@aachen.linux.de

Du schriebst am 02.09.1998 um 17:37:11 Uhr folgenden Text mit
dem Betreff "[GFA] Files":
> * List: gfabasic@aachen.linux.de
> 
> If you have any GFA-BASIC files you are willing to share I am looking for
> GFA programs for the download page on the GFAWHELP site. If you haven't
> checked out TEXTSRCH.ZIP and SHUTDOWN.ZIP by Roland Walter you are missing
> two great utilities.  If you need these in Deutsch there is a link to
> Rolands' site form the GFAWHELP Links page.
> Dale Bryant
> 
> http://www.gfawhelp.gfa.net
> webmaster.gfawhelp@gfa.net

I cannot access your webpage ?!?

--
Mit freundlichen Gren,
Martin Brueckner

Voice: 0521/179463 Box Modem: 0521/179227 ISDN+FAX: 0521/179200
                      * Homepage: http://pmbs.home.ml.org *

Alles ist Gift - es kommt nur auf die Dosis an.
-- WINPOINT 1.92 Beta ABSOLUTE TESTVERSION


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 03 20:10:38 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEdWW-00NDGOC>; Thu, 3 Sep 1998 19:50:20 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E0BD8D082; Thu,  3 Sep 1998 20:58:15 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EEE6C8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 3 Sep 1998 10:47:27 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Files
X-UIDL: 970ed8ae190ef916cb62f197d14b9229

* List: gfabasic@aachen.linux.de

Att: Martin
GFA.NET has been down for two days. The GFAWHELP page will not be available
until their problem is solved.  I'm sorry, but there is nothing I can do
until they fix the problem.
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Martin Brueckner <SYSOP@CCASTLE2.prometheus.de>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Thursday, September 03, 1998 10:36 AM
Subject: Re: [GFA] Files


>* List: gfabasic@aachen.linux.de
>
>Du schriebst am 02.09.1998 um 17:37:11 Uhr folgenden Text mit
>dem Betreff "[GFA] Files":
>> * List: gfabasic@aachen.linux.de
>>
>> If you have any GFA-BASIC files you are willing to share I am looking for
>> GFA programs for the download page on the GFAWHELP site. If you haven't
>> checked out TEXTSRCH.ZIP and SHUTDOWN.ZIP by Roland Walter you are
missing
>> two great utilities.  If you need these in Deutsch there is a link to
>> Rolands' site form the GFAWHELP Links page.
>> Dale Bryant
>>
>> http://www.gfawhelp.gfa.net
>> webmaster.gfawhelp@gfa.net
>
>I cannot access your webpage ?!?
>
>--
>Mit freundlichen Gren,
>Martin Brueckner
>
>Voice: 0521/179463 Box Modem: 0521/179227 ISDN+FAX: 0521/179200
>                      * Homepage: http://pmbs.home.ml.org *
>
>Alles ist Gift - es kommt nur auf die Dosis an.
>-- WINPOINT 1.92 Beta ABSOLUTE TESTVERSION
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Sep 04 11:47:51 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEeRg-00NEmeC>; Thu, 3 Sep 1998 20:49:24 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9E988D084; Thu,  3 Sep 1998 21:56:32 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EEF473.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 3 Sep 1998 11:44:29 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] GFAWHELP WEB PAGE
X-UIDL: 084169ea69db6ce7424082830b06d60e

* List: gfabasic@aachen.linux.de

I am getting numerous messages from people saying they cannot access the
GFAWHELP web page. GFA.NET has been unreachable for three days. I am sorry
but it is out of my hands. I will post here when it becomes accessible. I
have some new files to FTP and some new programmers biographies.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Sep 04 11:47:54 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEp4d-00NDMVC>; Fri, 4 Sep 1998 08:10:19 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id AA102D073; Fri,  4 Sep 1998 09:18:15 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EF943A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 4 Sep 1998 08:10:55 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: AW: [GFA] Combolist with colors ?
X-UIDL: f0b19ab23cf08668ca10399449ea7498

* List: gfabasic@aachen.linux.de

Found the following (nice) example which works with COMBOBOX, I still
have problems to do the same with LISTBOX...
Can anyone help ???
 - Michael

Openw #1
DLG 3D OFF

Dim color%(16)
For i%=0 To 15
  //  color%(i%)=GetSysColor(i%)
  Read color%(i%)
Next i%
DATA $000000,$0000ff,$00ff00,$ff0000
DATA $00ffff,$ff00ff,$ffff00,$000080
DATA $008000,$800000,$008080,$800080
DATA $808000,$808080,$c0c0c0,$ffffff

Cb Win(1),0 To -1,xxxproc
Sendmessage Win(1),WM_INITDIALOG,0,0 //Message to create Comboboxen
For i& = 0 To 15
  ~SendMessage(Dlg(-1,1),CB_ADDSTRING,0,"z1: Farbe " + Dec$(i&,2) + "@"
+ Dec$(i&))
  ~SendMessage(Dlg(-1,2),CB_INSERTSTRING,i&,"2: Farbe " + Dec$(i&,2) +
"@" + Dec$(15 - i&))
  ~SendMessage(Dlg(-1,3),CB_ADDSTRING,0,"3: Farbe " + Dec$(i&,2) + "@" +
Dec$(i&))
Next i&
~SendMessage(Dlg(-1,1),CB_ADDSTRING,0,"TestText in rot@1")
~SendMessage(Dlg(-1,1),CB_ADDSTRING,0,"TestText in Grn@$" +
Hex$(Rgb(0,255,0)))
Do
  Sleep
Until GetAsyncKeyState(VK_RBUTTON) < 0
Procedure xxxproc(h&,m&,w&,l%)
  Local i&,a$,cIdx&
  //  ods "Msg",m&
  //  ods "wParam", w&
  //  ods "lParam", l%
  //  odcr
  Switch m&
  Case WM_MEASUREITEM   //hierzu mssen die Combobox Befehle
    // in einer CB-Procedure stehen. (Hier bei WM_INITDIALOG)
    //Beep //Debug!
    Dpoke l% + 8,Int{l% + 8} + 1 //1 extra Pixel hoch
    Retval 1
    //Case WM_COMPAREITEM
    //  Retval lstrcmp({l% + 8},{l% + 16})
  CASE WM_DRAWITEM      //l% is pointer auf DRAWITEMSTRUCT
    dc& = WORD{l% + 12}   //siehe SDK-Help
    //ods "Id" ,Word{l% + 4}
    //odcr
    If Word{l% + 8} & ODS_SELECTED && Word{l% + 14} = 0
      ob% = SetBkColor(dc&,Rgb(192,192,192))
    Else
      ob% = SetBkColor(dc&,Rgb(255,255,255))
    EndIf
    i& = Int{l% + 4} //id
    If i& >= 0
      w& = SendMessage(Int{l% + 10},CB_GETLBTEXTLEN,i&,0) //Lnge des
Text
      a$ = Space$(w&)
      ~SendMessage(Int{l% + 10},CB_GETLBTEXT,i&,V:a$) //Pointer auf Text
      // Benutzt Combobox-String zur Farbauswahl
      i& = Instr(a$,"@")
      If i& = 0 Then i& = Len(a$),a$ = a$ + "@0" //Anhngen von @0 im
Fehlerfall
      If Peek(V:a$ + i&) = Asc("$")
        ot% = SetTextColor(dc&,Val(Mid$(a$,i& + 1)))
      Else
        cIdx& = Val(Mid$(a$,i& + 1)) & 15
        ot% = SetTextColor(dc&,color%(cIdx&))
      EndIf
      ~ExtTextOut(dc&,Word{l% + 14},Word{l% + 16},ETO_OPAQUE,l% +
14,V:a$,i& - 1,0)
      ~SetTextColor(dc&,ot%)
    EndIf
    ~SetBkColor(dc&,ob%)
    RETVAL GetStockObject(GRAY_BRUSH)
  Case WM_INITDIALOG
    COMBOBOX "",1, 10,10,100,200,CBS_DROPDOWN | WS_TABSTOP |
CBS_OWNERDRAWFIXED | WS_VSCROLL | CBS_SORT | CBS_HASSTRINGS
    Combobox "",2,120,10,100,200,CBS_DROPDOWNLIST | WS_TABSTOP |
CBS_OWNERDRAWFIXED | WS_VSCROLL | CBS_SORT | CBS_HASSTRINGS
    Combobox "",3,230,10,100,200,CBS_DROPDOWNLIST | WS_TABSTOP |
CBS_OWNERDRAWFIXED | WS_VSCROLL | CBS_SORT | CBS_HASSTRINGS
    ~SetFocus(Dlg(-1,1))
    Retval 0
  Default
  EndSelect
Return
Procedure ods(aa$,aa)
  ~OutputDebugString(aa$ + "=" + Str$(aa) + Chr$(9))
Return
Procedure odcr
  ~OutputDebugString(Chr$(13,10))
Return


>----------
>Von: 	Vogel Michael
>Gesendet: 	Montag, 31. August 1998 13:18
>An: 	gfabasic@aachen.linux.de
>Betreff: 	AW: [GFA] Combolist with colors ?
>
>* List: gfabasic@aachen.linux.de
>
>
>No, because it sets the color only for the whole combobox, not for some
>certain entries...
>
>>
>>look at the example under CB in  GFAW  HELP.
>>
>>This shows setting a brush for  some dialog elements.
>>
>>Hope this helps,
>>
>>BD
>>
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Sep 04 22:39:55 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zEuxh-00NEmyC>; Fri, 4 Sep 1998 14:27:33 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7A09CD07B; Fri,  4 Sep 1998 15:35:22 +0200 (CEST)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35EFEC9A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri,  4 Sep 1998 15:35:21 +0200 (CEST)
Subject: [GFA] GFA.NET
X-UIDL: 892b3613c21961e6de551405ad4bcfb6

* List: gfabasic@aachen.linux.de

To All:

GFA.NET (this includes the famous GFAWHELP page) had a server
outage for three days now. We have moved over to a new provider,
followed by technical administration.
Additionally the IP address has changed, thus DNS (Domain Name
Service) has to be updated througout the whole net.
The GFA site is back online right now, but you have to wait
until your DNS servers have been updated; estimated time for
working domains is 24h.

Thanks for patience.

Yours

GFA Software


+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Sep 04 22:40:07 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zF0SV-00NEjNC>; Fri, 4 Sep 1998 20:19:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D1E6AD07E; Fri,  4 Sep 1998 21:27:37 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F03F2A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Cc: "Bev Brown" <bbrown1@ciaccess.com>
Date: Fri, 4 Sep 1998 11:16:49 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Fw: Downtime
X-UIDL: 1dabed2437f8f75fb0f7d2f31dfd1aea

* List: gfabasic@aachen.linux.de


http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Administrator GFA.NET <webmaster@gfa.net>
To: Dale Bryant <adbryant@email.msn.com>
Date: Friday, September 04, 1998 3:51 AM
Subject: Downtime


>Dale,
>
>Sorry for the delay, but the web site is online again now.
>As I have written earlier, our ISP has moved and donated us a new IP.
>This means you can reach the GFA web site at the moment by using
>http://209.90.64.65, FTP As well.
>The domain names gfawhelp.gfa.net etc. will work in 24h again.
>
>Thanks for your patience.
>
>Best Regards
>
>Sven Thomas
>Administrator GFA.NET
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Sep 04 22:40:08 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zF0fd-00NEiXC>; Fri, 4 Sep 1998 20:33:17 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 158C1D07B; Fri,  4 Sep 1998 21:41:19 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F0425F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 4 Sep 1998 11:30:36 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] SOON
X-UIDL: 134a07ac09ca797faef0cb8837906e54

* List: gfabasic@aachen.linux.de

I'm sure most of you saw the message from GFA about GFA.NET. The GFAWHELP
site will be up soon with some new downloads and a new look. Also some new
programmers have been added to the programmers page. Many thanks to all who
have help to make the GFAWHELP file worthwhile.  Hope you all have a great
weekend.  Thanks
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 06 01:26:28 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zF2fz-00NEnOC>; Fri, 4 Sep 1998 22:41:47 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 88E7CD07B; Fri,  4 Sep 1998 23:49:39 +0200 (CEST)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F06077.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 04 Sep 1998 22:38:57 +0000
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Content-Transfer-Encoding: 8bit
Subject: [GFA] Add a small icon to the Win95 TaskBar
X-UIDL: f90919f57fc9710ba5bdd5718dacef77

* List: gfabasic@aachen.linux.de

'TASKBAR.LST
'Add a small icon to the Windows TaskBar (Win95/NT4)
'Roland Walter, Schnhauser Allee 64, D-10437 Berlin (September 1998)
'E-Mail: alibaba@zedat.fu-berlin.de
'
'Notice that we normally should get Mouse messages if we click on the
'created icon in the TaskBar. But we don't get them. I think this is because
'we work from a 16 bit program - present I see no way to get notification
'messages when we click on the icon.
'The only action we can do (I think) is to use the icon to give some
'status information such as a percentage, the time and so on.
'(For tis reason we can change the icon and also the ToolTip text.)
'What a pitty... But try it by yourself - may be You will find a way out

OPENW #1
IF @Init32W=TRUE
  hShell32%=@InitShell32()
  @InitNotifyIcon 'the special declarations only
  '
  NOTIFYICONDATA.NID_cbSize=LEN(NOTIFYICONDATA.)
  NOTIFYICONDATA.NID_hWnd=WIN(1)
  NOTIFYICONDATA.NID_uID=1 'self defined value
  NOTIFYICONDATA.NID_uFlags=NIF_TIP%|NIF_ICON%|NIF_MESSAGE%
  NOTIFYICONDATA.NID_uCallbackMessage=1 'self defined value
  NOTIFYICONDATA.NID_hIcon=LoadIcon(_INSTANCE,1)
  NOTIFYICONDATA.NID_szTip$="Hallo GFA-Basic"+CHR$(0)
  ~@Shell_NotifyIcon(NIM_ADD%,V:NOTIFYICONDATA.)
  '
  DO
    GETEVENT
    IF _Mess=WM_PAINT
      PRINT AT(0,0);"The Taskbar should now contain a small Icon for our program"
    ELSE IF _Mess=WM_LBUTTONDOWN 'WM_RBUTTONDOWN, WM_LBUTTONDOUBELCLICK...
      'This Message we normally should get when You click at the small StatusBar icon.
      '  IF _wParam=1
      BEEP
      ' ENDIF
    ENDIF
  UNTIL MENU(1)=4
  '
  ~@Shell_NotifyIcon(NIM_DELETE%,V:NOTIFYICONDATA.)
  ~DestroyIcon(NOTIFYICONDATA.NID_hIcon)
  ~@FreeLibrary32W(hShell32%)
  ~@Free32W()
ENDIF
CLOSEW #1

PROCEDURE InitNotifyIcon  'some declarations for the shell32-function Shell_NotifyIcon
  NIM_ADD%=$00000000       'Adds an icon to the status area
  NIM_MODIFY%=$00000001 'Deletes an icon from the status area
  NIM_DELETE%=$00000002 'Modifies an icon in the status area
  '
  TYPE NOTIFYICONDATA:  'to process taskbar status area messages
  - DWORD NID_cbSize   'LEN(NOTIFYICONDATA.)
  - LONG NID_hWnd 'Handle of the window that receives notification messages
  '                             associated with an icon in the taskbar status area
  - LONG NID_uID  'Application-defined identifier of the taskbar icon
  - LONG NID_uFlags 'Array of flags that indicate which of the other members contain
  '                              valid data. This member can be a combination of these values:
  '       NIF_ICON             The hIcon member is valid.
  '       NIF_MESSAGE    The uCallbackMessage member is valid.
  '       NIF_TIP               The szTip member is valid.
  - LONG NID_uCallbackMessage 'Application-defined message identifier.
  '                                                  The system uses the specified identifier for
  '                                                  notification messages that it sends to the
  '                                                   window identified by hWnd whenever a mouse
  '                                                   event occurs in the bounding rectangle of the icon.
  - LONG NID_hIcon 'Handle of the icon to add, modify, or delete
  - CHAR*64 NID_szTip$  'Tooltip text to display for the icon
  ENDTYPE
  NOTIFYICONDATA:NOTIFYICONDATA.
  '
  NIF_MESSAGE%=$00000001
  NIF_ICON%=$00000002
  NIF_TIP%=$00000004
RETURN
//
> FUNCTION Init32W()                                                         'WOW-Funktionen initialisieren
  $FUNC1%
  hKernel&=LoadLibrary("kernel")  //Kernel laden
  C_LoadLibraryEx32W%=GetProcAddress(hKernel&,"LoadLibraryEx32W")
  C_FreeLibrary32W%=GetProcAddress(hKernel&,"FreeLibrary32W")
  C_GetProcAddress32W%=GetProcAddress(hKernel&,"GetProcAddress32W")
  C_CallProc32W%=GetProcAddress(hKernel&,"CallProc32W")
  IF C_LoadLibraryEx32W%>0 // wenn eine der Funktionen existiert, dann sollten auch die anderen vorhanden sein
    RETURN TRUE   //Erfolgsmeldung
  ELSE
    IF hKernel& THEN ~FreeLibrary(hKernel&)
    RETURN FALSE //Ein Fehler ist aufgetreten
  ENDIF
ENDFUNC
//
> FUNCTION Free32W()                                                       'WOW-Funktionen freigeben
  $FUNC1%
  RETURN FreeLibrary(hKernel&)
ENDFUNC
//
> FUNCTION LoadLibrary32W(LibName$)                          'WOW-Funktion
  $FUNC1%
  LOCAL Puffer$=LibName$+CHR$(0)
  RETURN P:(C_LoadLibraryEx32W%)(L:V:Puffer$,L:0,L:0)
ENDFUNC
//
> FUNCTION FreeLibrary32W(hLib%)                                  'WOW-Funktion
  $FUNC1%
  RETURN P:(C_FreeLibrary32W%)(L:hLib%)
ENDFUNC
//
> FUNCTION GetProcAddress32W(hLib%,Function$)          'WOW-Funktion
  $FUNC1%
  LOCAL Puffer$=Function$+CHR$(0)
  RETURN P:(C_GetProcAddress32W%)(L:hLib%,L:V:Puffer$)
ENDFUNC
//
> FUNCTION InitShell32
  $FUNC1%
  LOCAL hLib%=@LoadLibrary32W("shell32")
  IF hLib%>31
    'The one and only shell32 function we need here:
    C_Shell_NotifyIcon%=@GetProcAddress32W(hLib%,"Shell_NotifyIcon") 'manipulate Taskbar icon
  ENDIF
  RETURN hLib%
ENDFUNC
'
FUNCTION Shell_NotifyIcon(TaskBarMessage%,PtrData%) 'Taskbar-Ikone manipulieren
  $FUNC1%
  'Sends a message to the system to add, modify, or delete an icon from the taskbar status area
  'Returns TRUE if successful or FALSE otherwise
  'TaskBarMessage%: Identifier of the message to send (can be NIM_ADD, NIM_MODIFY OR NIM_DELETE)
  'PtrData%: Pointer to NOTIFYICONDATA type containing the necassary data
  RETURN P:(C_CallProc32W%)(L:TaskBarMessage%,L:PtrData%,L:C_Shell_NotifyIcon%,L:%01,L:2)
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 06 01:26:33 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFCT3-00NEmNC>; Sat, 5 Sep 1998 09:09:05 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7A591D083; Sat,  5 Sep 1998 10:17:06 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F0F382.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980905070826.XSEE22040@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 5 Sep 1998 07:08:26 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 5 Sep 1998 07:08:26 +0000
Subject: [GFA] Please help - font, edittext, in dlg
X-UIDL: d0f1ac32623a67421a405caef2a1d8f8

* List: gfabasic@aachen.linux.de

Am having trouble setting the font for an edittext box in a dialog.
It is refusing to co-operate.  I can't find an example, but would 
swear I've seen something like this go by on the list.

Please?  Would sure ease my mind.  Thanks.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 06 01:26:38 1998
Return-Path: <AlanLennon@alanl.globalnet.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFMIO-00NDHOC>; Sat, 5 Sep 1998 19:38:44 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 17EACD086; Sat,  5 Sep 1998 20:46:47 +0200 (CEST)
From: Alan Lennon <AlanLennon@alanl.globalnet.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F18717.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 02 Sep 1998 18:37:52 +0100
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Calling DLL's
X-UIDL: 1c0d6a8f623f9edbf7e0efe9f6b2f210

* List: gfabasic@aachen.linux.de

GFA allows a string variable to be used as the DLL name in a DLL command
but it causes an error when compiled. Is there any way I can dynamically
name the DLL in a GFA program?

DLL #1,my_dll$		//fine in interpreter but won't compile 	

//function prototypes

ENDDLL

On the subject of DLL's, since the 32 bit version of GFA uses a runtime
library does this imply that it cannot be used to create a DLL?

Best Regards Alan Lennon

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 06 01:26:39 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFN3J-00NGgrC>; Sat, 5 Sep 1998 20:27:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E1D4AD065; Sat,  5 Sep 1998 21:35:05 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F1926A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id AEF88F3F0088; Sat, 05 Sep 1998 20:12:08 +0200
Date: Sat, 5 Sep 1998 20:12:32 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Calling DLL's
X-UIDL: 19240cc0003231c6f3a1c5a871fe31ec

* List: gfabasic@aachen.linux.de

The DLL statement causes hardcoded imports to be included into the executable.
The filename of the DLL should therefor be hardcoded in the source code.
Usually you would simply specify its filename without a path. On start up
Windows will first search the current directory to locate the DLL. If it
cannot find it it will search the DLL in the System or Windows directory.

The runtime lib (DLL) is only used by the interpreter and by executables
created with "Make Exe". Make Exe creates a small EXE with calls to the
runtime lib.
It's quite different from Compile, which compiles and links the program to be
a stand-alone executable.

Sjouke Hamstra


-----Original Message-----
From: Alan Lennon <AlanLennon@alanl.globalnet.co.uk>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: zaterdag 5 september 1998 19:37
Subject: [GFA] Calling DLL's


>* List: gfabasic@aachen.linux.de
>
>GFA allows a string variable to be used as the DLL name in a DLL command
>but it causes an error when compiled. Is there any way I can dynamically
>name the DLL in a GFA program?
>
>DLL #1,my_dll$ //fine in interpreter but won't compile
>
>//function prototypes
>
>ENDDLL
>
>On the subject of DLL's, since the 32 bit version of GFA uses a runtime
>library does this imply that it cannot be used to create a DLL?
>
>Best Regards Alan Lennon
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 06 01:26:41 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFN4F-00NGbWC>; Sat, 5 Sep 1998 20:28:11 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5FA76D08A; Sat,  5 Sep 1998 21:35:06 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F1926F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 5 Sep 1998 11:13:40 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] GFAWHELP
X-UIDL: 8d57a888b1cd3b1a0b807ba9aeadd0c5

* List: gfabasic@aachen.linux.de

The GFAWHELP web page is back in operation. New files and new programmers
have been added. Check it out.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 06 01:26:43 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFP8X-00NGbMC>; Sat, 5 Sep 1998 22:40:45 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 78AA3D088; Sat,  5 Sep 1998 23:48:49 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F1B1C1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Cc: "Dean Hodgson" <dhodgson@nexus.edu.au>
Date: Sat, 5 Sep 1998 13:38:03 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] DEANSLIB
X-UIDL: dc8fa43b368480e4ac00dbeebb9e1db2

* List: gfabasic@aachen.linux.de

Just posted on the  GFAWHELP Files page is DEANSLIB.ZIP. A collection of
library routines by Dean Hodgson.  Demo program by Dean Hodgson and Alyce
Watson.
You don't want to miss this!!  Thanks Dean for these great libraries and
thanks to Alyce for her help with the demo code.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 06 01:26:44 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFRII-00NGb3C>; Sun, 6 Sep 1998 00:58:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 35BF3D089; Sun,  6 Sep 1998 02:07:00 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F1D224.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980905225849.HIJG2461@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 5 Sep 1998 22:58:49 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 5 Sep 1998 22:58:49 +0000
Subject: Re: [GFA] DEANSLIB
X-UIDL: 21912f15f040ba40d16266ccdd628197

* List: gfabasic@aachen.linux.de

Uhhhhhh, Dale....
Alyce's demo is in LibertyBASIC, not HGA-W.  Dean has some demos in GFA-W
somewhere.  Alyce is becoming an LB GURU, but won't tackle GFA_W.
<G>
TomR.


At 01:38 PM 05/09/98 -0700, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Just posted on the  GFAWHELP Files page is DEANSLIB.ZIP. A collection of
>library routines by Dean Hodgson.  Demo program by Dean Hodgson and Alyce
>Watson.
>You don't want to miss this!!  Thanks Dean for these great libraries and
>thanks to Alyce for her help with the demo code.
>Dale
>
>http://www.gfawhelp.gfa.net
>webmaster.gfawhelp@gfa.net
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:07 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFTIP-00NGhFC>; Sun, 6 Sep 1998 03:07:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 43543D06B; Sun,  6 Sep 1998 04:15:15 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F1F033.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 5 Sep 1998 17:56:12 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] DEANSLIB
X-UIDL: 0cec1d1daeba9df33a616d62792ec362

* List: gfabasic@aachen.linux.de

Dean gives her credit in a REM so what do I know. Actually he gave some guy
named Tom Record code help credit but your head is already too big(G).
Anyway, if you are raising lizards what else could you possibly need! What
does LB stand for, Long Ball?


http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Saturday, September 05, 1998 4:00 PM
Subject: Re: [GFA] DEANSLIB


>* List: gfabasic@aachen.linux.de
>
>Uhhhhhh, Dale....
>Alyce's demo is in LibertyBASIC, not HGA-W.  Dean has some demos in GFA-W
>somewhere.  Alyce is becoming an LB GURU, but won't tackle GFA_W.
><G>
>TomR.
>
>
>At 01:38 PM 05/09/98 -0700, you wrote:
>>* List: gfabasic@aachen.linux.de
>>
>>Just posted on the  GFAWHELP Files page is DEANSLIB.ZIP. A collection of
>>library routines by Dean Hodgson.  Demo program by Dean Hodgson and Alyce
>>Watson.
>>You don't want to miss this!!  Thanks Dean for these great libraries and
>>thanks to Alyce for her help with the demo code.
>>Dale
>>
>>http://www.gfawhelp.gfa.net
>>webmaster.gfawhelp@gfa.net
>>
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:11 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFXeS-00NGhHC>; Sun, 6 Sep 1998 07:46:16 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D9C20D074; Sun,  6 Sep 1998 08:54:15 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F23198.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980906054525.IYBR1362@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 6 Sep 1998 05:45:25 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 6 Sep 1998 05:45:25 +0000
Subject: Re: [GFA] DEANSLIB
X-UIDL: 466b381e04e3b281dbbbd98f6de58776

* List: gfabasic@aachen.linux.de

At 05:56 PM 05/09/98 -0700, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Dean gives her credit in a REM so what do I know. Actually he gave some guy
>named Tom Record code help credit but your head is already too big(G).
>Anyway, if you are raising lizards what else could you possibly need! What
>does LB stand for, Long Ball?
>
+++  LibertyBASIC, a Windows basic, once upon a time based on GWBasic.
http://world.std.com/~carlg/basic.html   VB6 may walk away from it, but it's
almost equiv to VB4 & VB5 altho just 16-bit.  Been in it since 94.  Got into
GFA-W primarily to make *.dlls to expand LB.  Dean & I do this, have caused 
others to try in other languages but they're going strictly 32-bit so Win31
users are out of luck.

lizards... SNORT!
<G>
TomR.

>
>http://www.gfawhelp.gfa.net
>webmaster.gfawhelp@gfa.net
>-----Original Message-----
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>Date: Saturday, September 05, 1998 4:00 PM
>Subject: Re: [GFA] DEANSLIB
>
>
>>* List: gfabasic@aachen.linux.de
>>
>>Uhhhhhh, Dale....
>>Alyce's demo is in LibertyBASIC, not HGA-W.  Dean has some demos in GFA-W
>>somewhere.  Alyce is becoming an LB GURU, but won't tackle GFA_W.
>><G>
>>TomR.
>>
>>
>>At 01:38 PM 05/09/98 -0700, you wrote:
>>>* List: gfabasic@aachen.linux.de
>>>
>>>Just posted on the  GFAWHELP Files page is DEANSLIB.ZIP. A collection of
>>>library routines by Dean Hodgson.  Demo program by Dean Hodgson and Alyce
>>>Watson.
>>>You don't want to miss this!!  Thanks Dean for these great libraries and
>>>thanks to Alyce for her help with the demo code.
>>>Dale
>>>
>>>http://www.gfawhelp.gfa.net
>>>webmaster.gfawhelp@gfa.net
>>>
>>>
>>>
>>>
>>>---
>>>This mailing list is currently running BeroList v2.5.6
>>>Report problems to bero@bero-online.ml.org
>>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:13 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zFgCK-00NDM8C>; Sun, 6 Sep 1998 16:53:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8C03DD075; Sun,  6 Sep 1998 18:01:50 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F2B1EE.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 6 Sep 1998 07:50:55 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Fw: Programs & Web Page
X-UIDL: 80de16253cb819e9b63eb5a691c3c713

* List: gfabasic@aachen.linux.de


http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Bev Brown <bbrown1@ciaccess.com>
To: Dale Bryant <adbryant@email.msn.com>
Date: Sunday, September 06, 1998 1:06 AM
Subject: Programs & Web Page


>Hi Dale:
>
>Nice looking web page!  One thing RIDXW60.ZIP is an old version of
>RECINDX.ZIP (v6.1) so you can drop it; I'm redoing my FILE EDITOR for
>WINDOWS & it may take a while; it needs a complete overhall.
>
>I wish someone would tell me how to use the READ/WRITE SECTOR ($21 $7305)
>interrupt; I'm still getting the wrong info -- at least, I'm not getting a
>GP error any more.
>
>Oh well! give my luv to Lois & enjoy the long weekend.
>
>                                                              -->Bev<--
>
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:16 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGI7W-00NGhiC>; Tue, 8 Sep 1998 09:23:22 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (2128 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <vo@schoeller.at>) 
	id <m0zFuIf-000KGjE@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Mon, 7 Sep 1998 07:57:17 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9433FD07B; Mon,  7 Sep 1998 08:52:08 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F3829A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 7 Sep 1998 07:45:25 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Please help - font, edittext, in dlg
X-UIDL: f0a7ea8fcb85fbae927f878c6dc484a2

* List: gfabasic@aachen.linux.de

I think, you mean something like this...

UseSmall&=true

GETFONT ANSI_VAR_FONT
FONT TO Small&

DIALOG #10,30,16,580,450,"Schoeller's Mystery Database",WS_SYSMENU |
DS_MODALFRAME,16,"Helv"
  CONTROL "&Volltext:",924,"static",SS_LEFT,20,259,65,22
  CONTROL "", 111, "edit", 4096 | ES_LEFT | WS_BORDER | WS_TABSTOP |
WS_CHILD | ES_MULTILINE, 86, 257, 461, 106
ENDDIALOG

DLG FILL 10,RGB(192,192,192)

IF usesmall& THEN ~SendMessage(DLGITEM(10,111),WM_SETFONT,Small&,0)

SHOWDIALOG #10

t% = TIMER + 2000
DO
  GETEVENT
LOOP UNTIL TIMER > t%

CLOSEDIALOG #10
FREEFONT Small&


>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Samstag, 05. September 1998 09:08
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] Please help - font, edittext, in dlg
>
>* List: gfabasic@aachen.linux.de
>
>Am having trouble setting the font for an edittext box in a dialog.
>It is refusing to co-operate.  I can't find an example, but would 
>swear I've seen something like this go by on the list.
>
>Please?  Would sure ease my mind.  Thanks.
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:19 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGIEY-00NGhlC>; Tue, 8 Sep 1998 09:30:38 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (2672 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <tiger.genealogical.rescue@worldnet.att.net>) 
	id <m0zFvSy-000KRAE@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Mon, 7 Sep 1998 09:12:00 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9B247D065; Mon,  7 Sep 1998 10:06:54 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F39420.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980907064642.FSCM1926@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 7 Sep 1998 06:46:42 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 7 Sep 1998 06:46:42 +0000
Subject: Re: AW: [GFA] Please help - font, edittext, in dlg
X-UIDL: 28c7ef13a0318a67c721a2fc82695cf7

* List: gfabasic@aachen.linux.de

YESSSSSSSSSSSSSSSSSSSSSSSSSS!!!!!!!
Thank you, Michael
<G>
TomR.


At 07:45 AM 07/09/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>I think, you mean something like this...
>
>UseSmall&=true
>
>GETFONT ANSI_VAR_FONT
>FONT TO Small&
>
>DIALOG #10,30,16,580,450,"Schoeller's Mystery Database",WS_SYSMENU |
>DS_MODALFRAME,16,"Helv"
>  CONTROL "&Volltext:",924,"static",SS_LEFT,20,259,65,22
>  CONTROL "", 111, "edit", 4096 | ES_LEFT | WS_BORDER | WS_TABSTOP |
>WS_CHILD | ES_MULTILINE, 86, 257, 461, 106
>ENDDIALOG
>
>DLG FILL 10,RGB(192,192,192)
>
>IF usesmall& THEN ~SendMessage(DLGITEM(10,111),WM_SETFONT,Small&,0)
>
>SHOWDIALOG #10
>
>t% = TIMER + 2000
>DO
>  GETEVENT
>LOOP UNTIL TIMER > t%
>
>CLOSEDIALOG #10
>FREEFONT Small&
>
>
>>----------
>>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>>Gesendet: 	Samstag, 05. September 1998 09:08
>>An: 	gfabasic@aachen.linux.de
>>Betreff: 	[GFA] Please help - font, edittext, in dlg
>>
>>* List: gfabasic@aachen.linux.de
>>
>>Am having trouble setting the font for an edittext box in a dialog.
>>It is refusing to co-operate.  I can't find an example, but would 
>>swear I've seen something like this go by on the list.
>>
>>Please?  Would sure ease my mind.  Thanks.
>><G>
>>TomR.
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:32 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGJ1y-00NGixC>; Tue, 8 Sep 1998 10:21:42 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (1116 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <adbryant@email.msn.com>) 
	id <m0zG6o7-000EvoE@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Mon, 7 Sep 1998 21:18:35 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 37EDAD074; Mon,  7 Sep 1998 22:13:25 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F43E65.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 7 Sep 1998 12:02:08 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] ADDITIONS
X-UIDL: 2799c54f95e970fc85c22a704b168059

* List: gfabasic@aachen.linux.de

Added to file download page 09/07/98
PRIVED12.ZIP by Sven Kumlin
TMMT.ZIP by Joe Hurst

Added to the GFA programmers biography page.
Markus Kuntner
Telfs/Austria

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:44 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGJ8G-00NEm8C>; Tue, 8 Sep 1998 10:28:12 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (1337 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <tiger.genealogical.rescue@worldnet.att.net>) 
	id <m0zFlKv-000CdYH@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Sun, 6 Sep 1998 22:23:01 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D66ADD08E; Sun,  6 Sep 1998 23:17:45 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F2FBFC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980906200933.RKRG1362@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 6 Sep 1998 20:09:33 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 6 Sep 1998 20:09:33 +0000
Subject: [GFA] trouble in paradise
X-UIDL: 80c73831af09cd3cca47539a2e6cb1a7

* List: gfabasic@aachen.linux.de

Have discovered GFA-W programs compiled for 386-only (no coprocessor) in
GFA-W WGEN.EXE v1.7 do NOT run on Cyrix Pentiums.

Any help/info/ideas on this?  Would appreciate help.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:50 1998
Return-Path: <URaatz5552@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGJBC-00NGhkC>; Tue, 8 Sep 1998 10:31:14 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (1382 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <URaatz5552@aol.com>) 
	id <m0zFkvl-000CayH@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Sun, 6 Sep 1998 21:57:01 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 16F90D063; Sun,  6 Sep 1998 22:51:53 +0200 (CEST)
From: URaatz5552@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F2F5E9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sun, 6 Sep 1998 15:33:14 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0.i  for Windows sub 85
Subject: [GFA] Needed Info about ~INST($...)
X-UIDL: 106b1247043fb612ba97bfd00b330c1b

* List: gfabasic@aachen.linux.de

Hello!

Have anyone some detail information and/or Help-File
about ~INTR($...) for UART 16550AF ?

I found not much enough to understand it (!)
- just two lines from the Demofile V24.lst:


// Should get how many bytes are in the buffer    ( but not with my UART !?!)
~INTR($21,_AH=$44,_AL=$02,_CX=$04,_DS=HIWORD(V:a$),_DX=LOWORD(V:a$))

// Should get the bytes! ( but not with my UART !?! )
a&=INTR($21,_AH=$3F,_BX=handle&,_CX=n&,_DS=HIWORD(V:a$),_DX=LOWORD(V:a$))

Thank you !

URaatz5552@aol.com


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:38:52 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGJBz-00NEltC>; Tue, 8 Sep 1998 10:32:03 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (1691 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <tiger.genealogical.rescue@worldnet.att.net>) 
	id <m0zFmKg-000ECYH@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Sun, 6 Sep 1998 23:26:50 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B7401D08F; Mon,  7 Sep 1998 00:21:38 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F30AF2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980906211324.SGMJ1362@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 6 Sep 1998 21:13:24 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 6 Sep 1998 21:13:24 +0000
Subject: Re: [GFA] trouble in paradise
X-UIDL: 367a2e136ba58554976d13c2dd108e91

* List: gfabasic@aachen.linux.de

CORRECTION
Compiled for _286_!  HD crash recently, formatted & reloaded - forgot to
go into the compiler & reset my options.  Sorry.
<G>
TomR.


At 08:09 PM 06/09/98 +0000, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Have discovered GFA-W programs compiled for 386-only (no coprocessor) in
>GFA-W WGEN.EXE v1.7 do NOT run on Cyrix Pentiums.
>
>Any help/info/ideas on this?  Would appreciate help.
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:39:03 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGJHB-00ND5xC>; Tue, 8 Sep 1998 10:37:25 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (1957 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <adbryant@email.msn.com>) 
	id <m0zFo3I-000G0bH@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Mon, 7 Sep 1998 01:17:00 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 09F5CD08B; Mon,  7 Sep 1998 02:11:53 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F324C9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 6 Sep 1998 15:53:39 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] trouble in paradise
X-UIDL: bd44f5a0b3d73146c753dd5c27ff907d

* List: gfabasic@aachen.linux.de

Its those darn lizards. I told you chinchillas would be better.
dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Sunday, September 06, 1998 2:15 PM
Subject: Re: [GFA] trouble in paradise


>* List: gfabasic@aachen.linux.de
>
>CORRECTION
>Compiled for _286_!  HD crash recently, formatted & reloaded - forgot to
>go into the compiler & reset my options.  Sorry.
><G>
>TomR.
>
>
>At 08:09 PM 06/09/98 +0000, you wrote:
>>* List: gfabasic@aachen.linux.de
>>
>>Have discovered GFA-W programs compiled for 386-only (no coprocessor) in
>>GFA-W WGEN.EXE v1.7 do NOT run on Cyrix Pentiums.
>>
>>Any help/info/ideas on this?  Would appreciate help.
>><G>
>>TomR.
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:39:05 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGJI8-00NGhWC>; Tue, 8 Sep 1998 10:38:24 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (1175 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <adbryant@email.msn.com>) 
	id <m0zFoID-000G2CH@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Mon, 7 Sep 1998 01:32:25 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B4D51D092; Mon,  7 Sep 1998 02:27:20 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F32868.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sun, 6 Sep 1998 16:14:20 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] NEW
X-UIDL: aa3c32730497ff1d4b258bfd9ebc1dd0

* List: gfabasic@aachen.linux.de

Just added to the files download page on the GFAWHELP web site.
META.ZIP two meta programs in the zip file by Brent Deck
TSKNICON.ZIP by Patrik Battig
These are nice programs and you might want to study the source code.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:39:07 1998
Return-Path: <wilkins@niagara.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zGJJn-00NGipC>; Tue, 8 Sep 1998 10:40:07 +0200 (MEST)
Received: from www.aachen.linux.de([198.22.51.242]) (1372 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <wilkins@niagara.com>) 
	id <m0zGBUu-000FevE@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Tue, 8 Sep 1998 02:19:04 +0200 (MET DST)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 08E94D065; Tue,  8 Sep 1998 03:14:00 +0200 (CEST)
From: tom <wilkins@niagara.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F484D8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 07 Sep 1998 19:53:25 -0400
X-Mailer: Mozilla 4.05 [en] (Win95; I)
MIME-Version: 1.0
References: <35EEE6C8.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Files
X-UIDL: fb6fc1c3bdbde5665f386b227460c039

* List: gfabasic@aachen.linux.de

Dale - I changed my email address and am not on the gfa list server
anymore. Can you tell me how to get back on? I know I should keep those
instructions, but <sigh> it just never happens.

Also, my web page address, which is on your programmers page, changed
too. I am formerly:

tommy@niagara.com
www.niagara.com/~tommy

and my new address and web page are:

wilkins@niagara.com
www.niagara.com/~wilkins


Thanks for any help Dale.

Tom Wilkinson

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:39:16 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zGQf0-00NGhJC>; Tue, 8 Sep 1998 18:30:30 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4BE69D065; Tue,  8 Sep 1998 19:38:28 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F56B94.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id SAA14009 for <gfabasic@aachen.linux.de>; 
          Tue, 8 Sep 1998 18:30:17 +0200 (MET DST)
Date: Tue, 8 Sep 1998 18:31:10 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: [GFA] GFA Magazines?
X-UIDL: 218e6ba6d680cdcb5c60e02fd61cae18

* List: gfabasic@aachen.linux.de

Hello all,
can anyone tell me, if it exist a magazine about GFA-Basic 8in Germen or
English)?

Sven

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:39:32 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zGepR-00NGqnC>; Wed, 9 Sep 1998 09:38:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 71C71D065; Wed,  9 Sep 1998 10:46:13 +0200 (CEST)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F64055.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 9 Sep 1998 03:29:07 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3155.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: [GFA] [PA} GFA Magazine
X-UIDL: 8acfe115a1455bb5ebf34289b6182192

* List: gfabasic@aachen.linux.de

Hi Sven:

> Hello all,
> can anyone tell me, if it exist a magazine about GFA-Basic 8in Germen or
English)?
None that I know of but there was an English language one called "the GFA
JOURNAL" put out by a company in the US called "ARIEL Publishing" back at
the end of 1993 for all of 3 months.

                                                              -->Bev<--



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:39:35 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zGhef-00NGqsC>; Wed, 9 Sep 1998 12:39:17 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 2EA5ED066; Wed,  9 Sep 1998 13:47:03 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F66AB7.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 9 Sep 1998 12:39:48 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Some pieces of source code...
X-UIDL: d35fc1bff9156d7b0560a8bc48f5e396

* List: gfabasic@aachen.linux.de

Hi

  I'd like to inform you, that I'll put some code into my web pages from
tomorrow on...

  http://vo.schoeller.co.at    or...
  http://193.80.105.57/file/sources

Michael Vogel
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:39:36 1998
Return-Path: <abarbosa@jnoticias.pt>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zGhls-00NGr2C>; Wed, 9 Sep 1998 12:46:44 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 93ED4D074; Wed,  9 Sep 1998 13:54:45 +0200 (CEST)
From: "ANTONIO BARBOSA" <abarbosa@jnoticias.pt>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F66C85.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Wed, 09 Sep 1998 11:41:52
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] GFA FOR LINUX
X-UIDL: 84ee8cd497e3177f7c32634564a216bf

* List: gfabasic@aachen.linux.de


Anybody knows if there is (or there wil be) GFABASIC for LINUX?

I'm tired of MicrosoftWindows...

-------------------------------------------------------------------
Antonio Barbosa                   - Emp. do Jornal de Noticias S.A.
Rua de Goncalo Cristovao, 195               telef.:   351-2-2096199
4000 Porto - Portugal                       fax.:     351-2-2096108
                                       email: abarbosa@jnoticias.pt
-------------------------------------------------------------------


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 09 17:39:37 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zGhvz-00NGiaC>; Wed, 9 Sep 1998 12:57:11 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 026EFD077; Wed,  9 Sep 1998 14:04:59 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F66EEC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980909105616.CONH17133@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 9 Sep 1998 10:56:16 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 9 Sep 1998 10:56:16 +0000
Subject: Re: [GFA] Some pieces of source code...
X-UIDL: 08b0e71204867b16df06f8b85725c107

* List: gfabasic@aachen.linux.de

Thank you, Sir.  you're a gentleman & a scholar.
<G>
TomR.


At 12:39 PM 09/09/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi
>
>  I'd like to inform you, that I'll put some code into my web pages from
>tomorrow on...
>
>  http://vo.schoeller.co.at    or...
>  http://193.80.105.57/file/sources
>
>Michael Vogel
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 10 20:00:34 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zGzKr-00NDMVC>; Thu, 10 Sep 1998 07:32:01 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id CC335D065; Thu, 10 Sep 1998 08:40:03 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F77447.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 10 Sep 1998 07:32:54 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] GFA FOR LINUX
X-UIDL: 25fbeaff47d5a37223e50b035e54222c

* List: gfabasic@aachen.linux.de


Some (special) Dialog-problems I have...

o   is it possible to limit a multiline input field to a maximum, e.g.
2000 chars ?
o   can listbox lines filled with own colors (see last mails) ?
o   has anyone coded a fast sorting algorythm for "tabbed" strings ?
     (I want to sort different tab seperated colums in a listbox)
o   has anybody seen anomalies when opening and closing a dialogbox very
often (100-200 times) within a program ?

.... don't miss my "screen saver and more" examples on
http://193.80.105.57/file/gfa .....

>Michael

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 10 20:00:35 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zGzsI-00NDG7C>; Thu, 10 Sep 1998 08:06:34 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3F633D06B; Thu, 10 Sep 1998 09:14:39 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F77C5F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 10 Sep 1998 15:38:50 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35F77447.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: AW: [GFA] GFA FOR LINUX
X-UIDL: b5ab066b6babc4353ce5bea0d2f482d0

* List: gfabasic@aachen.linux.de

Vogel Michael wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> Some (special) Dialog-problems I have...
> 
> o   is it possible to limit a multiline input field to a maximum, e.g.
> 2000 chars ?
> o   can listbox lines filled with own colors (see last mails) ?
> o   has anyone coded a fast sorting algorythm for "tabbed" strings ?
>      (I want to sort different tab seperated colums in a listbox)
> o   has anybody seen anomalies when opening and closing a dialogbox very
> often (100-200 times) within a program ?
> 
> .... don't miss my "screen saver and more" examples on
> http://193.80.105.57/file/gfa .....
> 
> >Michael
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

I may have some special bits here.

To limit the number of characters in an editbox, I use:

PROCEDURE edlimittext(handle&,m&)
  ~SendMessage(handle&,EM_LIMITTEXT,m&,0)
RETURN

where handle& is the handle of the editbox and m& is the number of
characters.
Here is a promo: this procedure is straight out of my GFA function
library, DEANSLIB, which I've passed onto Dale Bryant to make freely
available.

I have done a sort for tabbed strings for a listbox but it may not be
blinding in speed. You'll have to modify the routines below to suit your
arrays, etc. After sorting, I clear the listbox then reload the array
loans$().

'sort list using subfield ordinal. Fields in one string, separated by
TAB characters.
'st& 1=field1, 2=field2, 3=field3, 4=field4, etc.
PROCEDURE sortlist(st&)
  LOCAL i&,j&,gap&,swtich&,k&
  IF bo&<=1 THEN EXPROC			'if empty array, exit & don't sort
  gap&=bo&
  REPEAT				'this is the sort routine
    gap&=gap&/1.3
    IF gap&<1 THEN gap&=1
    switch&=0
    k&=bo&-gap&
    FOR i&=1 TO k&
      j&=i&+gap&
      sa$=@fulladjust$(@getfield$(array$(i&),st&))	'adjust takes into
account case & punctuation
      sb$=@fulladjust$(@getfield$(array$(j&),st&))	'getfield plucks the
field from the string
      IF sa$>sb$ THEN SWAP loans$(i&),loans$(j&)
    NEXT i&
  UNTIL switch&=0 AND gap&=1
  loanlistsort&=st&			'global that holds which field has been sorted
RETURN

FUNCTION getfield$(i$,p&)		'plucks field p& from the string i$
  LOCAL r&,r1&
  r&=0
  FOR i&=1 TO p&			'loop through look for p&th TAB character
    r1&=r&
    r&=INSTR(r1&+1,i$,CHR$(9))		'look for TAB character
  NEXT i&
  a$=MID$(i$,r1&+1,r&-r1&-1)		'extract field into a$
  RETURN a$				'return this value
ENDFUNC


I don't know about changing colours in listbox lines. I've seen
different coloured columns in ownerdraw listboxes but the guy that did
that (in C) is keeping it a secret from me.


---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Sep 10 20:00:43 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zH8dK-00NGbIC>; Thu, 10 Sep 1998 17:27:42 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 445E6D065; Thu, 10 Sep 1998 18:35:37 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F7FFD9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 10 Sep 1998 08:24:34 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] DEANSLIB
X-UIDL: b25c21af63a325b7d29989b3faa35689

* List: gfabasic@aachen.linux.de

DEANSLIB.ZIP is available from the download page from the GFAWHELP web site.
Not very many programmers share this kind of code.  Make yourself a better
programmer by grabbing this one. Remember, all programs for download from
the GFAWHELP site contain the GFA source code.
Dale Bryant
http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:02 1998
Return-Path: <buspl@swissonline.ch>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHBD0-00NGbEC>; Thu, 10 Sep 1998 20:12:42 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5A137D066; Thu, 10 Sep 1998 21:20:46 +0200 (CEST)
From: "Beat Werthmller" <buspl@swissonline.ch>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F8268E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 10 Sep 1998 20:08:38 +0200
Organization: BUSPL
X-Mailer: Mozilla 4.05 [de] (Win95; I)
MIME-Version: 1.0
References: <35EE6AF9.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Eintragung in die Mailing-Liste
X-UIDL: 8abe55c20d2994405f57c66cd7fbbf7b

* List: gfabasic@aachen.linux.de



KUNTNER Markus schrieb:

> * List: gfabasic@aachen.linux.de
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

  Hello Markus,

how I can cancel my name in the maillist ?

thanks


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:17 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHIeN-00NDMiC>; Fri, 11 Sep 1998 04:09:27 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 72A39D066; Fri, 11 Sep 1998 05:17:31 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F8964D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 10 Sep 1998 19:06:23 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] ownsub.dll
X-UIDL: 763f10d6745a958e9e1a3cfc61e78e97

* List: gfabasic@aachen.linux.de

I have a .DLL written by Ulrich Becker. I also have many examples of calling
the DLL. I would like to make this available by offering it for download
from the GFAWHELP site. Does anyone have an email address for Mr.. Becker so
I could seek his permission?
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:18 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHJ0S-00NGanC>; Fri, 11 Sep 1998 04:32:16 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 01E90D074; Fri, 11 Sep 1998 05:40:23 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F89BA8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 10 Sep 1998 19:29:11 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] OWNSUB
X-UIDL: def15e297d402ad8ec3a4aae68b4950f

* List: gfabasic@aachen.linux.de

The OWNSUB.DLL by Ulrich Becker is a fantastic programming effort.  If
anyone on the list has his email address please let me know.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:19 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHJMB-00NEm8C>; Fri, 11 Sep 1998 04:54:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6A697D06B; Fri, 11 Sep 1998 06:02:42 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F8A0E6.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980911025336.LQCK1683@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 11 Sep 1998 02:53:36 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 11 Sep 1998 02:53:36 +0000
Subject: Re: [GFA] ownsub.dll
X-UIDL: d0a34debd7aea484ba32c06389d0e90d

* List: gfabasic@aachen.linux.de

What's do, Boss?  I have a little news, too.

Re: unzipdll.dll v2.06   1808CG1-
Christian Ghisler <100332.1175@compuserve.com>

Thanks for the GFA Basic source. I have made some corrections to the code
you sent me (see below). There are differences because 'integer' 2 bytes in
the 16-bit version and 4 bytes in the 32-bit version. Make sure that the
32-bit version uses the STDCALL calling convention, which is the default
for all Windows DLLs too.

The following declarations are for 16 bit:

    DECL LONG GetUnzipDllVersion() AS 1
    DECL WORD GetFirstInZip(L,L) AS 2
    DECL WORD GetNextInZip(L) AS 3
    DECL BYTE CloseZipFile(L) AS 4
    DECL BOOL isZip(L) AS 5
    DECL LONG GetSupportedMethods() AS 6
    DECL WORD UnZipFile(L,L,W,L,W,W) AS 7
    DECL WORD UnzipFileToMemory(L,L,L,L,W,W) AS 8
    DECL WORD UnzipTestIntegrity(L,L,W,W,L) AS 9

The following declarations are for 32 bit:

    DECL LONG GetUnzipDllVersion() AS 1
    DECL LONG GetFirstInZip(L,L) AS 2
    DECL LONG GetNextInZip(L) AS 3
    DECL BYTE CloseZipFile(L) AS 4
    DECL BOOL isZip(L) AS 5
    DECL LONG GetSupportedMethods() AS 6
    DECL LONG UnZipFile(L,L,W,L,L,L) AS 7
    DECL LONG UnzipFileToMemory(L,L,L,L,L,L) AS 8
    DECL LONG UnzipTestIntegrity(L,L,W,L,L) AS 9

<G>
TomR.


At 07:06 PM 10/09/98 -0700, you wrote:
>* List: gfabasic@aachen.linux.de
>
>I have a .DLL written by Ulrich Becker. I also have many examples of calling
>the DLL. I would like to make this available by offering it for download
>from the GFAWHELP site. Does anyone have an email address for Mr.. Becker so
>I could seek his permission?
>Dale Bryant
>
>http://www.gfawhelp.gfa.net
>webmaster.gfawhelp@gfa.net
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:20 1998
Return-Path: <patrikb@innocent.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHPTu-00NGgjC>; Fri, 11 Sep 1998 11:27:06 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 329ABD066; Fri, 11 Sep 1998 12:35:07 +0200 (CEST)
From: "Patrik" <patrikb@innocent.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F8FCDE.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 11 Sep 1998 02:39:03 +0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] GFA FOR LINUX
X-UIDL: 0dd987bc9274daadcad2fd70ad6d916c

* List: gfabasic@aachen.linux.de

>
>Some (special) Dialog-problems I have...
>
>o   can listbox lines filled with own colors (see last mails) ?

Use a ownerdraw listbox and catch the message WM_MEASUREITEM
and WM_DRAWITEM. To find out how it works, see the API documentation
from MS. (available for download)

>o   has anybody seen anomalies when opening and closing a dialogbox very
>often (100-200 times) within a program ?
Don't use CLOSEDIALOG to close a Dialogbox, if you want to use it more than
one time
use SHOWW to hide or show the dialog. There is a problem with memory
management
if you call SHOWDIALOG and CLOSEDIALOG certain times.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:22 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHQIi-00NGgrC>; Fri, 11 Sep 1998 12:19:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A4759D066; Fri, 11 Sep 1998 13:27:31 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F90923.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 11 Sep 1998 12:20:37 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] SHOWW Instead of Opendialog..:
X-UIDL: 215ad45dcc1d4f1dd53a5d27de9e4a58

* List: gfabasic@aachen.linux.de



>Don't use CLOSEDIALOG to close a Dialogbox, if you want to use it more than
>one time
>use SHOWW to hide or show the dialog. There is a problem with memory
>management
>if you call SHOWDIALOG and CLOSEDIALOG certain times.

     My problem is, that I am changing the System menu and the title
every time I open the dialog, commands like 
     TITLEW #DLG(30),"title" are not working, where have an idea (a nice
sendmessage-line) here  ?


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:27 1998
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHW3d-00NGbBC>; Fri, 11 Sep 1998 18:28:25 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 67171D066; Fri, 11 Sep 1998 19:36:20 +0200 (CEST)
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F95F94.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-BlackMail: 192.168.1.201, stargate, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 16:16:12(GMT) on September 11, 1998
X-Sender: michael@bonbit.org
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Fri, 11 Sep 1998 18:18:59 +0200
In-Reply-To: <35F90923.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re: [GFA] SHOWW Instead of Opendialog..:
X-UIDL: 190ad85a26e9c038e4e80e01fe30d6c9

* List: gfabasic@aachen.linux.de

At 12:20 11.09.98 +0200, Vogel Michael wrote:

>     My problem is, that I am changing the System menu and the title
>every time I open the dialog, commands like 
>     TITLEW #DLG(30),"title" are not working, where have an idea (a nice
>sendmessage-line) here  ?

Try this:

title$ = "Example" + CHR$(0)
~SetWindowText(DLG(1),title$)

M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:29 1998
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHW5N-00NEnpC>; Fri, 11 Sep 1998 18:30:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E4E5AD06B; Fri, 11 Sep 1998 19:36:26 +0200 (CEST)
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F95F9F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, stargate, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 16:16:12(GMT) on September 11, 1998
X-Sender: michael@bonbit.org
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Fri, 11 Sep 1998 18:18:59 +0200
In-Reply-To: <35F90923.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re: [GFA] SHOWW Instead of Opendialog..:
X-UIDL: 697b69e28fc942a5b2172bd4e532af68

* List: gfabasic@aachen.linux.de

At 12:20 11.09.98 +0200, Vogel Michael wrote:

>     My problem is, that I am changing the System menu and the title
>every time I open the dialog, commands like 
>     TITLEW #DLG(30),"title" are not working, where have an idea (a nice
>sendmessage-line) here  ?

Try this:

title$ = "Example" + CHR$(0)
~SetWindowText(DLG(1),title$)

M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:32 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHXnX-00NGayC>; Fri, 11 Sep 1998 20:19:55 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1E1FCD065; Fri, 11 Sep 1998 21:28:01 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F979C1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980911181944.BFZ20702@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 11 Sep 1998 18:19:44 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 11 Sep 1998 18:19:44 +0000
Subject: [GFA] enlightenment   1109xx1-
X-UIDL: 28c814f5a48e9855d379746b39fb0737

* List: gfabasic@aachen.linux.de

11/09/98 01:14:03 PM   enlightenment   1109xx1-

Please - I'm going crazy looking for a way to check if a file is open 
without attempting to open it, which means an immediate bomb.  I can 
easily check for a file's existance, but not for it's open/closed 
state.  Is there something I *should* be seeing that I'm not?

All help is greatly appreciated.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:35 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHaeX-00NEm8C>; Fri, 11 Sep 1998 23:22:49 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0F3BBD06B; Sat, 12 Sep 1998 00:30:48 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F9A498.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 11 Sep 1998 14:19:32 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Where is yours?
X-UIDL: bf9f894f84ab934947850e069b03c6d1

* List: gfabasic@aachen.linux.de

Pat Bullman has sent me some great gfaw code. This looks like commercial
quality programming. I will inform everyone when it is available for
download.
Have some GFA code to share? Send it to me and I will post it on the net for
download.  It takes help from many programmers to make the GFAWHELP site
interesting.  Please don't send programs to the mailing list. Send to.
adbyant@gfa.net
adbryant@msn.com

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:36 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHdg9-00NEm8C>; Sat, 12 Sep 1998 02:36:41 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 03CECD066; Sat, 12 Sep 1998 03:44:44 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F9D20D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Fri, 11 Sep 1998 17:33:38 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] BWCC32.DLL
X-UIDL: 2b78f77f24a08339f501b413b685c3ed

* List: gfabasic@aachen.linux.de

I just downloaded BWCC32.DLL   by Borland. All I can get is a Library not
found message even if I supply a complete path. I am curious if anyone has
it and if you have gotten it to work.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:37 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHf6w-00NGaZC>; Sat, 12 Sep 1998 04:08:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E0CBED066; Sat, 12 Sep 1998 05:16:30 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F9E792.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980912020814.HZOW22795@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 12 Sep 1998 02:08:14 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 12 Sep 1998 02:08:14 +0000
Subject: [GFA] bwcc32.dll
X-UIDL: 452c7d7a393c99bb61a7afbb0f3fb53b

* List: gfabasic@aachen.linux.de

Dale (& others)

Don't have it, but...

I encountered a VB6 installer that would not run because it couldn't
find a needed *.dll.  I had the same situation - it wouldn't find it
even w/ a full path.

I located another (mine could have been corrupt).  It seems that mine
was about 1/2 the size of the other one so I swapped out.  The installer
took off & did it's job.

The one I found was in a *.cab that the installer was to use.

I suspect this is the situation I ran into since all descriptions fit.

Hope this info helps you.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:39 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHfHa-00NDGCC>; Sat, 12 Sep 1998 04:19:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 78261D074; Sat, 12 Sep 1998 05:27:34 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F9EA26.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980912021922.IEVD22795@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 12 Sep 1998 02:19:22 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 12 Sep 1998 02:19:22 +0000
Subject: [GFA] help please, font, listbox
X-UIDL: 0bba284be5d49a671cc26649b7909b8d

* List: gfabasic@aachen.linux.de

I am wearing my manuals & keyboard out trying to set the font
in a dialog's listbox to SYSTEM_FIXED_FONT or OEM_FIXED_FONT.

Everything I do is useless... it remains a proportional font
& makes pre-arranged columns look very bad.

I have quite a few font examples, but nothing seems to work.

I can set the font in a normal window at will.

Any help greatly appreciated by my family.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:40 1998
Return-Path: <alex3@global.net.mt>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHfth-00NEmGC>; Sat, 12 Sep 1998 04:58:49 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A77E7D066; Sat, 12 Sep 1998 06:06:56 +0200 (CEST)
From: "Alexander Mifsud" <alex3@global.net.mt>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35F9F360.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sat, 12 Sep 1998 04:52:46 +0300
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] unsubsciibe
X-UIDL: 18b94dccbd667fd7a4c0b5009e8d2d17

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Sun Sep 13 14:04:41 1998
Return-Path: <gaf03642@nifty.ne.jp>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHm81-00NElNC>; Sat, 12 Sep 1998 11:38:01 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 571E0D065; Sat, 12 Sep 1998 12:46:02 +0200 (CEST)
From: Takashi Toyoda <gaf03642@nifty.ne.jp>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FA50EC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 18:39:31 +0900
In-Reply-To: <19980816.3OBRZ7U!@nifty.ne.jp>
MIME-Version: 1.0
X-Mailer: AL-Mail32 Version 1.01
Content-Type: text/plain; charset=us-ascii
Subject: Re: [GFA] wmconst.txt
X-UIDL: 473d2c07e07c327562688294f84d6dd5

* List: gfabasic@aachen.linux.de

BrentDeck@compuserve.com wrote
>Date: Sat, 15 Aug 1998 19:54:50 -0400
>From: BDD <BrentDeck@compuserve.com>
>Reply-To: gfabasic@linux.net.eu.org
>Undocumented issues:
>2)  Also, my editor does not recognize the keyword SCROLL.  Does any one
>else have this problem? ( fortunately the windows equivalent works)
Since it seems toi me that your question remaina un-answered in public, .....
It depends on the version of GFA you use. I used to experience the same problem
(SCROLL turned to SCREEN OLL) in the vesion 4.3. The latest version is 4.38,
and quite naturally, the bug is gone.
I used to have compile problem with ^ (power operater), array variable increment
failure, etc. back then, and all is gone now.
If you are still sticking to some older versio, it must be a good idea to update.
 

---------------------------------------
YouLong <gaf03642@nifty.ne.jp>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:42 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHr8S-00NGh0C>; Sat, 12 Sep 1998 16:58:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0D6E9D06B; Sat, 12 Sep 1998 18:06:52 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FA9C1C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 07:55:42 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] bwcc32.dll
X-UIDL: 9101e700f94ccb19c0440969e9ce26c0

* List: gfabasic@aachen.linux.de

Thanks Tom,
I will see if I can get a copy from Borlands web site and check the sizes.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Friday, September 11, 1998 7:09 PM
Subject: [GFA] bwcc32.dll


>* List: gfabasic@aachen.linux.de
>
>Dale (& others)
>
>Don't have it, but...
>
>I encountered a VB6 installer that would not run because it couldn't
>find a needed *.dll.  I had the same situation - it wouldn't find it
>even w/ a full path.
>
>I located another (mine could have been corrupt).  It seems that mine
>was about 1/2 the size of the other one so I swapped out.  The installer
>took off & did it's job.
>
>The one I found was in a *.cab that the installer was to use.
>
>I suspect this is the situation I ran into since all descriptions fit.
>
>Hope this info helps you.
><G>
>TomR.
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:44 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHrEh-00NEjPC>; Sat, 12 Sep 1998 17:05:15 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1C328D077; Sat, 12 Sep 1998 18:13:23 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FA9DA3.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 08:02:12 -0700
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Fw: gfa basic
X-UIDL: f75783cbcb6bed69f49c000adef1f7b1

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-htm  

From ???@??? Sun Sep 13 14:04:46 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHrGl-00NGh5C>; Sat, 12 Sep 1998 17:07:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 15557D07A; Sat, 12 Sep 1998 18:15:31 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FA9E25.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 08:04:18 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] wmconst.txt
X-UIDL: 095534c40e17a755ad5a3f55851f9729

* List: gfabasic@aachen.linux.de

Hi Takashi,
I don't recall seeing your name before so I would like to welcome you to the
mailing list.
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Takashi Toyoda <gaf03642@nifty.ne.jp>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Saturday, September 12, 1998 2:38 AM
Subject: Re: [GFA] wmconst.txt


>* List: gfabasic@aachen.linux.de
>
>BrentDeck@compuserve.com wrote
>>Date: Sat, 15 Aug 1998 19:54:50 -0400
>>From: BDD <BrentDeck@compuserve.com>
>>Reply-To: gfabasic@linux.net.eu.org
>>Undocumented issues:
>>2)  Also, my editor does not recognize the keyword SCROLL.  Does any one
>>else have this problem? ( fortunately the windows equivalent works)
>Since it seems toi me that your question remaina un-answered in public,
....
>It depends on the version of GFA you use. I used to experience the same
problem
>(SCROLL turned to SCREEN OLL) in the vesion 4.3. The latest version is
4.38,
>and quite naturally, the bug is gone.
>I used to have compile problem with ^ (power operater), array variable
increment
>failure, etc. back then, and all is gone now.
>If you are still sticking to some older versio, it must be a good idea to
update.
>
>
>---------------------------------------
>YouLong <gaf03642@nifty.ne.jp>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:47 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHrNZ-00NEjPC>; Sat, 12 Sep 1998 17:14:25 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8B3E7D07C; Sat, 12 Sep 1998 18:22:32 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FA9FC8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 11:13:59 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] help please, font, listbox
X-UIDL: 7fbfa3dc44ee23180854f6b83b900e22

* List: gfabasic@aachen.linux.de

>>> I am wearing my manuals & keyboard out trying to set the font
in a dialog's listbox to SYSTEM_FIXED_FONT or OEM_FIXED_FONT. <<<

This code only allows 3 fonts to be written at fixed pitch, regardless of
width setting.Only one of them scales well.

  
  '  FONT "fixedsys" // any of these 3 will work at fixed pitch in a window
  '  FONT "system"
  FONT FAMILY 48   // but this is the only one that scales fairly well to
different sizes
  FONT HEIGHT 24,WEIGHT 100,ESCAPEMENT 0,PITCH 1,WIDTH 14 TO fnt&


  // This works after the dialog item is created, either before or after
SHOWDIALOG#
  ~SendMessage(DLGITEM(1,113),WM_SETFONT,fnt&,0)


  // This doesn't work at all.
  'hdc& = GetDC(DLGITEM(1,113))
  'SAVEDC
  'SETDC hdc&
  'SETFONT fnt&  // use a scaleable font
  'RESTORE DC

Rememder to FREEFONT fnt&. on exit.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:49 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHuth-00NGhIC>; Sat, 12 Sep 1998 20:59:49 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 2E67CD066; Sat, 12 Sep 1998 22:07:53 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FAD49C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sat, 12 Sep 1998 11:56:30 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] BWCC32.DLL
X-UIDL: 0f750f9ef582142b4fbbe1f28c6a147a

* List: gfabasic@aachen.linux.de

Does any one have the docs on BWCC32.DLL or know where they might be
available? Any help or ideas appreciated.
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:50 1998
Return-Path: <PeterGam@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHvcF-00NGh4C>; Sat, 12 Sep 1998 21:45:51 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8208ED06B; Sat, 12 Sep 1998 22:53:37 +0200 (CEST)
From: PeterGam@compuserve.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FADF51.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 15:44:51 -0400
Sender: PeterGam@compuserve.com
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] BWCC32.DLL
X-UIDL: 0f9c38b7ac619ff3df13439d0607c871

* List: gfabasic@aachen.linux.de

It is not possible to call a 32-bit DLL from within a 16-bit application
without any extra code..

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:51 1998
Return-Path: <postmaster@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHxJC-00NDGCC>; Sat, 12 Sep 1998 23:34:18 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id EA0D1D066; Sun, 13 Sep 1998 00:42:23 +0200 (CEST)
From: "Dave Williams" <postmaster@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FAF8D0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 22:31:48 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] Fw: gfa basic
X-UIDL: e37b402f32d82a4468378e5cc83a9068

* List: gfabasic@aachen.linux.de

Hi,

We Can Assist.  GFA details on our site.


Kind regards
Dave Williams
GEMWORKS DIRECT
(incorporating Stage 1 MIDI Music)

From ???@??? Sun Sep 13 14:04:52 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHysv-00NGbBC>; Sun, 13 Sep 1998 01:15:17 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 74403D066; Sun, 13 Sep 1998 02:23:25 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FB107D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 16:12:13 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] BWCC32.DLL
X-UIDL: 4ab85b96832d2aee2fc7746438cbce0b

* List: gfabasic@aachen.linux.de

Thanks Peter,
I can call it by using LoadLibrary. The only thing that seems to work is the
dialog boxes. Thanks for the reply. I will give it up.
dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: PeterGam@compuserve.com <PeterGam@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Saturday, September 12, 1998 3:36 PM
Subject: [GFA] BWCC32.DLL


* List: gfabasic@aachen.linux.de

It is not possible to call a 32-bit DLL from within a 16-bit application
without any extra code..

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:53 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zHzgR-00NDGCC>; Sun, 13 Sep 1998 02:06:27 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3F9ECD066; Sun, 13 Sep 1998 03:14:35 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FB1C7B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 12 Sep 1998 20:05:40 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] MORE on FONTS
X-UIDL: 55a440c5d55c6e7ce28dd415166bdd8f

* List: gfabasic@aachen.linux.de

  // More notes on FONT

  // if FONT is used more than once in a program, you should replace any
parameters
  // that might have been set. FONT apparently  defaults to the last values
used in any previous
  //  FONT statement. For reliability it is best to specify the exact font 
name$ 
  //  ("courier", "modern","system", etc) to avoid an accidental default to
another font.
  // Note than the syntax FONT name$ is undocumented.

// use all these lines to fill up the FONT data structure

  FONT "courier"
  FONT FAMILY 48,CHARSET 0
  FONT HEIGHT 20, WIDTH 14,WEIGHT 100,ESCAPEMENT 0,PITCH 1,ORIENTATION 0
  FONT QUALITY 0 ,CLIPPRECISION 0,  OUTPRECISION 0
  FONT ITALIC 0,STRIKEOUT 0,UNDERLINE 0
  FONT  TO fnt0&

  ~SendMessage(DLGITEM(1,113),WM_SETFONT,fnt0&,0)


// BD 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:54 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zI0iu-00NGapC>; Sun, 13 Sep 1998 03:13:04 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 98FC8D066; Sun, 13 Sep 1998 04:21:11 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FB2C18.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980913011219.NUVW23468@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 13 Sep 1998 01:12:19 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 13 Sep 1998 01:12:19 +0000
Subject: re: [GFA] help please, font, listbox   1209xx1-
X-UIDL: 893f2ad5c88d8e81540ae79e759f97f1

* List: gfabasic@aachen.linux.de

12/09/98 07:41:01 PM   re: [GFA] help please, font, listbox   1209xx1-

BDD  BrentDeck@compuserve.com

Brent

Works perfectly!  Thank you!!

Bev Brown had just straightened me out on the ~SENDMESSAGE(... part, 
so your contribution allowed refinement & gives me room to play.  
Thanks tremendously to both of you - NOW I'm getting where I wanted to 
go.

To add my contribution... it appears that a breakover point is in the 
HEIGHT decision.  At "15", WEIGHT 100 is fine.  At "14", WEIGHT 100 is 
too fine, too light, but WEIGHT 400 is again "just fine".

'FONT FAMILY 48   // but this is the only one that scales fairly well 
to different sizes
'FONT HEIGHT 24,WEIGHT 100,ESCAPEMENT 0,PITCH 1,WIDTH 14 TO fnt&
FONT FAMILY 48
FONT HEIGHT 15,WEIGHT 100,ESCAPEMENT 0,PITCH 1,WIDTH 0 TO fnt&
~SendMessage(DLGITEM(1,102),WM_SETFONT,fnt&,0)

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 13 14:04:55 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zI1kM-00NGgsC>; Sun, 13 Sep 1998 04:18:38 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 931E7D065; Sun, 13 Sep 1998 05:26:47 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FB3B77.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980913021832.OULC23468@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 13 Sep 1998 02:18:32 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 13 Sep 1998 02:18:32 +0000
Subject: Re: [GFA] MORE on FONTS
X-UIDL: 76d64df435cf64b3fb39248b36359fc4

* List: gfabasic@aachen.linux.de

Yes sir!  I've noticed that if I take time to set up "structs" like this
for bitmaps & other things, the flow & results are fantastically better!

Things "will often work" in the shortest form, but reliability is very
much in question.  Thank you for pointing this out - I'm certain other
new users of GFA-W will benefit.  It's a task, developing the habit of
"proper construction", but well worth it.

To all of my "mentors", Thank You!!!!
<G>
TomR.


At 08:05 PM 12/09/98 -0400, you wrote:
>* List: gfabasic@aachen.linux.de
>
>  // More notes on FONT
>
>  // if FONT is used more than once in a program, you should replace any
>parameters
>  // that might have been set. FONT apparently  defaults to the last values
>used in any previous
>  //  FONT statement. For reliability it is best to specify the exact font 
>name$ 
>  //  ("courier", "modern","system", etc) to avoid an accidental default to
>another font.
>  // Note than the syntax FONT name$ is undocumented.
>
>// use all these lines to fill up the FONT data structure
>
>  FONT "courier"
>  FONT FAMILY 48,CHARSET 0
>  FONT HEIGHT 20, WIDTH 14,WEIGHT 100,ESCAPEMENT 0,PITCH 1,ORIENTATION 0
>  FONT QUALITY 0 ,CLIPPRECISION 0,  OUTPRECISION 0
>  FONT ITALIC 0,STRIKEOUT 0,UNDERLINE 0
>  FONT  TO fnt0&
>
>  ~SendMessage(DLGITEM(1,113),WM_SETFONT,fnt0&,0)
>
>
>// BD 
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:30 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zIy5Q-00NGrfC>; Tue, 15 Sep 1998 18:36:16 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 632F6D066; Tue, 15 Sep 1998 19:41:43 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FEA6D7.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 14 Sep 1998 10:41:50 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <35F9EA26.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] help please, font, listbox
X-UIDL: 0a57a5614f2a03197c65fb343dd205b3

* List: gfabasic@aachen.linux.de

Tom Record wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> I am wearing my manuals & keyboard out trying to set the font
> in a dialog's listbox to SYSTEM_FIXED_FONT or OEM_FIXED_FONT.
> 
> Everything I do is useless... it remains a proportional font
> & makes pre-arranged columns look very bad.
> 


Hi Tom,

I know you have a solution here, but I've done what you are attempting
to do in two different ways:

(1) Set a fixed font in a listbox and have each field a constant width
(2) Use a TABbed listbox for setting columns.

I've done both of these using functions in my DEANSLIB library.
(Remember that?)

Here is the first approach:

  'this creates the listbox
  lbstyle%=WS_VSCROLL | LBS_NOTIFY | LBS_HASSTRINGS | WS_DLGFRAME
  lbh&=@listbox(dlghdl&,120,5,135,629,280,lbstyle%)		'my function for
making a listbox
  'this assigns a fixed width font to the listbox
  fnth&(20)=@zfont(lbh&,"system",8,8,"")			'my function for setting a
font
  'this puts the array into the listbox
  lbload(lbh&,array$())						'my function for loading a listbox

For the second approach, I left the font as normal but set up a TABbed
listbox which produced visual columns. This is done by putting a TAB
character (ASCII 9) at the end of each field. In lbstyle% above I added
| LBS_USETABSTOPS. And then instead of the zfont function I used
lbsettabstops(lbh&,"28,220,243,280") in order to set the tab positions
for each field. I ended up using the latter and I tried all kinds of
fonts before I settled on using the default.

---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:32 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zIy7T-00NGrmC>; Tue, 15 Sep 1998 18:38:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D9C06D074; Tue, 15 Sep 1998 19:46:32 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FEA7F9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 15 Sep 1998 07:38:32 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] WM_PAINT BUG
X-UIDL: 75f61f94179dfc0420a0f55eb322492a

* List: gfabasic@aachen.linux.de

WM_PAINT bug       B.Deck     9/14/98


Here's a nasty bug I found this evening.   

If you open more than one window in GFAW,  The last window opened will fail
to process the WM_PAINT message for complex shapes correctly. 

The result is that if an overlapping GFA window is repositioned in such a
way as to create a complex clipping region for repaint, GFAW will not
generate a MENU(1) event from the WM_PAINT message. So if you rely on
MENU(1)=21 to trigger your window redraws, one window will not be serviced
properly. Your window will get ugly fast.

If an overlapping window belonging to a foreign application is repositioned
over the suspect GFA window, the proper MENU(1)=21 event will be generated.


I can think of  2 possible solutions:

1) Use a  callback function to process the WM_PAINT message directly.

2) Generate an extra invisible window after creating all the windows you
need. 
Since only the last window opened (regardless of its number) is buggy,
all your other windows will generate the proper MENU(1) events. 

Example

 FOR ww = 1 TO 4  //  how many windows would you like??
    wstart(ww)    // call a function to open a window for output 
 NEXT ww

 OPENW # 31,-10,-10,0,0,0   // open a scratch window off screen as
bugcatcher


Has anyone else encountered this??


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:34 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zIyGV-00NGjmC>; Tue, 15 Sep 1998 18:47:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id DD655D063; Tue, 15 Sep 1998 19:55:37 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FEAA1A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 14 Sep 1998 08:23:02 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"

X-Sender: 02204410-0001@t-online.de
Subject: [GFA] MS-Write-Format
X-UIDL: f885463481a0aa5d8e7e25cceae1ccd4

* List: gfabasic@aachen.linux.de

Hi!

Does anyone know a DLL (or something else) for getting only the text from a MS-Write(3.0/1)-File so that it can be shown in a multi-line listox?

Many thanks in advance
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:35 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zIyHx-00NGr7C>; Tue, 15 Sep 1998 18:49:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4B1AFD07C; Tue, 15 Sep 1998 19:57:23 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FEAA83.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 15 Sep 1998 12:18:46 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] MW_PAINT BUG
X-UIDL: d4e51a4ed1d55cdff6f8585c26d4c24b

* List: gfabasic@aachen.linux.de

WM_PAINT bug       B.Deck     9/14/98


Here's a nasty bug I found this evening.   

If you open more than one window in GFAW,  The last window opened will
fail to process the WM_PAINT message for complex shapes correctly. 

The result is that if an overlapping GFA window is repositioned in such
a way as to create a complex clipping region for repaint, GFAW will not
generate a MENU(1) event from the WM_PAINT message. So if you rely on 
MENU(1)=21 to trigger your window redraws, one window will not be 
serviced properly. Your window will get ugly fast.

If an overlapping window belonging to a foreign application
is repositioned over the suspect GFA window, the proper MENU(1)=21 
event will be generated.


I can think of  2 possible solutions:

1) Use a  callback function to process the WM_PAINT message directly.

2) Generate an extra invisible window after creating all the windows you 
need. Since only the last window opened (regardless of its number) is 
buggy, all your other windows will generate the proper MENU(1) events. 

Example

 FOR ww = 1 TO 4  //  how many windows would you like??
    wstart(ww)    // call a function to open a window for output 
 NEXT ww

 OPENW # 31,-10,-10,0,0,0   // open a scratch window off screen as bugcatcher



I have tried number 2 and it works. I presume option 1 also works.
Has anyone else encountered this??

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:39 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zIzID-00NGhtC>; Tue, 15 Sep 1998 19:53:33 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 13604D06B; Tue, 15 Sep 1998 21:01:42 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FEB996.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980915175249.KRTL18454@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 15 Sep 1998 17:52:49 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 15 Sep 1998 17:52:49 +0000
Subject: Re: [GFA] MS-Write-Format
X-UIDL: ffa779f378301dd0b6f9e64da50c45bf

* List: gfabasic@aachen.linux.de

Open it & load it 1 char at a time, checking for ascii value.  About 140
char into it, start loading into into an array or string the length of your
listbox width or until you hit a ".".
<G>
TomR.


At 08:23 AM 14/09/98 +-200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi!
>
>Does anyone know a DLL (or something else) for getting only the text from a
MS-Write(3.0/1)-File so that it can be shown in a multi-line listox?
>
>Many thanks in advance
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:43 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJ10j-00NGiPC>; Tue, 15 Sep 1998 21:43:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id AD008D066; Tue, 15 Sep 1998 22:51:35 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FED35B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 15 Sep 1998 07:56:19 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] Dialog questions...
X-UIDL: 0e21bf92f5d904c4aa890d7488a969d2

* List: gfabasic@aachen.linux.de


Question #1 - where I get an Windows-API document from the internet ?
#2: Does "SHOWW #DLG(n),SW_SHOW" and SW_HIDE replace SHOWDIALOG #n
completely, when the defined dialog structure will be removed from
memory ?
#3: I can't use the uppercase flag when using a editable COMBOBOX with
CBS_DROPDOWN (see example)
#4: I'd like to use a MS_MULTILINE edit field which shows the scrollbar
only when there is more text than displayed within the box, is that
possible (see example) ?
#5: The same field should be used to be disabled for editing (no
problem: DISABLEW(...)), but then the scrollbar is NOT greyed AND NOT
usable for scrolling - HELP

Example (The full program for tracking problems is available at
http://193.80.105.57/file/gfa/tools/cases.zip)

opt_small& = 1

DIALOG #10,opt_posx&,opt_posy&,580,454,"Schoeller's Mystery
Database",WS_SYSMENU | DS_MODALFRAME,16,"Helv"
  CONTROL "K u n d e :",900,"static",SS_LEFT,20,10,80,22
  Embossed(800,18,26,532,2,4) // CONTROL
"",800,"static",$10000007,18,25,532,2
  ' :
  ' :
  CONTROL "A k t i o n e n :",920,"static",SS_LEFT,20,201,80,22
  CONTROL "1 von 1",120,"static",SS_RIGHT,420,201,125,16
  Embossed(800,18,217,532,2,4) // CONTROL
"",800,"static",$10000007,18,210,532,2
  CONTROL "&Techniker:",921,"static",SS_LEFT,20,229,65,22
  CONTROL "", 108, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD |
ES_UPPERCASE | ES_MULTILINE, 86, 227, 50, 24
  CONTROL "&Datum:",922,"static",SS_LEFT,210,229,50,22
  CONTROL "", 109, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD |
ES_MULTILINE, 262, 227, 70, 24
  CONTROL "&Kontakt:",923,"static",SS_LEFT,360,229,50,22
  COMBOBOX "",110,415,227,132,200, CBS_DROPDOWN | WS_TABSTOP | ES_LEFT |
CBS_HASSTRINGS | CBS_SORT
  CONTROL "&Volltext:",924,"static",SS_LEFT,20,259,65,22
  IF opt_small&
    dummy% = WS_VSCROLL
  ELSE
    dummy% = ES_AUTOVSCROLL
  ENDIF
  CONTROL "", 111, "edit", 4096 | ES_LEFT | WS_BORDER | WS_TABSTOP |
WS_CHILD | ES_MULTILINE | dummy%, 86, 257, 461, 113

  Embossed(800,18,378,532,2,4) // CONTROL
"",800,"static",$10000007,18,372,532,2

  buttonx("&Lock"  ,17, 20,390,66,28)

  CONTROL "",840,"static",$10000006,0,0,0,0

ENDDIALOG

'DelSysMenue 10
DLG FILL 10,RGB(192,192,192)

FOR i& = 0 TO 10 // maxkonkt&
  ~SendMessage(DLGITEM(10,110),CB_ADDSTRING,0,"UPCASE " + STR$(i&))
NEXT i&

crlf$ = CHR$(13) + CHR$(10)
_WIN$(DLG(10,111)) = "Only a Test" + crlf$ + crlf$ + crlf$ + "just to
see" + crlf$ + crlf$ + crlf$ + "what happens..."

~SendMessage(DLGITEM(10,111),EM_LIMITTEXT,1000,0)  // 1000 Zeichen sind
genug...

quit& = 0

SHOWDIALOG #10


// // // // //   Main - Events   // // // // //

DO
  GETEVENT

  SELECT _Mess

  CASE WM_SYSCOMMAND                          // ------------------ //
    SELECT _wParam
    CASE SC_CLOSE                             // Schlieen
      quit& = 1
    ENDSELECT

  CASE WM_SYSKEYDOWN                          // ------------------ //
    SELECT _wParam
    CASE 115                                  // Alt-F4
      quit& = 1
    ENDSELECT


  CASE WM_COMMAND                             // ------------------ //
    SELECT _wParam

    CASE 17                                   // "Edit" / "Save"
      lockdialog

    ENDSELECT

  ENDSELECT
LOOP UNTIL quit&

CLOSEDIALOG #10

PROCEDURE buttonx(text$,nr&,x&,y&,w&,h&)
  ' IF opt_3d&
  'PUSHBUTTON "S" + text$,nr&,x&,y&,w&,h&,BS_OWNERDRAW
  'ELSE
  CONTROL text$,nr&,"button",$10010000,x&,y&,w&,h&
  'ENDIF
RETURN
PROCEDURE Embossed(id&,x&,y&,w&,h&,mode&)
  IF opt_3d&
    CONTROL "",id&,"static",mode&,x&,y&,w&,h&
  ELSE
    CONTROL "",id& + 2,"static",mode&,x&,y&,w&,h&
    CONTROL "",id& + 1,"static",10 - mode&,x& + 1,y& + 1,w& - 1 ,h& - 1
    CONTROL "",id&,"static",0,x& + 1,y& + 1,w& - 2,h& - 2
  ENDIF
RETURN

PROCEDURE lockdialog
  FOR i& = 108 TO 111
    DISABLEW DLG(10,i&)
  NEXT i&
  ~SetFocus(DLGITEM(10,17))
>RETURN

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:51 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJ5It-00NGqaC>; Wed, 16 Sep 1998 02:18:39 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 893FED066; Wed, 16 Sep 1998 03:26:48 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FF13D8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 15 Sep 1998 17:14:56 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Coming
X-UIDL: 3becd410e67016108c5726a722fb719a

* List: gfabasic@aachen.linux.de

Coming tomorrow on the GFAWHELP web page is a great demo by Patrik Bullman.
This has some unusual code in it so don't miss it!!
GRIDDEMO.ZIP

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:53 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJ7Dz-00NGqrC>; Wed, 16 Sep 1998 04:21:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 46EC9D066; Wed, 16 Sep 1998 05:29:46 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FF30AA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 15 Sep 1998 19:18:19 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] griddemo
X-UIDL: 510e32b3fcd65857fdb191f0a1d8475d

* List: gfabasic@aachen.linux.de

To All,
GRIDDEMO is now available for download from the files page on the GFAWHELP
web site.  This is very interesting one so don't miss it. Code by Patrik
Bullman.
dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:54 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJ8UX-00NGqrC>; Wed, 16 Sep 1998 05:42:53 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1BD4BD06B; Wed, 16 Sep 1998 06:51:05 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FF43B9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980916034246.GKIB27948@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 16 Sep 1998 03:42:46 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 16 Sep 1998 03:42:46 +0000
Subject: [GFA] Help, please - volume label   1509xx1-
X-UIDL: 583d92b2af1b0924a501e6c329468c6a

* List: gfabasic@aachen.linux.de

15/09/98 10:33:38 PM   Help, please - volume label   1509xx1-

A drive has a disk in it.  Ok?  Ok.

That disk, whether a hard drive, floppy or CD, has a volume label.  If 
the user hasn't assigned a label, DOS does so.

I have a ton of examples, but don't remember which one actually 
displays the disk volume label.  I can detect the presence via the 
attribs, but...

Would some gentle soul please send me the code for obtaining a disk 
volume label?  The manuals don't touch on this.  Gratitude would be 
boundless!

Thanks
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:55 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJ9sw-00NGrsC>; Wed, 16 Sep 1998 07:12:10 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 60562D066; Wed, 16 Sep 1998 08:20:21 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FF58A5.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 07:13:10 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] help please, font, listbox
X-UIDL: 863e36c54704bbf4c2cd471723e7bb3d

* List: gfabasic@aachen.linux.de

Maybe, I'm on the wrong way, I just did the following code..

  dim tab&(5)
  tab&(0) = 50
  tab&(1) = 150
  tab&(2) = 250
    '
    '
  GETFONT SYSTEM_FIXED_FONT
  FONT TO Small&
  opt_width&=300
  opt_report&=200

  IF reportdialogshownbefore& = 0
    DIALOG #30,20,10,opt_width&,opt_report&,help$,WS_SYSMENU |
DS_MODALFRAME //,12 ,"Times New Roman"

      CONTROL "",900,"static",$10000006,0,28,opt_width& - 11,2

      CONTROL "",200,"listbox",LBS_HASSTRINGS | WS_VISIBLE | WS_CHILD |
WS_TABSTOP | LBS_STANDARD |
LBS_USETABSTOPS,2,32,opt_width&-14,opt_report&-49
    ENDDIALOG

    ~SendMessage(DLGITEM(30,200),WM_SETFONT,Small&,0)

    'DelSysMenue 30
    'hold& = SetSysModalWindow(DLG(30))
  ENDIF


  // Elemente anpassen
  '
  ~SendMessage(DLG(30,200),LB_SETTABSTOPS,6,V:tab&(0))

  ~SendMessage(DLGITEM(30,200),LB_ADDSTRING,0,"fill
it..."+chr$(9)+"....")
  ~SendMessage(DLGITEM(30,200),LB_SETCURSEL,MIN(gefunden&,maxreport&),0)
// Cursor auf letzte Zeile

  IF reportdialogshownbefore& = 0
    reportdialogshownbefore& = 1
  ENDIF

  ~SetFocus(DLG(30,200))
  SHOWW #DLG(30),SW_SHOW   // statt SHOWDIALOG #30


.. but maybe I didn't understood your problem !?

By the way, I am still NOT able to fill certain elements in a Listbox
with colors.

 - Michael






>----------
>Von: 	Dean Hodgson[SMTP:dhodgson@nexus.edu.au]
>Gesendet: 	Montag, 14. September 1998 03:11
>An: 	gfabasic@aachen.linux.de
>Betreff: 	Re: [GFA] help please, font, listbox
>
>* List: gfabasic@aachen.linux.de
>
>Tom Record wrote:
>> 
>> * List: gfabasic@aachen.linux.de
>> 
>> I am wearing my manuals & keyboard out trying to set the font
>> in a dialog's listbox to SYSTEM_FIXED_FONT or OEM_FIXED_FONT.
>> 
>> Everything I do is useless... it remains a proportional font
>> & makes pre-arranged columns look very bad.
>> 
>
>
>Hi Tom,
>
>I know you have a solution here, but I've done what you are attempting
>to do in two different ways:
>
>(1) Set a fixed font in a listbox and have each field a constant width
>(2) Use a TABbed listbox for setting columns.
>
>I've done both of these using functions in my DEANSLIB library.
>(Remember that?)
>
>Here is the first approach:
>
>  'this creates the listbox
>  lbstyle%=WS_VSCROLL | LBS_NOTIFY | LBS_HASSTRINGS | WS_DLGFRAME
>  lbh&=@listbox(dlghdl&,120,5,135,629,280,lbstyle%)		'my function for
>making a listbox
>  'this assigns a fixed width font to the listbox
>  fnth&(20)=@zfont(lbh&,"system",8,8,"")			'my function for setting a
>font
>  'this puts the array into the listbox
>  lbload(lbh&,array$())						'my function for loading a listbox
>
>For the second approach, I left the font as normal but set up a TABbed
>listbox which produced visual columns. This is done by putting a TAB
>character (ASCII 9) at the end of each field. In lbstyle% above I added
>| LBS_USETABSTOPS. And then instead of the zfont function I used
>lbsettabstops(lbh&,"28,220,243,280") in order to set the tab positions
>for each field. I ended up using the latter and I tried all kinds of
>fonts before I settled on using the default.
>
>---------------------------------------------------------------------------
>Dean Hodgson
>The Book Mark Project -- School Library Automation Software
>Department of Education, Training and Employment  Adelaide, South
>Australia
>email to:  dhodgson@nexus.edu.au
>website:   http://www.nexus.edu.au/bookmark/
>phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
>---------------------------------------------------------------------------
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Sep 16 11:41:57 1998
Return-Path: <abarbosa@jnoticias.pt>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJDeu-00NGhgC>; Wed, 16 Sep 1998 11:13:56 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4A181D066; Wed, 16 Sep 1998 12:21:57 +0200 (CEST)
From: "ANTONIO BARBOSA" <abarbosa@jnoticias.pt>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FF9145.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 10:08:24
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] Help, please - volume label   1509xx1-
X-UIDL: 28505296c7a856fd8bb16507ff5ab7b9

* List: gfabasic@aachen.linux.de

Hi TomR.
you wrote:
> 15/09/98 10:33:38 PM   Help, please - volume label   1509xx1-
> Would some gentle soul please send me the code for obtaining a disk 
> volume label?  The manuals don't touch on this.  Gratitude would be 
> boundless!

Why don't you read the f.. help (FGETDTA)


TYPE dta:
- CHAR*21  fs_donttouch$
- BYTE     fs_attr
- CARD     fs_time
- CARD     fs_date
- LONG     fs_size
- CHAR*14  fs_name$
ENDTYPE
dta% GETDTA()
e% SFIRST("*.*",8)       /* Volume
PRINT {dta%}.fs_name$       /* Volume name
PRINT  STR$({dta%}.fs_date) /* Date
PRINT  STR$({dta%}.fs_time)  /* Time


-------------------------------------------------------------------
Antonio Barbosa                   - Emp. do Jornal de Noticias S.A.
Rua de Goncalo Cristovao, 195               telef.:   351-2-2096199
4000 Porto - Portugal                       fax.:     351-2-2096108
                                       email: abarbosa@jnoticias.pt
-------------------------------------------------------------------


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:17:47 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJFE3-00NGhPC>; Wed, 16 Sep 1998 12:54:19 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id AE800D066; Wed, 16 Sep 1998 14:02:29 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FFA8D5.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980916105413.KBZM3375@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 16 Sep 1998 10:54:13 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 16 Sep 1998 10:54:13 +0000
Subject: re: [GFA] Help, please - volume label   1509xx1-
X-UIDL: 2a70f7400d84764169fb592cde78e342

* List: gfabasic@aachen.linux.de

16/09/98 05:41:54 AM   [GFA] Help, please - volume label   1509xx1-

From: "ANTONIO BARBOSA" <abarbosa@jnoticias.pt>
To: gfabasic@aachen.linux.de
Date: Wed, 16 Sep 1998 10:08:24
Subject: [GFA] Help, please - volume label   1509xx1-

Why don't you read the f.. help (FGETDTA)


TYPE dta:
- CHAR*21  fs_donttouch$
- BYTE     fs_attr
- CARD     fs_time
- CARD     fs_date
- LONG     fs_size
- CHAR*14  fs_name$
ENDTYPE
dta% GETDTA()
e% SFIRST("*.*",8)       /* Volume
PRINT {dta%}.fs_name$       /* Volume name
PRINT  STR$({dta%}.fs_date) /* Date
PRINT  STR$({dta%}.fs_time)  /* Time
*********************************************

Antonio
Thank you very much for providing details NOT in my helpfile
(v4.38), conserning acquisition of the disk volume lable.

A more realistic code follows in a testbed window:

''''  testbed.lst
TITLEW #1, "TomR.'s Testbed Window"
OPENW #1, 0,0,300,200,48
PRINT "                <any key> closes me."
PRINT
'
'
TYPE dta:
- CHAR*21  fs_donttouch$
- BYTE     fs_attr
- CARD     fs_time
- CARD     fs_date
- LONG     fs_size
- CHAR*14  fs_name$
ENDTYPE
dta% = FGETDTA()
e% = FSFIRST("*.*",11)       /* Volume
PRINT {dta%}.fs_name$       /* Volume name
' depart from AB's code
mar% = INSTR({dta%}.fs_name$,".")
PRINT mar%
par1$ = LEFT$({dta%}.fs_name$,mar% - 1)
par2$ = RIGHT$({dta%}.fs_name$,LEN({dta%}.fs_name$) - mar%)
par$ = par1$ + par2$
PRINT par$
' return to AB's code
PRINT  STR$({dta%}.fs_date) /* Date
PRINT  STR$({dta%}.fs_time)  /* Time
'
'
KEYGET k%
CLOSEW #1
END

None the less, your response is greatly appreciated because it
allows me to resolve a bad problem.  Thank you.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:17:49 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJGH8-00NDHOC>; Wed, 16 Sep 1998 14:01:34 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 91EE7D066; Wed, 16 Sep 1998 15:09:42 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FFB899.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980916120121.LFCL3375@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 16 Sep 1998 12:01:21 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 16 Sep 1998 12:01:21 +0000
Subject: re: [GFA] Help, please - volume label   1609xx1-
X-UIDL: 46c208546101870c37e62926437a8e83

* List: gfabasic@aachen.linux.de

16/09/98 06:56:18 AM   [GFA] Help, please - volume label   1609xx1-

An error on my part...

Must first CHDRIVE to the desired drive, then:
e% = FSFIRST("*.*",8)       /* Volume

It is necessary to have "8" in that statement or you get a file.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:17:50 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJHPE-00NGiyC>; Wed, 16 Sep 1998 15:14:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0DD86D066; Wed, 16 Sep 1998 16:21:32 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FFC970.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 10:00:49 +-200
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="---- =_NextPart_000_01BDE180.F579B6E0"
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] MS-Write-Format
X-UIDL: 854ae10dd510dac129290269566048a5

Hi Tom!

Thank you for your Idea!

The problem is, that there are many entries like fontsettings or informations about grafix. These informations will be displayed as normal ASCII-Text and can not be filtered from the text by using the "ASCII-method".

Do you've got any other ideas?

Many thanks in advance
Yours

Thomas

Attachment Converted: "c:\programme\eudora\attach\AW [GFA] MS-Write-Format"
From ???@??? Sun Sep 20 06:17:55 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJKnM-00NGq1C>; Wed, 16 Sep 1998 18:51:08 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 43DD6D063; Wed, 16 Sep 1998 19:59:08 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <35FFFC6C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id SAA28007 for <gfabasic@linux.net.eu.org>; 
          Wed, 16 Sep 1998 18:50:46 +0200 (MET DST)
Date: Wed, 16 Sep 1998 18:51:03 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: SV: [GFA] Help, please - volume label   1509xx1-
X-UIDL: 6957ce993d0d83d25a94dbb227e02283

* List: gfabasic@aachen.linux.de


Here is one more way of label reading.

' DISK NAME (Label)

GetLabel
END

PROCEDURE GetLabel
  IF FSFIRST("A:\*.*",8)=0
    Headline$="Read disk name"
    Message$=CHAR{FGETDTA()+30}
    Message$="The name of the disk in drive A is: "+Message$
  ELSE
    Message$="Disk name is missing!"
  ENDIF
  MESSAGE Message$,Headline$,MB_OK,Answer&
RETURN

Regards,
Sven

> A drive has a disk in it.  Ok?  Ok.
> 
> That disk, whether a hard drive, floppy or CD, has a volume label.  If 
> the user hasn't assigned a label, DOS does so.
> 
> I have a ton of examples, but don't remember which one actually 
> displays the disk volume label.  I can detect the presence via the 
> attribs, but...
> 
> Would some gentle soul please send me the code for obtaining a disk 
> volume label?  The manuals don't touch on this.  Gratitude would be 
> boundless!
> 
> Thanks
> <G>
> TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:17:56 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJMQh-00NEj8C>; Wed, 16 Sep 1998 20:35:51 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BAA1CD066; Wed, 16 Sep 1998 21:43:55 +0200 (CEST)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360014FB.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 11:35:16 -0700 (PDT)
Cc: gfabasic@aachen.linux.de
In-Reply-To: <35FFFC6C.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] Calling Web Browser
X-UIDL: 4050bda506848d50ca572d6cae07012b

* List: gfabasic@aachen.linux.de

I'm trying to call my web browser from within my GFA program, but am
having some problems.

Basically, I'm using the following:

a=EXEC(browser$,"C:\BASIC\TEST.HTM")

The "browser$" is, of course, the full path name to my web browser. This
works great in this form. However, I can't seem to find a way to jump to
a specific reference location within the document? For example:

a=EXEC(browser$,"C:\BASIC\TEST.HTM#section1")

The web browser (IE 3.x) in my case, returns an error when attempting
this (Even though "section1" does exist in the document and is properly
referenced).

Does anyone have any idea how to accomplish what I'm after? The only
alternative I see is to break down the HTML file into multiple files that
I can call separately, but I was really hoping to keep everything in a
single HTML file.

Thanks,

Anthony Watson
Mountain Software
anthony@mountain-software.com
www.mountain-software.com


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:17:58 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJMR0-00NGhWC>; Wed, 16 Sep 1998 20:36:10 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BAF58D06B; Wed, 16 Sep 1998 21:44:07 +0200 (CEST)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36001507.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 16 Sep 1998 11:35:16 -0700 (PDT)
Cc: gfabasic@aachen.linux.de
In-Reply-To: <35FFFC6C.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] Calling Web Browser
X-UIDL: 552d435ad897fe1d768ea9c289e3f633

* List: gfabasic@aachen.linux.de

I'm trying to call my web browser from within my GFA program, but am
having some problems.

Basically, I'm using the following:

a=EXEC(browser$,"C:\BASIC\TEST.HTM")

The "browser$" is, of course, the full path name to my web browser. This
works great in this form. However, I can't seem to find a way to jump to
a specific reference location within the document? For example:

a=EXEC(browser$,"C:\BASIC\TEST.HTM#section1")

The web browser (IE 3.x) in my case, returns an error when attempting
this (Even though "section1" does exist in the document and is properly
referenced).

Does anyone have any idea how to accomplish what I'm after? The only
alternative I see is to break down the HTML file into multiple files that
I can call separately, but I was really hoping to keep everything in a
single HTML file.

Thanks,

Anthony Watson
Mountain Software
anthony@mountain-software.com
www.mountain-software.com


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:17:59 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJMTm-00NGhSC>; Wed, 16 Sep 1998 20:39:02 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0EB2BD075; Wed, 16 Sep 1998 21:47:01 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360015B5.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 11:09:38 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Help, please - volume label   1509xx1-
X-UIDL: f56bf9e4c1929af70825557c6d9f25f4

* List: gfabasic@aachen.linux.de

OK Sven or Anyone,
This works fine but what if the disk label is missing and I want to juts
write a new label to the disk.
http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: SVEN KUMLIN <sven.kumlin@swipnet.se>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Wednesday, September 16, 1998 9:52 AM
Subject: SV: [GFA] Help, please - volume label 1509xx1-


>* List: gfabasic@aachen.linux.de
>
>
>Here is one more way of label reading.
>
>' DISK NAME (Label)
>
>GetLabel
>END
>
>PROCEDURE GetLabel
>  IF FSFIRST("A:\*.*",8)=0
>    Headline$="Read disk name"
>    Message$=CHAR{FGETDTA()+30}
>    Message$="The name of the disk in drive A is: "+Message$
>  ELSE
>    Message$="Disk name is missing!"
>  ENDIF
>  MESSAGE Message$,Headline$,MB_OK,Answer&
>RETURN
>
>Regards,
>Sven
>
>> A drive has a disk in it.  Ok?  Ok.
>>
>> That disk, whether a hard drive, floppy or CD, has a volume label.  If
>> the user hasn't assigned a label, DOS does so.
>>
>> I have a ton of examples, but don't remember which one actually
>> displays the disk volume label.  I can detect the presence via the
>> attribs, but...
>>
>> Would some gentle soul please send me the code for obtaining a disk
>> volume label?  The manuals don't touch on this.  Gratitude would be
>> boundless!
>>
>> Thanks
>> <G>
>> TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:01 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJMc3-00NGqVC>; Wed, 16 Sep 1998 20:47:35 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A5D7BD073; Wed, 16 Sep 1998 21:55:43 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360017BF.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980916184725.UZUH3375@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 16 Sep 1998 18:47:25 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 16 Sep 1998 18:47:25 +0000
Subject: Re: SV: [GFA] Help, please - volume label   1509xx1-
X-UIDL: cc2922d3e9d2f9b6a7896442b4af0d76

* List: gfabasic@aachen.linux.de

Sven, Thank you.  Dale, get that one?  Neater than what I first got or wound
up with after playing w/ it.
<G>
TomR.


At 06:51 PM 16/09/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>
>Here is one more way of label reading.
>
>' DISK NAME (Label)
>
>GetLabel
>END
>
>PROCEDURE GetLabel
>  IF FSFIRST("A:\*.*",8)=0
>    Headline$="Read disk name"
>    Message$=CHAR{FGETDTA()+30}
>    Message$="The name of the disk in drive A is: "+Message$
>  ELSE
>    Message$="Disk name is missing!"
>  ENDIF
>  MESSAGE Message$,Headline$,MB_OK,Answer&
>RETURN
>
>Regards,
>Sven
>
>> A drive has a disk in it.  Ok?  Ok.
>> 
>> That disk, whether a hard drive, floppy or CD, has a volume label.  If 
>> the user hasn't assigned a label, DOS does so.
>> 
>> I have a ton of examples, but don't remember which one actually 
>> displays the disk volume label.  I can detect the presence via the 
>> attribs, but...
>> 
>> Would some gentle soul please send me the code for obtaining a disk 
>> volume label?  The manuals don't touch on this.  Gratitude would be 
>> boundless!
>> 
>> Thanks
>> <G>
>> TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:02 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJMz9-00NGhsC>; Wed, 16 Sep 1998 21:11:27 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C2B04D074; Wed, 16 Sep 1998 22:19:29 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36001D55.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 12:07:54 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Calling Web Browser
X-UIDL: 8eaf098ce13def62a1e1e7e1c6a73a46

* List: gfabasic@aachen.linux.de

Anthony,
Go to the GFAWHELP web site and download WEBIT.ZIP from the file download
page.  This demo uses SHELL.DLL and seems to work great.  It was sent to me
by by Sven Thomas of GFA.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Anthony Watson <awatson@pacifier.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Cc: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Wednesday, September 16, 1998 11:36 AM
Subject: [GFA] Calling Web Browser


>* List: gfabasic@aachen.linux.de
>
>I'm trying to call my web browser from within my GFA program, but am
>having some problems.
>
>Basically, I'm using the following:
>
>a=EXEC(browser$,"C:\BASIC\TEST.HTM")
>
>The "browser$" is, of course, the full path name to my web browser. This
>works great in this form. However, I can't seem to find a way to jump to
>a specific reference location within the document? For example:
>
>a=EXEC(browser$,"C:\BASIC\TEST.HTM#section1")
>
>The web browser (IE 3.x) in my case, returns an error when attempting
>this (Even though "section1" does exist in the document and is properly
>referenced).
>
>Does anyone have any idea how to accomplish what I'm after? The only
>alternative I see is to break down the HTML file into multiple files that
>I can call separately, but I was really hoping to keep everything in a
>single HTML file.
>
>Thanks,
>
>Anthony Watson
>Mountain Software
>anthony@mountain-software.com
>www.mountain-software.com
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:05 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJOCF-00NGgtC>; Wed, 16 Sep 1998 22:29:03 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C5C3CD07B; Wed, 16 Sep 1998 23:37:07 +0200 (CEST)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36002F88.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 13:28:39 -0700 (PDT)
In-Reply-To: <36001D55.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] Calling Web Browser
X-UIDL: f2bbc68391eb7efcda8feafe1ccef394

* List: gfabasic@aachen.linux.de

Dale,

> Go to the GFAWHELP web site and download WEBIT.ZIP from the file download
> page.  This demo uses SHELL.DLL and seems to work great.  It was sent to me
> by by Sven Thomas of GFA.

I think I've already had a look, but I'll try again.

If I remember correctly, it requires the use of an external DLL which is
not acceptable for my use. I need to be able to do it from within my own
application.

Thanks,

Anthony


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:15 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJQ9L-00NGinC>; Thu, 17 Sep 1998 00:34:11 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6081CD07C; Thu, 17 Sep 1998 01:42:20 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36004CDC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 18:33:25 -0400
Sender: BDD <BrentDeck@compuserve.com>
Cc: GFA Basic Mailing List <gfabasic@linux.net.eu.org>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Copy of: Copy of: MW_PAINT BUG
X-UIDL: f1f5222cd6708b2d8e331e1086fd11f5

* List: gfabasic@aachen.linux.de

>> If you open more than one window in GFAW,  The last window opened will
fail to process the WM_PAINT message for complex shapes correctly.  <<.


I found the problem (I think)

In the repaint  function I had used SETDC(_DC(w)) to activate the window.

Since this was a GFA window, GFA lost track of it.

Changing to WIN # n fixed the problem.

Oops.......

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:16 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJQHc-00NGqKC>; Thu, 17 Sep 1998 00:42:44 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 31669D07D; Thu, 17 Sep 1998 01:50:54 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36004EDE.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 15:39:05 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Calling Web Browser
X-UIDL: 478fca4a1ff2a884ce55fe196547a50b

* List: gfabasic@aachen.linux.de

It requires the SHELL.DLL which anyone using Windows should have.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Anthony Watson <awatson@pacifier.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Wednesday, September 16, 1998 1:30 PM
Subject: Re: [GFA] Calling Web Browser


>* List: gfabasic@aachen.linux.de
>
>Dale,
>
>> Go to the GFAWHELP web site and download WEBIT.ZIP from the file download
>> page.  This demo uses SHELL.DLL and seems to work great.  It was sent to
me
>> by by Sven Thomas of GFA.
>
>I think I've already had a look, but I'll try again.
>
>If I remember correctly, it requires the use of an external DLL which is
>not acceptable for my use. I need to be able to do it from within my own
>application.
>
>Thanks,
>
>Anthony
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:17 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJRQS-00NGaZC>; Thu, 17 Sep 1998 01:55:56 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0413DD07F; Thu, 17 Sep 1998 03:04:07 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36006007.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 09:28:04 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <360014FB.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Calling Web Browser
X-UIDL: 0031305658b1e3aa329f674cf0dea7bb

* List: gfabasic@aachen.linux.de

Anthony Watson wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> I'm trying to call my web browser from within my GFA program, but am
> having some problems.
> 
> Basically, I'm using the following:
> 
> a=EXEC(browser$,"C:\BASIC\TEST.HTM")
> 
> The "browser$" is, of course, the full path name to my web browser. This
> works great in this form. However, I can't seem to find a way to jump to
> a specific reference location within the document? For example:
> 
> a=EXEC(browser$,"C:\BASIC\TEST.HTM#section1")
> 
> The web browser (IE 3.x) in my case, returns an error when attempting
> this (Even though "section1" does exist in the document and is properly
> referenced).
> 
> Does anyone have any idea how to accomplish what I'm after? The only
> alternative I see is to break down the HTML file into multiple files that
> I can call separately, but I was really hoping to keep everything in a
> single HTML file.
> 
> Thanks,
> 
> Anthony Watson
> Mountain Software
> anthony@mountain-software.com
> www.mountain-software.com
> 

I tried calling my web browser from a GFA program some time ago and
successfully did it with this:

EXEC
"C:\NETSCAPE\PROGRAM\NETSCAPE.EXE","http://www.nexus.edu.au/bookmark/"
 and
EXEC "C:\NETSCAPE\PROGRAM\NETSCAPE.EXE","c:\bmweb\search\srchdemo.htm"

 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:19 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJRhN-00NGq8C>; Thu, 17 Sep 1998 02:13:25 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 35EB1D080; Thu, 17 Sep 1998 03:21:37 +0200 (CEST)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36006421.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 17:13:14 -0700 (PDT)
In-Reply-To: <36006007.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: Re: [GFA] Calling Web Browser
X-UIDL: fb12393b79d629e9ceef9be9f0fcc9b4

* List: gfabasic@aachen.linux.de

Dean,

> I tried calling my web browser from a GFA program some time ago and
> successfully did it with this:
> 
> EXEC
> "C:\NETSCAPE\PROGRAM\NETSCAPE.EXE","http://www.nexus.edu.au/bookmark/"
>  and
> EXEC "C:\NETSCAPE\PROGRAM\NETSCAPE.EXE","c:\bmweb\search\srchdemo.htm"

Thanks for the info, but calling the browser isn't really the problem.
I've been able to call the browser with the HTML file I want without any
problems.

The problem is that I can't reference an internal link in that HTML file
from the command line. You know, the <a name="test"> type of link that you
can refer to with a <a href="#test"> within the document itself.

What I'm trying to do is call the browser with the page I choose and have
it automatically positioned at that point in the page.

It "should" be as simple as this:

EXEC browser$,"c:\file.htm#test"

Unfortunately, my web browser chokes if I try to feed it that command
line. I can call it without the internal reference without problems:

EXEC browser$,"c:\file.htm"

But, that doesn't get me to where I want to be in the document. And, so
far, every example I've seen only shows how to call the page itself.

Anthony


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:20 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJShJ-00NGjPC>; Thu, 17 Sep 1998 03:17:25 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 61F6AD081; Thu, 17 Sep 1998 04:25:28 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3600731C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 10:49:39 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <36006421.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Calling Web Browser
X-UIDL: f64d234351ebfa326244b34bf2aba951

* List: gfabasic@aachen.linux.de

Anthony Watson wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> Dean,
> 
> Thanks for the info, but calling the browser isn't really the problem.
> I've been able to call the browser with the HTML file I want without any
> problems.
> 
> The problem is that I can't reference an internal link in that HTML file
> from the command line. You know, the <a name="test"> type of link that you
> can refer to with a <a href="#test"> within the document itself.
> 
> What I'm trying to do is call the browser with the page I choose and have
> it automatically positioned at that point in the page.
> 
> It "should" be as simple as this:
> 
> EXEC browser$,"c:\file.htm#test"
> 
> Unfortunately, my web browser chokes if I try to feed it that command
> line. I can call it without the internal reference without problems:
> 
> EXEC browser$,"c:\file.htm"
> 
> But, that doesn't get me to where I want to be in the document. And, so
> far, every example I've seen only shows how to call the page itself.
> 
> Anthony
> 

Ah, I see. Can you enter the entire line at a Dos prompt or in a Run
window and have it work?
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:22 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJStV-00NGixC>; Thu, 17 Sep 1998 03:30:01 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0900CD082; Thu, 17 Sep 1998 04:38:13 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36007615.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 18:26:39 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Calling Web Browser
X-UIDL: b7defd1e498a4f98a98cb871136ff499

* List: gfabasic@aachen.linux.de

Hi Dean,
You are correct. That solution works fine if one only wants to call their
own browser on their own hard disk.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Dean Hodgson <dhodgson@nexus.edu.au>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Wednesday, September 16, 1998 4:56 PM
Subject: Re: [GFA] Calling Web Browser


>* List: gfabasic@aachen.linux.de
>
>Anthony Watson wrote:
>>
>> * List: gfabasic@aachen.linux.de
>>
>> I'm trying to call my web browser from within my GFA program, but am
>> having some problems.
>>
>> Basically, I'm using the following:
>>
>> a=EXEC(browser$,"C:\BASIC\TEST.HTM")
>>
>> The "browser$" is, of course, the full path name to my web browser. This
>> works great in this form. However, I can't seem to find a way to jump to
>> a specific reference location within the document? For example:
>>
>> a=EXEC(browser$,"C:\BASIC\TEST.HTM#section1")
>>
>> The web browser (IE 3.x) in my case, returns an error when attempting
>> this (Even though "section1" does exist in the document and is properly
>> referenced).
>>
>> Does anyone have any idea how to accomplish what I'm after? The only
>> alternative I see is to break down the HTML file into multiple files that
>> I can call separately, but I was really hoping to keep everything in a
>> single HTML file.
>>
>> Thanks,
>>
>> Anthony Watson
>> Mountain Software
>> anthony@mountain-software.com
>> www.mountain-software.com
>>
>
>I tried calling my web browser from a GFA program some time ago and
>successfully did it with this:
>
>EXEC
>"C:\NETSCAPE\PROGRAM\NETSCAPE.EXE","http://www.nexus.edu.au/bookmark/"
> and
>EXEC "C:\NETSCAPE\PROGRAM\NETSCAPE.EXE","c:\bmweb\search\srchdemo.htm"
>
>
>---------------------------------------------------------------------------
>Dean Hodgson
>The Book Mark Project -- School Library Automation Software
>Department of Education, Training and Employment  Adelaide, South
>Australia
>email to:  dhodgson@nexus.edu.au
>website:   http://www.nexus.edu.au/bookmark/
>phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
>---------------------------------------------------------------------------
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:23 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJTBe-00NGqHC>; Thu, 17 Sep 1998 03:48:46 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 96026D083; Thu, 17 Sep 1998 04:56:57 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36007A79.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Sep 1998 18:45:19 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] BROWSER
X-UIDL: 57801b760f021f087d37aadb207d61e9

* List: gfabasic@aachen.linux.de

Andy,
This works for me. Of coursse, if you don't even want system dll then it is
out

Dale

//   Browser.GFW - launch the default Internet browser and jump to a website
//   GFA-BASIC Sample file
//   Author: GFA, gfasoft@compuserve.com
//   Last revision: 08/28/1998

/* Hinweis: diese Funktion luft nur einwandfrei unter Win32
/* Attention: this function works perfectly in Win32 environments only

/* declare ShellExecute - API-Funktion deklarieren
DLL #1,"shell.dll"
  DECL WORD ShellExecute(w,l,l,l,l,w) GET
ENDDLL

/* call ShellExecute; modifiy "http://www.gfa.net" to your needs
VOID
@@ShellExecute(WIN(1),"open","http://www.gfa.net/adbryant/biogs.htm#win95/",
"","",SW_SHOW)

FREEDLL 1 /* free up ressources used by DLL

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:24 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJVIa-00NGgvC>; Thu, 17 Sep 1998 06:04:04 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 34DD1D084; Thu, 17 Sep 1998 07:12:16 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36009A30.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980917030716.WVIA13283@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 17 Sep 1998 03:07:16 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Thu, 17 Sep 1998 03:07:16 +0000
Subject: [GFA] volume name
X-UIDL: 81c7f7abdeb84b8891893328a565fc78

* List: gfabasic@aachen.linux.de

16/09/98 10:05:36 PM  volume name

GetLabel
END

PROCEDURE GetLabel
  IF FSFIRST("A:\*.*",8)=0
    Headline$="Read disk name"
    Message$=CHAR{FGETDTA()+30}
    Message$="The name of the disk in drive A is: "+Message$
  ELSE
    Message$="Disk name is missing!"
  ENDIF
  MESSAGE Message$,Headline$,MB_OK,Answer&
RETURN


The functions $4E (FSFIRST=get first file entry) and $4F (FSNEXT=get next
file entry) store the data about found files in the DTA. The first 42 bytes
of the DTA have the following layout:

OFFSET LengthContents
+$0021 bytes reserved
+$15 1 byte  file attributes
+$16 2 bytes time of last modification
+$18 2 bytes date of last modification
+$1A 4 bytes file size
+$1E12 bytes file name and extension only,  
 no pathname


The layout of the attribute byte is as follows

bitmeaning when set
0  write protected file
1  hidden file
2  system file
3  volume label
4  directory
5  archive bit


Example:	DIM a(44)

~FSETDTA(V:a(0))


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:33 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJWCv-00NGbBC>; Thu, 17 Sep 1998 07:02:17 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 83B33D086; Thu, 17 Sep 1998 08:10:27 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3600A7D5.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980917050205.KDUX8099@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 17 Sep 1998 05:02:05 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 17 Sep 1998 05:02:05 +0000
Subject: [GFA] Read a Filename/Disk Label - FGETDTA
X-UIDL: 4c4f41969e3ca05a161a2d0ff3598b18

* List: gfabasic@aachen.linux.de

''''  label1.lst
TITLEW #1, " Read a Filename/Disk Label - FGETDTA"
OPENW #1, 10,10,360,290,48
PRINT " To read a disk volume label, use the whole"
PRINT " procedure below, chosing either of the 2 methods"
PRINT " given to remove the period (or full stop).  To read"
PRINT " a filename instead, REMark *all* of the m?$ steps."
PRINT " Filenames are 8+3, disk labels are 11."

GetLabel

CLOSEW #1
END


PROCEDURE GetLabel
  IF FSFIRST("c:\*.*",8) = 0 ' change to drive of interest
    Headline$ = "Read disk name"
    Message$ = CHAR{FGETDTA() + 30}
    PRINT
    PRINT " ";Message$;
    '    p% = RINSTR(Message$,".")
    '    m1$ = LEFT$(Message$,p% - 1)
    'alternate method
    m1$ = LEFT$(Message$,LEN(Message$) - 4)
    ' end of alternate method
    PRINT "      ";m1$;" + ";
    m2$ = RIGHT$(Message$,3)
    PRINT " ";m2$;
    m3$ = m1$ + m2$
    PRINT "      ";m3$
    PRINT " SVEN KUMLIN <sven.kumlin@swipnet.se>"
    PRINT " TomR. Tiger.Genealogical.Rescue@worldnet.att.net"
    PRINT ""
    PRINT " Am working on writing a"
    PRINT " disk label.  Any offers"
    PRINT " to translate FSETDTA?"
    PRINT " Will benefit all of us."
    Message$ = m3$
    Message$ = "The name of the disk in drive A is: " + Message$
  ELSE
    Message$ = "Disk name is missing!"
  ENDIF
  MESSAGE Message$,Headline$,MB_OK,Answer&
RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:35 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJWas-00NDLdC>; Thu, 17 Sep 1998 07:27:02 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 28CCBD088; Thu, 17 Sep 1998 08:35:14 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3600ADA2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 07:28:12 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] Dialog questions (2)...
X-UIDL: 2a828e5eff521384296aa018853086cc

* List: gfabasic@aachen.linux.de


Concerning questions #4 & #5, I found something like  ES_READONLY in a
documentation, but nor it's defined in gfa nor I found a way to get a
>edit box beeing scrolled without beeing allowed to edit it.

---

>Question #1 - where I get an Windows-API document from the internet ?

>#2: Does "SHOWW #DLG(n),SW_SHOW" and SW_HIDE replace SHOWDIALOG #n
>completely, when the defined dialog structure will be removed from
>memory ?

>#3: I can't use the uppercase flag when using a editable COMBOBOX with
>CBS_DROPDOWN (see example)

>#4: I'd like to use a MS_MULTILINE edit field which shows the scrollbar
>only when there is more text than displayed within the box, is that
>possible (see example) ?

>#5: The same field should be used to be disabled for editing (no
>problem: DISABLEW(...)), but then the scrollbar is NOT greyed AND NOT
>usable for scrolling - HELP
>
>Example (The full program for tracking problems is available at
>http://193.80.105.57/file/gfa/tools/cases.zip)
>
>opt_small& = 1
>
>DIALOG #10,opt_posx&,opt_posy&,580,454,"Schoeller's Mystery
>Database",WS_SYSMENU | DS_MODALFRAME,16,"Helv"
>  CONTROL "K u n d e :",900,"static",SS_LEFT,20,10,80,22
>  Embossed(800,18,26,532,2,4) // CONTROL
>"",800,"static",$10000007,18,25,532,2
>  CONTROL "A k t i o n e n :",920,"static",SS_LEFT,20,201,80,22
>  CONTROL "1 von 1",120,"static",SS_RIGHT,420,201,125,16
>  Embossed(800,18,217,532,2,4) // CONTROL
>"",800,"static",$10000007,18,210,532,2
>  CONTROL "&Techniker:",921,"static",SS_LEFT,20,229,65,22
>  CONTROL "", 108, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD |
>ES_UPPERCASE | ES_MULTILINE, 86, 227, 50, 24
>  CONTROL "&Datum:",922,"static",SS_LEFT,210,229,50,22
>  CONTROL "", 109, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD |
>ES_MULTILINE, 262, 227, 70, 24
>  CONTROL "&Kontakt:",923,"static",SS_LEFT,360,229,50,22
>  COMBOBOX "",110,415,227,132,200, CBS_DROPDOWN | WS_TABSTOP | ES_LEFT |
>CBS_HASSTRINGS | CBS_SORT
>  CONTROL "&Volltext:",924,"static",SS_LEFT,20,259,65,22
>  IF opt_small&
>    dummy% = WS_VSCROLL
>  ELSE
>    dummy% = ES_AUTOVSCROLL
>  ENDIF
>  CONTROL "", 111, "edit", 4096 | ES_LEFT | WS_BORDER | WS_TABSTOP |
>WS_CHILD | ES_MULTILINE | dummy%, 86, 257, 461, 113
>
>  Embossed(800,18,378,532,2,4) // CONTROL
>"",800,"static",$10000007,18,372,532,2
>
>  buttonx("&Lock"  ,17, 20,390,66,28)
>
>  CONTROL "",840,"static",$10000006,0,0,0,0
>
>ENDDIALOG
>
>'DelSysMenue 10
>DLG FILL 10,RGB(192,192,192)
>
>FOR i& = 0 TO 10 // maxkonkt&
>  ~SendMessage(DLGITEM(10,110),CB_ADDSTRING,0,"UPCASE " + STR$(i&))
>NEXT i&
>
>crlf$ = CHR$(13) + CHR$(10)
>_WIN$(DLG(10,111)) = "Only a Test" + crlf$ + crlf$ + crlf$ + "just to
>see" + crlf$ + crlf$ + crlf$ + "what happens..."
>
>~SendMessage(DLGITEM(10,111),EM_LIMITTEXT,1000,0)  // 1000 Zeichen sind
>genug...
>
>quit& = 0
>
>SHOWDIALOG #10
>
>// // // // //   Main - Events   // // // // //
>
>DO
>  GETEVENT
>
>  SELECT _Mess
>
>  CASE WM_SYSCOMMAND                          // ------------------ //
>    SELECT _wParam
>    CASE SC_CLOSE                             // Schlieen
>      quit& = 1
>    ENDSELECT
>
>  CASE WM_SYSKEYDOWN                          // ------------------ //
>    SELECT _wParam
>    CASE 115                                  // Alt-F4
>      quit& = 1
>    ENDSELECT
>
>
>  CASE WM_COMMAND
>    SELECT _wParam
>
>    CASE 17                                   // "Edit" / "Lock"
>      lockdialog
>
>    ENDSELECT
>
>  ENDSELECT
>LOOP UNTIL quit&
>
>CLOSEDIALOG #10
>
>PROCEDURE buttonx(text$,nr&,x&,y&,w&,h&)
>  ' IF opt_3d&
>  'PUSHBUTTON "S" + text$,nr&,x&,y&,w&,h&,BS_OWNERDRAW
>  'ELSE
>  CONTROL text$,nr&,"button",$10010000,x&,y&,w&,h&
>  'ENDIF
>RETURN
>PROCEDURE Embossed(id&,x&,y&,w&,h&,mode&)
>  IF opt_3d&
>    CONTROL "",id&,"static",mode&,x&,y&,w&,h&
>  ELSE
>    CONTROL "",id& + 2,"static",mode&,x&,y&,w&,h&
>    CONTROL "",id& + 1,"static",10 - mode&,x& + 1,y& + 1,w& - 1 ,h& - 1
>    CONTROL "",id&,"static",0,x& + 1,y& + 1,w& - 2,h& - 2
>  ENDIF
>RETURN
>
>PROCEDURE lockdialog
>  FOR i& = 108 TO 111
>    DISABLEW DLG(10,i&)
>  NEXT i&
>  ~SetFocus(DLGITEM(10,17))
>>RETURN
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:36 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJXYK-00NGbFC>; Thu, 17 Sep 1998 08:28:28 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3127FD089; Thu, 17 Sep 1998 09:36:40 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3600BC08.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 16:00:54 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <3600ADA2.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Dialog questions (2)...
X-UIDL: dbed4dbe97d59720a4c2c100fe51e2e6

* List: gfabasic@aachen.linux.de

Vogel Michael wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> Concerning questions #4 & #5, I found something like  ES_READONLY in a
> documentation, but nor it's defined in gfa nor I found a way to get a
> >edit box beeing scrolled without beeing allowed to edit it.
> 
> ---
> 
> >#5: The same field should be used to be disabled for editing (no
> >problem: DISABLEW(...)), but then the scrollbar is NOT greyed AND NOT
> >usable for scrolling - HELP
> >

ES_READONLY is not well documented and GFA certainly doesn't have it,
but I have used it to disable typing within an editbox. The value for
this constant is $800 so just OR that along with the other constants --
e.g.
edstyle%=ES_MULTILINE | WS_BORDER | WS_VISIBLE | WS_CHILDWINDOW | $800
Apparently there are a few other undocumented and unsupported constants,
too.
 
---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:38 1998
Return-Path: <ch.pelz@uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJXjz-00NGgrC>; Thu, 17 Sep 1998 08:40:31 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E0427D08B; Thu, 17 Sep 1998 09:48:38 +0200 (CEST)
From: Christian Pelz <ch.pelz@uni-bonn.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3600BEDA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Thu, 17 Sep 98 08:40:20 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (16)
Date: Wed, 16 Sep 1998 08:53:50 +0200
In-Reply-To: <35EACA62.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: ch.pelz@IBM.rhrz.uni-bonn.de
Subject: Re: [GFA] Minimize Other window
X-UIDL: 9312c47ff4c500b451f1c899a00aa6c3

* List: gfabasic@aachen.linux.de

Hi Benny,

try

hw& = FindWindow(0,"Microsoft Access")
~ShowWindow(hw&, SW_MINIMIZE)

Christian


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:39 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJZec-00NGjOC>; Thu, 17 Sep 1998 10:43:06 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A1789D08C; Thu, 17 Sep 1998 11:51:08 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3600DB8F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 10:44:09 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Boolean Logic ?
X-UIDL: ee3493b056f611ed1d5ba1060c159a4a

* List: gfabasic@aachen.linux.de


Be carefull, it took me a while until I found the problem (in a more
complex function like) in the example...

max& = 99
DIM i&(max&)

i& = 0
DO
  i& ++
  dummy& = i&(i&)
LOOP UNTIL (i& >= 99) OR NOT(TRUE AND TRUE)
PRINT i&

i& = 0
DO
  i& ++
  dummy& = i&(i&)
LOOP UNTIL NOT(TRUE AND TRUE) OR (i& >= 99)
PRINT i&
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:41 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJaKD-00NGiNC>; Thu, 17 Sep 1998 11:26:05 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D8330D08D; Thu, 17 Sep 1998 12:34:15 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3600E5A8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id A5E1D30110; Thu, 17 Sep 1998 11:26:57 +0200
Date: Thu, 17 Sep 1998 11:18:22 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Boolean Logic ?
X-UIDL: 43ad9fd1bc7c3bba24dd807a54a795e1

* List: gfabasic@aachen.linux.de

The meaning of the Not, Or, And, and Xor operators depend on the context in
which they are used. (see page 357 of my book Programming in GFABASIC of
Windows).

Your test:
NOT(TRUE AND TRUE) OR (i& >= 99)
First evaluation:
(TRUE AND TRUE)            // here And is a logical operator -1 And -1 = -1
so this results in TRUE and leaves us with:

NOT(TRUE) Or (i&>=99).

When i& becomes 100, the second part becomes true. Since Or has higher
priority then NOT, which is a bitwise negation, the following is the result:

NOT (TRUE) Or (TRUE) <=>
NOT (TRUE) <=>
FALSE --> oops, no exit!

Your first part of the example exits correctly. Why?

(i& >= 99) OR NOT(TRUE AND TRUE)  <=>
(TRUE) OR NOT(TRUE)    <=>
(TRUE) OR FALSE    <=>
TRUE

A bit of advise: Use ||, && for comparisons and ! rather than NOT. If you had
done it as follows everything would have been ok.

Loop Until (i& >= 99) || !(TRUE AND TRUE)

or

Loop Until !(True And True) || (i& > 99)

This is true for all programming languages.

Regards,
Sjouke Hamstra

-----Original Message-----
From: Vogel Michael <vo@schoeller.at>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: donderdag 17 september 1998 10:44
Subject: [GFA] Boolean Logic ?


>* List: gfabasic@aachen.linux.de
>
>
>Be carefull, it took me a while until I found the problem (in a more
>complex function like) in the example...
>
>max& = 99
>DIM i&(max&)
>
>i& = 0
>DO
>  i& ++
>  dummy& = i&(i&)
>LOOP UNTIL (i& >= 99) OR NOT(TRUE AND TRUE)
>PRINT i&
>
>i& = 0
>DO
>  i& ++
>  dummy& = i&(i&)
>LOOP UNTIL NOT(TRUE AND TRUE) OR (i& >= 99)
>PRINT i&
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:48 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJc6s-00NGbFC>; Thu, 17 Sep 1998 13:20:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3D51ED08E; Thu, 17 Sep 1998 14:28:34 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36010074.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 07:19:51 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Boolean Logic ?
X-UIDL: e52783b35fcbcb280deec5df72b4c2f0

* List: gfabasic@aachen.linux.de

>>> LOOP UNTIL NOT(A AND B) OR (i& >= 99)  <<<

This is the old NOT bug, which GFA refers to as a "feature," rather than
fixing it to conform to the standards of a unary operaror..

Because NOT has accidentally been given high priority instead of low
priority, the above line evaluates incorrectly to :

LOOP UNTIL NOT ( (a AND b ) OR (i>=99) )


It is not documented under the discussion of "NOT", but it is vaguely
referred to under the discussion of "~" in the help file. It  is not
synonymous with "~".

To be safe, never use the keyword NOT. Use ~ instead.

If you do use it, it should be enclosed in parentheses as follows:

LOOP UNTIL ( NOT  (a AND b ) )   OR (i>=99) 


Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:50 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJcQ5-00NGjUC>; Thu, 17 Sep 1998 13:40:17 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id EF66CD08F; Thu, 17 Sep 1998 14:48:07 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36010508.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 07:39:03 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Boolean Logic ?
X-UIDL: db4fea8949e3f7974c1a12d031e0f8f3

* List: gfabasic@aachen.linux.de

>>  LOOP UNTIL NOT  (a AND b ) OR (i>=99)   <<

Furthermore,  as Sjouke points out,

"NOT" , "~", and "AND" are bitwise logical operators, not boolean
operators. 

Even when in parentheses,  "NOT" will likely give the wrong answer to a
boolean question.
Try the following examples to see the difference: 

for x& = -3 to 3
   ? x&, NOT x&, !x&
next x

? (1 AND 2), (1 && 2)



Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:58 1998
Return-Path: <benny@zeb.be>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJeaP-00NGqqC>; Thu, 17 Sep 1998 15:59:05 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id CB1AFD087; Thu, 17 Sep 1998 17:07:15 +0200 (CEST)
From: Benny Sels <benny@zeb.be>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360125A4.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id A590159A014E; Thu, 17 Sep 1998 15:58:40 +03d0
X-Sender: benny@mail.zeb.be
X-Mailer: Windows Eudora Light Version 3.0.1 (32)
Date: Thu, 17 Sep 1998 15:58:41 +0200
In-Reply-To: <3600BEDA.BeroList-2.5.8@aachen.linux.de>
References: <35EACA62.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] Minimize Other window
X-UIDL: 5ffc257272203b5f6f6ec16e29cfa645

* List: gfabasic@aachen.linux.de

At 08:53 16/09/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de

Thanks Christian, just wath i need.

>
>Hi Benny,
>
>try
>
>hw& = FindWindow(0,"Microsoft Access")
>~ShowWindow(hw&, SW_MINIMIZE)
>
>Christian
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:18:59 1998
Return-Path: <anthony@mountain-software.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJf53-00NGqeC>; Thu, 17 Sep 1998 16:30:45 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id F308DD091; Thu, 17 Sep 1998 17:38:52 +0200 (CEST)
From: anthony@mountain-software.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36012D0D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: 17 Sep 1998 07:25
X-Newsreader: Mountain Reader 1.3 for Windows
Sender: awatson@pacifier.com
Subject: [GFA] Calling Web Browser
X-UIDL: f7ad05f792c6df6f21e77388e6221f3c

* List: gfabasic@aachen.linux.de

> The problem is that I can't reference an internal link in that HTML
> file from the command line. You know, the <a name="test"> type of
> link that you can refer to with a <a href="#test"> within the
> document itself.

DH> Ah, I see. Can you enter the entire line at a Dos prompt or in a Run
DH> window and have it work?

Nope, it doesn't work their either. That's why I don't think it's a GFA 
error, or the "way" I am calling the browser.

It is either a case of my browser not accepting that type of link, or else it 
requires a different calling method than I am used to.

I think I'm going to have to set up individual HTML files that I can call 
from my program, even though that's not what I was wanting to do.

Thanks for your help!

Anthony

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:00 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJh5I-00NEihC>; Thu, 17 Sep 1998 18:39:08 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7D062D092; Thu, 17 Sep 1998 19:47:19 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36014B27.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id SAA18981 for <gfabasic@linux.net.eu.org>; 
          Thu, 17 Sep 1998 18:38:56 +0200 (MET DST)
Date: Thu, 17 Sep 1998 18:39:27 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: [GFA] Help, please - volume label   1509xx1-
X-UIDL: c3b8b765c89decbcd08ee4c877c0926c

* List: gfabasic@aachen.linux.de

A couple of years ago I was still working on the Atari ST. Then I had routines
for reading AND writing the disk label, and also reading AND writing the serial
number on a disk.

Sven

----------
> Frn: Dale Bryant <adbryant@email.msn.com>
> Till: gfabasic@aachen.linux.de
> mne: Re: [GFA] Help, please - volume label   1509xx1-
> Datum:  den 16 september 1998 20:09
> 
> * List: gfabasic@aachen.linux.de
> 
> OK Sven or Anyone,
> This works fine but what if the disk label is missing and I want to juts
> write a new label to the disk.
> http://www.gfawhelp.gfa.net
> webmaster.gfawhelp@gfa.net
> -----Original Message-----
> From: SVEN KUMLIN <sven.kumlin@swipnet.se>
> To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
> Date: Wednesday, September 16, 1998 9:52 AM
> Subject: SV: [GFA] Help, please - volume label 1509xx1-
> 
> 
> >* List: gfabasic@aachen.linux.de
> >
> >
> >Here is one more way of label reading.
> >
> >' DISK NAME (Label)
> >
> >GetLabel
> >END
> >
> >PROCEDURE GetLabel
> >  IF FSFIRST("A:\*.*",8)=0
> >    Headline$="Read disk name"
> >    Message$=CHAR{FGETDTA()+30}
> >    Message$="The name of the disk in drive A is: "+Message$
> >  ELSE
> >    Message$="Disk name is missing!"
> >  ENDIF
> >  MESSAGE Message$,Headline$,MB_OK,Answer&
> >RETURN
> >
> >Regards,
> >Sven


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:03 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJi6O-00NGjIC>; Thu, 17 Sep 1998 19:44:20 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 06DBAD093; Thu, 17 Sep 1998 20:52:26 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36015A6A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 17 Sep 1998 10:39:55 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] biogs
X-UIDL: 7a2eca6d14bccbfa4ca5d69ede7d6634

* List: gfabasic@aachen.linux.de

Eberhard Funck has joined the GFAHELP Gfa Basic programmers page. It would
be nice if some of you would welcome him
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:04 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJiS2-00NEmhC>; Thu, 17 Sep 1998 20:06:42 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 39E5DD094; Thu, 17 Sep 1998 21:14:47 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36015FAA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id UAA03551 for <gfabasic@linux.net.eu.org>; 
          Thu, 17 Sep 1998 20:06:17 +0200 (MET DST)
Date: Thu, 17 Sep 1998 18:57:29 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: [GFA] Help, please - volume label   1509xx1-
X-UIDL: bf5f129b686e528a8c87944622ca9c56

* List: gfabasic@aachen.linux.de

I don't know how to write a new label on the disk. If it is possible, please
tell me!

Sven

----------
> Frn: Dale Bryant <adbryant@email.msn.com>
> Till: gfabasic@aachen.linux.de
> mne: Re: [GFA] Help, please - volume label   1509xx1-
> Datum:  den 16 september 1998 20:09
> 
> * List: gfabasic@aachen.linux.de
> 
> OK Sven or Anyone,
> This works fine but what if the disk label is missing and I want to juts
> write a new label to the disk.
> http://www.gfawhelp.gfa.net
> webmaster.gfawhelp@gfa.net
> -----Original Message-----
> From: SVEN KUMLIN <sven.kumlin@swipnet.se>
> To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
> Date: Wednesday, September 16, 1998 9:52 AM
> Subject: SV: [GFA] Help, please - volume label 1509xx1-
> 
> 
> >* List: gfabasic@aachen.linux.de
> >
> >
> >Here is one more way of label reading.
> >
> >' DISK NAME (Label)
> >
> >GetLabel
> >END
> >
> >PROCEDURE GetLabel
> >  IF FSFIRST("A:\*.*",8)=0
> >    Headline$="Read disk name"
> >    Message$=CHAR{FGETDTA()+30}
> >    Message$="The name of the disk in drive A is: "+Message$
> >  ELSE
> >    Message$="Disk name is missing!"
> >  ENDIF
> >  MESSAGE Message$,Headline$,MB_OK,Answer&
> >RETURN
> >
> >Regards,
> >Sven


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:11 1998
Return-Path: <dave@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJlc0-00NEmhC>; Thu, 17 Sep 1998 23:29:12 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3B2AED097; Fri, 18 Sep 1998 00:37:24 +0200 (CEST)
From: "Dave Williams" <dave@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36018F24.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 17 Sep 1998 19:40:53 +0100
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] REMOVE
X-UIDL: 6494c45eb1577acb046571e925a8a925

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Sun Sep 20 06:19:14 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJm8J-00NEm3C>; Fri, 18 Sep 1998 00:02:35 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C9937D098; Fri, 18 Sep 1998 01:10:31 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360196EB.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980917220212.BFFW24868@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 17 Sep 1998 22:02:12 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Thu, 17 Sep 1998 22:02:12 +0000
Subject: Re: SV: [GFA] Help, please - volume label   1509xx1-
X-UIDL: abe9f351849a2f9187393c4b04552194

* List: gfabasic@aachen.linux.de

FSETDTA(addr)

addr:		address

The functions $4E (FSFIRST=get first file entry) and $4F (FSNEXT=get next
file entry) store the data about found files in the DTA. The first 42 bytes
of the DTA have the following layout:

OFFSET LengthContents
+$0021 bytes reserved
+$15 1 byte  file attributes
+$16 2 bytes time of last modification
+$18 2 bytes date of last modification
+$1A 4 bytes file size
+$1E12 bytes file name and extension only, no pathname


The layout of the attribute byte is as follows

bitmeaning when set
0  write protected file
1  hidden file
2  system file
3  volume label
4  directory
5  archive bit


Example:

DIM a(44)
~FSETDTA(V:a(0))

<F>
TomR.


At 06:57 PM 17/09/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>I don't know how to write a new label on the disk. If it is possible, please
>tell me!
>
>Sven
>
>----------
>> Frn: Dale Bryant <adbryant@email.msn.com>
>> Till: gfabasic@aachen.linux.de
>> mne: Re: [GFA] Help, please - volume label   1509xx1-
>> Datum:  den 16 september 1998 20:09
>> 
>> * List: gfabasic@aachen.linux.de
>> 
>> OK Sven or Anyone,
>> This works fine but what if the disk label is missing and I want to juts
>> write a new label to the disk.
>> http://www.gfawhelp.gfa.net
>> webmaster.gfawhelp@gfa.net
>> -----Original Message-----
>> From: SVEN KUMLIN <sven.kumlin@swipnet.se>
>> To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>> Date: Wednesday, September 16, 1998 9:52 AM
>> Subject: SV: [GFA] Help, please - volume label 1509xx1-
>> 
>> 
>> >* List: gfabasic@aachen.linux.de
>> >
>> >
>> >Here is one more way of label reading.
>> >
>> >' DISK NAME (Label)
>> >
>> >GetLabel
>> >END
>> >
>> >PROCEDURE GetLabel
>> >  IF FSFIRST("A:\*.*",8)=0
>> >    Headline$="Read disk name"
>> >    Message$=CHAR{FGETDTA()+30}
>> >    Message$="The name of the disk in drive A is: "+Message$
>> >  ELSE
>> >    Message$="Disk name is missing!"
>> >  ENDIF
>> >  MESSAGE Message$,Headline$,MB_OK,Answer&
>> >RETURN
>> >
>> >Regards,
>> >Sven
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:15 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJoo5-00NGajC>; Fri, 18 Sep 1998 02:53:53 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 72924D099; Fri, 18 Sep 1998 04:01:57 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3601BF19.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Thu, 17 Sep 1998 17:49:32 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] CTRLTOOL
X-UIDL: d71bad0229761b7e53bed519f4caf08e

* List: gfabasic@aachen.linux.de

Just posted for download on the GFAWHELP file page is CTRLTOOL.ZIP by
Eberhard Funck. This one has many demos, dlls with the source code for
everything. Grab it!
dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:17 1998
Return-Path: <cfmiller@mail.missouri.edu>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJqKH-00NEm3C>; Fri, 18 Sep 1998 04:31:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5467BD09A; Fri, 18 Sep 1998 05:39:25 +0200 (CEST)
From: Ric <cfmiller@mail.missouri.edu>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3601D5ED.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 21:31:15 -0500
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <3601BF19.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] REMOVE
X-UIDL: 863eec678c03491f23b96af6ca9962d8

* List: gfabasic@aachen.linux.de



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:18 1998
Return-Path: <awatson@pacifier.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJsD3-00NEm3C>; Fri, 18 Sep 1998 06:31:53 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D3B03D09B; Fri, 18 Sep 1998 07:40:06 +0200 (CEST)
From: Anthony Watson <awatson@pacifier.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3601F237.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Sep 1998 21:31:41 -0700 (PDT)
In-Reply-To: <360125A4.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] Launching Web Browser
X-UIDL: 88e7273666bc0c776e5dc0539ab05cc0

* List: gfabasic@aachen.linux.de

I recently posted a question about calling a web browser with a local 
HTML file. My goal was to have the HTML file open up, and automatically 
jump to an <a name="section1"> type of internal reference link.
 
So far, no one has supplied a usable solution, and my searches on the 
internet have also come up empty.
 
However, I stumbled across a "work-around" appoach this afternoon that 
seems to work rather well. Basically, I create a small HTML file 
"on-the-fly" from within my program, and then call the browser with that 
file. The small file itself contains a redirect to the file I want 
opened at the appropriate location.
 
For me it is working great, but I'm curious how it will work with other 
browsers on other peoples systems. So, I'm including a small sample of 
the code, in hopes that someone else can give it a try and see if it 
works for you as well as it does me. Naturally, you'll need to change 
the first four lines to reflect your browser location, HTML file you 
use, and the reference link.
 
I would appreciate hearing your results!
 
Thanks,
 
Anthony Watson
Mountain Software
anthony@mountain-software.com
www.mountain-software.com
 
================= Program Starts Here ================================
 
web_browser$="c:\modem\ie\iexplore.exe"   '** Path to your web browser
link$="#section1"                         '** Link you want to jump to
help_file$="c:\basic\help.htm"            '** The main HTML file
jump_file$="c:\basic\temp.htm"            '** The temporary jump file
 
OPEN "o",#2,jump_file$                    '** Make temporary jump file
PRINT #2,"<HTML><HEAD><TITLE>Temp Redirect File</TITLE>"
PRINT #2,"<META HTTP-EQUIV="+CHR$(34)+"Refresh"+CHR$(34);
PRINT #2," CONTENT="+CHR$(34)+"0; URL="+help_file$;
PRINT #2,link$+CHR$(34)+">"
PRINT #2,"</HEAD><BODY></BODY></HTML>"
CLOSE #2
 
a=EXEC(web_browser$,jump_file$)           '** Call the browser w/temp file
 
================== Program Ends Here =================================== 



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:20 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJuUY-00NElEC>; Fri, 18 Sep 1998 08:58:06 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id DBEFCD09C; Fri, 18 Sep 1998 10:06:17 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3602147A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 18 Sep 1998 08:59:30 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: AW: [GFA] Help, please - volume label   1509xx1-
X-UIDL: 95c5588d2a8e5c35324c3acee7d14da2

* List: gfabasic@aachen.linux.de

Maybe this can help...

(Taken from the Source code of Calmira, a Windows 95 alike desktop for
Win3.1 - http://www.tribbles.demon.co.uk/calmira/calmira.htm)

- Michael

{*********************************************************}
{    Calmira System Library 2.2                           }
{    by Li-Hsin Huang,                                    }
{    released into the public domain July 1998            }
{*********************************************************}

type
  TDriveRange = 'A'..'Z';
  TDriveFlag = (dfValid, dfFloppy, dfFixed, dfNetwork, dfCDROM, dfRAM,
                dfRemoveable, dfWriteable);
  TDriveFlags = set of TDriveFlag;
  TVolumeLabel = string[11];



procedure SetVolumeLabel(NewLabel: TVolumeLabel; Drive: Char);
var
  Regs: TRealModeRegs;
  FCB: PExtendedFCB;
  Buf: Longint;
  i : Integer;
begin
  if NewLabel = '' then begin
    DeleteVolumeLabel(Drive);
    Exit;
  end;

  PadVolumeLabel(NewLabel);

  if GetExactVolumeLabel(Drive) <> '' then              { if has
label... }
    DeleteVolumeLabel(Drive);                   { delete label }

  Buf := GlobalDOSAlloc(SizeOf(PExtendedFCB));  { allocate real buffer }
  try
    FCB := Ptr(LoWord(Buf), 0);
    FillChar(FCB^, SizeOf(FCB), 0);               { init FCB with zeros
}
    with FCB^ do begin
      ExtendedFCBflag := $FF;                     { required }
      Attr := faVolumeID;                         { Volume ID attribute
}
      DriveID := DriveNumber(Drive);              { Drive number }
      Move(NewLabel[1], FileName, 8);             { set new label }
      Move(NewLabel[9], FileExt, 3);
    end;
    FillChar(Regs, SizeOf(Regs), 0);
    with Regs do begin                            { SEGMENT of FCB }
      DS := HiWord(Buf);                          { offset = zero }
      DX := 0;
      AX := $1600;                                { function 16h }
    end;
    RealModeInt($21, Regs);                 { create file }
    if (Regs.al <> 0) then                        { check for success }
      raise EVolumeLabelError.Create('Unable to create volume label');
  finally
    if GlobalDOSFree(LoWord(Buf)) <> 0 then
      raise EInterruptError.Create('Failed to free real mode buffer');
  end;
end;




>----------
>Von: 	SVEN KUMLIN[SMTP:sven.kumlin@swipnet.se]
>Gesendet: 	Donnerstag, 17. September 1998 18:57
>An: 	gfabasic@aachen.linux.de
>Betreff: 	SV: [GFA] Help, please - volume label   1509xx1-
>
>* List: gfabasic@aachen.linux.de
>
>I don't know how to write a new label on the disk. If it is possible, please
>tell me!
>
>Sven
>
>----------
>> Frn: Dale Bryant <adbryant@email.msn.com>
>> Till: gfabasic@aachen.linux.de
>> mne: Re: [GFA] Help, please - volume label   1509xx1-
>> Datum:  den 16 september 1998 20:09
>> 
>> * List: gfabasic@aachen.linux.de
>> 
>> OK Sven or Anyone,
>> This works fine but what if the disk label is missing and I want to juts
>> write a new label to the disk.
>> http://www.gfawhelp.gfa.net
>> webmaster.gfawhelp@gfa.net
>> -----Original Message-----
>> From: SVEN KUMLIN <sven.kumlin@swipnet.se>
>> To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>> Date: Wednesday, September 16, 1998 9:52 AM
>> Subject: SV: [GFA] Help, please - volume label 1509xx1-
>> 
>> 
>> >* List: gfabasic@aachen.linux.de
>> >
>> >
>> >Here is one more way of label reading.
>> >
>> >' DISK NAME (Label)
>> >
>> >GetLabel
>> >END
>> >
>> >PROCEDURE GetLabel
>> >  IF FSFIRST("A:\*.*",8)=0
>> >    Headline$="Read disk name"
>> >    Message$=CHAR{FGETDTA()+30}
>> >    Message$="The name of the disk in drive A is: "+Message$
>> >  ELSE
>> >    Message$="Disk name is missing!"
>> >  ENDIF
>> >  MESSAGE Message$,Headline$,MB_OK,Answer&
>> >RETURN
>> >
>> >Regards,
>> >Sven
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:25 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJw73-00NGiQC>; Fri, 18 Sep 1998 10:41:57 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 44914D09D; Fri, 18 Sep 1998 11:50:08 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36022CD0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 18 Sep 1998 04:41:00 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] SAVEDC /RESTOREDC
X-UIDL: 28bd240fd09b19f263a3de18e9cd34da

* List: gfabasic@aachen.linux.de

Here's the latest of my discoveries:

Within a SAVEDC / RESTOREDC constuct, the following GFA graphic commands
appear to be problematic:

     COLOR, RGBCOLOR, DEFLINE, DEFFILL, CLIP, 
     or any command which results in the creation of a GDI handle. 

The reason is that GFA does not process the SAVEDC /  RESTOREDC functions,
but merely passes them to the GDI. The result is that object handles which GFA 
has created may not be properly destroyed, or GFA may lose track of them.

Use of these GFA funcitons within a SAVEDC / RESTOREDC constuct will result in
a resource leak, and could eventually crash WINDOWS.


BDD
9/17/98


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:26 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJxdm-00NGiWC>; Fri, 18 Sep 1998 12:19:50 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B5169D09E; Fri, 18 Sep 1998 13:27:49 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360243B9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 18 Sep 1998 09:03:47 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"

X-Sender: 02204410-0001@t-online.de
Subject: [GFA] "LostFocus"
X-UIDL: 068de9a1cd744f4d7daa13635b4fa8de

* List: gfabasic@aachen.linux.de

Hi!

Do anyone know a method to ask for the "LostFocus-event" like in VB?

I have difficulties in using the KILLFOCUS-Message, because there is no message send if you jump from one EDIT-Control to another or to an COMBOBOX, it only works, if the next item will be a BUTTON.

Many thanks in advance
Yours

Thomas

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:27 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJxiQ-00NEntC>; Fri, 18 Sep 1998 12:24:38 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8DE95D09F; Fri, 18 Sep 1998 13:32:34 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360244D4.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 18 Sep 1998 08:55:57 +-200
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"

X-Sender: 02204410-0001@t-online.de
Subject: [GFA] GFADLL4
X-UIDL: 40d162dccf0707052517e8bccece2c84

* List: gfabasic@aachen.linux.de

Hi!

Every time I try to do a disk-access with the demo-exe-file included the packet of the ZIP-File I will get a "general-protection-fault" (greetings to Bill).

Is it possible that this DLL won't work with the FAT32 of Windows95?

Thanks
Thomas

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:28 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJxwY-00NEmhC>; Fri, 18 Sep 1998 12:39:14 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6B177D0A0; Fri, 18 Sep 1998 13:47:14 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36024845.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980918103835.TFNQ19225@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 18 Sep 1998 10:38:35 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Fri, 18 Sep 1998 10:38:35 +0000
Subject: Re: AW: [GFA] Help, please - volume label   1509xx1-
X-UIDL: 424440031ead9e4bfc6cfde36606c554

* List: gfabasic@aachen.linux.de

Thank you, Michael.  Now... if someone accomplished w/ "C" or 
whatever that's written in can translate to GFA-W.  I *have*
something in GFA-W, but don't understand it & there's no
explanation with it.  It's under FSETDTA in the helpfile.

I's sorry if I annoy anybody w/ these questions, but they
are important to me & to others & I sometimes search for the
wrong words in the helpfile, sometimes it isn't there, & I
don't always understand what *is* there.

<G>
TomR.



At 08:59 AM 18/09/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Maybe this can help...
>
>(Taken from the Source code of Calmira, a Windows 95 alike desktop for
>Win3.1 - http://www.tribbles.demon.co.uk/calmira/calmira.htm)
>
>- Michael
>
>{*********************************************************}
>{    Calmira System Library 2.2                           }
>{    by Li-Hsin Huang,                                    }
>{    released into the public domain July 1998            }
>{*********************************************************}
>
>type
>  TDriveRange = 'A'..'Z';
>  TDriveFlag = (dfValid, dfFloppy, dfFixed, dfNetwork, dfCDROM, dfRAM,
>                dfRemoveable, dfWriteable);
>  TDriveFlags = set of TDriveFlag;
>  TVolumeLabel = string[11];
>
>
>
>procedure SetVolumeLabel(NewLabel: TVolumeLabel; Drive: Char);
>var
>  Regs: TRealModeRegs;
>  FCB: PExtendedFCB;
>  Buf: Longint;
>  i : Integer;
>begin
>  if NewLabel = '' then begin
>    DeleteVolumeLabel(Drive);
>    Exit;
>  end;
>
>  PadVolumeLabel(NewLabel);
>
>  if GetExactVolumeLabel(Drive) <> '' then              { if has
>label... }
>    DeleteVolumeLabel(Drive);                   { delete label }
>
>  Buf := GlobalDOSAlloc(SizeOf(PExtendedFCB));  { allocate real buffer }
>  try
>    FCB := Ptr(LoWord(Buf), 0);
>    FillChar(FCB^, SizeOf(FCB), 0);               { init FCB with zeros
>}
>    with FCB^ do begin
>      ExtendedFCBflag := $FF;                     { required }
>      Attr := faVolumeID;                         { Volume ID attribute
>}
>      DriveID := DriveNumber(Drive);              { Drive number }
>      Move(NewLabel[1], FileName, 8);             { set new label }
>      Move(NewLabel[9], FileExt, 3);
>    end;
>    FillChar(Regs, SizeOf(Regs), 0);
>    with Regs do begin                            { SEGMENT of FCB }
>      DS := HiWord(Buf);                          { offset = zero }
>      DX := 0;
>      AX := $1600;                                { function 16h }
>    end;
>    RealModeInt($21, Regs);                 { create file }
>    if (Regs.al <> 0) then                        { check for success }
>      raise EVolumeLabelError.Create('Unable to create volume label');
>  finally
>    if GlobalDOSFree(LoWord(Buf)) <> 0 then
>      raise EInterruptError.Create('Failed to free real mode buffer');
>  end;
>end;
>
>
>
>
>>----------
>>Von: 	SVEN KUMLIN[SMTP:sven.kumlin@swipnet.se]
>>Gesendet: 	Donnerstag, 17. September 1998 18:57
>>An: 	gfabasic@aachen.linux.de
>>Betreff: 	SV: [GFA] Help, please - volume label   1509xx1-
>>
>>* List: gfabasic@aachen.linux.de
>>
>>I don't know how to write a new label on the disk. If it is possible, please
>>tell me!
>>
>>Sven
>>
>>----------
>>> Frn: Dale Bryant <adbryant@email.msn.com>
>>> Till: gfabasic@aachen.linux.de
>>> mne: Re: [GFA] Help, please - volume label   1509xx1-
>>> Datum:  den 16 september 1998 20:09
>>> 
>>> * List: gfabasic@aachen.linux.de
>>> 
>>> OK Sven or Anyone,
>>> This works fine but what if the disk label is missing and I want to juts
>>> write a new label to the disk.
>>> http://www.gfawhelp.gfa.net
>>> webmaster.gfawhelp@gfa.net
>>> -----Original Message-----
>>> From: SVEN KUMLIN <sven.kumlin@swipnet.se>
>>> To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>>> Date: Wednesday, September 16, 1998 9:52 AM
>>> Subject: SV: [GFA] Help, please - volume label 1509xx1-
>>> 
>>> 
>>> >* List: gfabasic@aachen.linux.de
>>> >
>>> >
>>> >Here is one more way of label reading.
>>> >
>>> >' DISK NAME (Label)
>>> >
>>> >GetLabel
>>> >END
>>> >
>>> >PROCEDURE GetLabel
>>> >  IF FSFIRST("A:\*.*",8)=0
>>> >    Headline$="Read disk name"
>>> >    Message$=CHAR{FGETDTA()+30}
>>> >    Message$="The name of the disk in drive A is: "+Message$
>>> >  ELSE
>>> >    Message$="Disk name is missing!"
>>> >  ENDIF
>>> >  MESSAGE Message$,Headline$,MB_OK,Answer&
>>> >RETURN
>>> >
>>> >Regards,
>>> >Sven
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:31 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJyIM-00NGiuC>; Fri, 18 Sep 1998 13:01:46 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 32E4FD0A1; Fri, 18 Sep 1998 14:09:57 +0200 (CEST)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36024D95.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 18 Sep 1998 06:56:46 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3155.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: Re: [GFA] GFADLL4
X-UIDL: d9df22c0880f5aaee79adc3197017791

* List: gfabasic@aachen.linux.de

Hi:

You're correct -- it will not work with any disk access to a FAT32 drive;
I've ask for help on this but no one has come up with an answer (I believe
it uses INTERUPT $21 $7305 but I can't get it to work -- HELP)!

                                                              -->Bev<--

-----Original Message-----
From: Thomas Gonschor <vph-bensberg@t-online.de>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: September 18, 1998 0637 Bev
Subject: [GFA] GFADLL4


>* List: gfabasic@aachen.linux.de
>
>Hi!
>
>Every time I try to do a disk-access with the demo-exe-file included the
packet of the ZIP-File I will get a "general-protection-fault" (greetings to
Bill).
>
>Is it possible that this DLL won't work with the FAT32 of Windows95?
>
>Thanks
>Thomas
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:32 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zJzmB-00NGjUC>; Fri, 18 Sep 1998 14:36:39 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4A820D0A2; Fri, 18 Sep 1998 15:44:49 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360263D1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 18 Sep 1998 14:38:01 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] Clipboard...
X-UIDL: 4654d1eca0966c29ea1e2f91bd7ca294

* List: gfabasic@aachen.linux.de

Hi, 

 I'm still searching a lot of dialog functions (and an electronic form
of the windows api), BUT I have a new question as well:

 How I can detect, if there is something in the Clipboard ?
 I'd like to gray the Paste-Menu out, if the clipboard is empty (see
below)...

- Michael

  PMnu& = CreatePopupMenu()
  ~AppendMenu(PMnu&,MF_STRING,221,"&Cut" + tab$ + "Shift+Entf")
  ~AppendMenu(PMnu&,MF_STRING,222,"&Copy" + tab$ + "Strg+Einfg")
  ~AppendMenu(PMnu&,MF_STRING,223,"&Paste" + tab$ + "Shift+Einfg")
  ~AppendMenu(PMnu&,MF_SEPARATOR,0,NULL)
  ~AppendMenu(PMnu&,MF_STRING,201,"..." + tab$ + "F5")
  ' :
  ' :
  ~AppendMenu(PMnu&,MF_STRING,205,"-")
  ~AppendMenu(PMnu&,MF_SEPARATOR,0,NULL)
  ~AppendMenu(PMnu&,MF_STRING,200,"Z&urck" + tab$ + "Esc")


    dummy& = GetFocus()
    dummy% = SendMessage(dummy&,EM_GETSEL,1,0)
    temp01& = HIWORD(dummy%)
    temp02& = LOWORD(dummy%)

    IF temp01& > temp02&
      ~EnableMenuItem(PMnu&,221,MF_ENABLED)
      ~EnableMenuItem(PMnu&,222,MF_ENABLED)
    ELSE
      ~EnableMenuItem(PMnu&,221,MF_GRAYED)
      ~EnableMenuItem(PMnu&,222,MF_GRAYED)
    ENDIF

    IF @IntelligentFunctionWhichTellsMeIfClipBoardHasContent
      ~EnableMenuItem(PMnu&,223,MF_ENABLED)
    ELSE
      ~EnableMenuItem(PMnu&,223,MF_GRAYED)
    ENDIF

    DO
      GETEVENT
      ~TrackPopupMenu(PMnu&,0,MOUSEX,MOUSEY,0,DLG(10),0)
      //PEEKEVENT // Ohne dieser Zeile bekommt man den zuletzt gewhlten
Eintrag
      quit& = _wParam
    LOOP UNTIL quit&

  ~DestroyMenu(PMnu&)




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:33 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zK0DT-00NGqTC>; Fri, 18 Sep 1998 15:04:51 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C5F76D0A3; Fri, 18 Sep 1998 16:12:51 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36026A64.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980918130430.FRQX3286@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 18 Sep 1998 13:04:30 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Fri, 18 Sep 1998 13:04:30 +0000
Subject: Re: [GFA] Clipboard...
X-UIDL: 343784903f585ab08fe4174852af32ce

* List: gfabasic@aachen.linux.de

Michael
Have seen something, will look for it.
<G>
TomR.


At 02:38 PM 18/09/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi, 
>
> I'm still searching a lot of dialog functions (and an electronic form
>of the windows api), BUT I have a new question as well:
>
> How I can detect, if there is something in the Clipboard ?
> I'd like to gray the Paste-Menu out, if the clipboard is empty (see
>below)...
>
>- Michael
>
>  PMnu& = CreatePopupMenu()
>  ~AppendMenu(PMnu&,MF_STRING,221,"&Cut" + tab$ + "Shift+Entf")
>  ~AppendMenu(PMnu&,MF_STRING,222,"&Copy" + tab$ + "Strg+Einfg")
>  ~AppendMenu(PMnu&,MF_STRING,223,"&Paste" + tab$ + "Shift+Einfg")
>  ~AppendMenu(PMnu&,MF_SEPARATOR,0,NULL)
>  ~AppendMenu(PMnu&,MF_STRING,201,"..." + tab$ + "F5")
>  ' :
>  ' :
>  ~AppendMenu(PMnu&,MF_STRING,205,"-")
>  ~AppendMenu(PMnu&,MF_SEPARATOR,0,NULL)
>  ~AppendMenu(PMnu&,MF_STRING,200,"Z&urck" + tab$ + "Esc")
>
>
>    dummy& = GetFocus()
>    dummy% = SendMessage(dummy&,EM_GETSEL,1,0)
>    temp01& = HIWORD(dummy%)
>    temp02& = LOWORD(dummy%)
>
>    IF temp01& > temp02&
>      ~EnableMenuItem(PMnu&,221,MF_ENABLED)
>      ~EnableMenuItem(PMnu&,222,MF_ENABLED)
>    ELSE
>      ~EnableMenuItem(PMnu&,221,MF_GRAYED)
>      ~EnableMenuItem(PMnu&,222,MF_GRAYED)
>    ENDIF
>
>    IF @IntelligentFunctionWhichTellsMeIfClipBoardHasContent
>      ~EnableMenuItem(PMnu&,223,MF_ENABLED)
>    ELSE
>      ~EnableMenuItem(PMnu&,223,MF_GRAYED)
>    ENDIF
>
>    DO
>      GETEVENT
>      ~TrackPopupMenu(PMnu&,0,MOUSEX,MOUSEY,0,DLG(10),0)
>      //PEEKEVENT // Ohne dieser Zeile bekommt man den zuletzt gewhlten
>Eintrag
>      quit& = _wParam
>    LOOP UNTIL quit&
>
>  ~DestroyMenu(PMnu&)
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:44 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zK2Yf-00NEntC>; Fri, 18 Sep 1998 17:34:53 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 67AFCD0A4; Fri, 18 Sep 1998 18:43:03 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36028D97.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980918153438.CTY19225@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 18 Sep 1998 15:34:38 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 18 Sep 1998 15:34:38 +0000
Subject: [GFA] re: is something in the Clipboard ?
X-UIDL: 4ddbefea6fb0f115e224f928bf24c1e8

* List: gfabasic@aachen.linux.de

18/09/98 10:30:14 AM   re: is something in the Clipboard ?

Michael
Have seen something GFA-W, but don't know where, now.  This is from Win31 API.

' Clipboard Manager Functions
Declare Function OpenClipboard Lib "User" (ByVal hWnd As Integer) As Integer
Declare Function CloseClipboard Lib "User" () As Integer
Declare Function GetClipboardOwner Lib "User" () As Integer
Declare Function SetClipboardViewer Lib "User" (ByVal hWnd As Integer) As
Integer
Declare Function GetClipboardViewer Lib "User" () As Integer
Declare Function ChangeClipboardChain Lib "User" (ByVal hWnd As Integer,
ByVal hWndNext As Integer) As Integer
Declare Function SetClipboardData Lib "User" (ByVal wFormat As Integer,
ByVal hMem As Integer) As Integer
Declare Function GetClipboardData Lib "User" (ByVal wFormat As Integer) As
Integer
Declare Function RegisterClipboardFormat Lib "User" (ByVal lpString As
String) As Integer
Declare Function CountClipboardFormats Lib "User" () As Integer
Declare Function EnumClipboardFormats Lib "User" (ByVal wFormat As Integer)
As Integer
Declare Function GetClipboardFormatName Lib "User" (ByVal wFormat As
Integer, ByVal lpString As String, ByVal nMaxCount As Integer) As Integer
Declare Function EmptyClipboard Lib "User" () As Integer
Declare Function IsClipboardFormatAvailable Lib "User" (ByVal wFormat As
Integer) As Integer
Declare Function GetPriorityClipboardFormat Lib "User" (lpPriorityList As
Integer, ByVal nCount As Integer) As Integer

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:48 1998
Return-Path: <buspl@swissonline.ch>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zK5sU-00NGinC>; Fri, 18 Sep 1998 21:07:34 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 2F938D0A5; Fri, 18 Sep 1998 22:15:32 +0200 (CEST)
From: "Beat Werthmller" <buspl@swissonline.ch>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3602BF64.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 18 Sep 1998 21:02:54 +0200
Organization: BUSPL
X-Mailer: Mozilla 4.05 [de] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] cancel
X-UIDL: 48e380356a40ad03caaabe11f8446aa8

* List: gfabasic@aachen.linux.de

Hallo,

i have problems with yours mails (to many and i go for four weeks in the
USA)
can you cancel my name in the list ?

thanks        Beat


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:49 1998
Return-Path: <buspl@swissonline.ch>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zK5tc-00NDMiC>; Fri, 18 Sep 1998 21:08:44 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C07BED095; Fri, 18 Sep 1998 22:15:33 +0200 (CEST)
From: "Beat Werthmller" <buspl@swissonline.ch>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3602BF66.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 18 Sep 1998 21:02:54 +0200
Organization: BUSPL
X-Mailer: Mozilla 4.05 [de] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] cancel
X-UIDL: 1d33689a13d8c6630b75d8432cfebedd

* List: gfabasic@aachen.linux.de

Hallo,

i have problems with yours mails (to many and i go for four weeks in the
USA)
can you cancel my name in the list ?

thanks        Beat


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:56 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zK7CB-00NGjeC>; Fri, 18 Sep 1998 22:31:59 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3B070D0A6; Fri, 18 Sep 1998 23:40:09 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3602D339.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 18 Sep 1998 16:31:00 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] SAVEDC / RESTOREDC
X-UIDL: 22439c3adaa20b60b1bcbee29067e8fe

* List: gfabasic@aachen.linux.de

Here's the latest of my discoveries:   (slightly revised for clarity)

Within a SAVEDC / RESTOREDC constuct, the following GFA graphic commands
are problematic:

     COLOR, RGBCOLOR, DEFLINE, DEFFILL, CLIP.... any GFA-specific
     command which results in the creation of a GDI object handle. 

The reason is that GFA does not process the SAVEDC /  RESTOREDC functions,
but merely passes them to the GDI. The result apparently is that object
handles which
GFA creates internally may not be properly destroyed, or GFA may lose track
of them.

Use of these GFA funcitons within a SAVEDC / RESTOREDC constuct will result
in
a resource leak, and could eventually crash WINDOWS. Use API functions
instead.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:57 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zK7T5-00NGinC>; Fri, 18 Sep 1998 22:49:27 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BE882D0A8; Fri, 18 Sep 1998 23:57:38 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3602D753.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980918204918.SPCX3286@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 18 Sep 1998 20:49:18 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 18 Sep 1998 20:49:18 +0000
Subject: Re: [GFA] cancel
X-UIDL: e42bb1da96ffa5d48caf71173ad5a0fe

* List: gfabasic@aachen.linux.de

to remove yourself from this list, send a message to
gfabasic@aachen.linux.de with "unsubscribe" (without the quotation marks)
in the SUBJECT of the message. Don't add anything else (such as
"un-subscribe"), because the list processor can't recognize that as a
request.

LLaP
bero


At 09:02 PM 18/09/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hallo,
>
>i have problems with yours mails (to many and i go for four weeks in the
>USA)
>can you cancel my name in the list ?
>
>thanks        Beat
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:58 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zK7TI-00NGj7C>; Fri, 18 Sep 1998 22:49:40 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 98FF2D0A9; Fri, 18 Sep 1998 23:57:50 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3602D75E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980918204930.SPFK3286@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 18 Sep 1998 20:49:30 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 18 Sep 1998 20:49:30 +0000
Subject: Re: [GFA] SAVEDC / RESTOREDC
X-UIDL: a6609b4393bbf5c444ee8e226508c393

* List: gfabasic@aachen.linux.de

Brent
Thank you.  By golly, going to know something about all sorts of things
w/o having to undergo weeks of experimentation & frustration.  THANKS!!!
<G>
TomR.


At 04:31 PM 18/09/98 -0400, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Here's the latest of my discoveries:   (slightly revised for clarity)
>
>Within a SAVEDC / RESTOREDC constuct, the following GFA graphic commands
>are problematic:
>
>     COLOR, RGBCOLOR, DEFLINE, DEFFILL, CLIP.... any GFA-specific
>     command which results in the creation of a GDI object handle. 
>
>The reason is that GFA does not process the SAVEDC /  RESTOREDC functions,
>but merely passes them to the GDI. The result apparently is that object
>handles which
>GFA creates internally may not be properly destroyed, or GFA may lose track
>of them.
>
>Use of these GFA funcitons within a SAVEDC / RESTOREDC constuct will result
>in
>a resource leak, and could eventually crash WINDOWS. Use API functions
>instead.
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:19:59 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zK8JH-00NGhPC>; Fri, 18 Sep 1998 23:43:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6197BD0AA; Sat, 19 Sep 1998 00:51:30 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3602E3F6.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19980918214307.UNH29406@LOCALNAME>;
          Fri, 18 Sep 1998 21:43:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Fri, 18 Sep 1998 21:43:07 +0000
Subject: [GFA] Please help, volume label
X-UIDL: 0f83fd4d615b1a8a916ca3bb9cee8640

* List: gfabasic@aachen.linux.de

In the following info from the manual & helpfile, 2 things make no sense 
& there is no clarification to be found.

Please define/explain:
DIM a(44)
~FSETDTA(V:a(0))

The object is to change/assign a disk volume label.
Thanks!
<G>
TomR.


FSETDTA Command

Action:	sets new address for the disk transfer area.

Syntax:	FSETDTA(addr)

addr: address

Explanation:
The functions $4E (FSFIRST=get first file entry) and $4F (FSNEXT=get next
file entry) store the data about found files in the DTA. The first 42 bytes
of the DTA have the following layout:

OFFSET LengthContents
+$0021 bytes reserved
+$15 1 byte  file attributes
+$16 2 bytes time of last modification
+$18 2 bytes date of last modification
+$1A 4 bytes file size
+$1E12 bytes file name and extension only,  
 no pathname


The layout of the attribute byte is as follows

bitmeaning when set
0  write protected file
1  hidden file
2  system file
3  volume label
4  directory
5  archive bit


Example:

DIM a(44)
~FSETDTA(V:a(0))


See Also:	FGETDTA, FSFIRST, FSNEXT


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:20:01 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zKAZb-00NEm3C>; Sat, 19 Sep 1998 02:08:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A3CD7D0AC; Sat, 19 Sep 1998 03:16:31 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360305F0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 18 Sep 1998 17:04:44 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] CTRLTOOL
X-UIDL: b0314f4a468e679a86a12417ca97a489

* List: gfabasic@aachen.linux.de

CTRLTOOL.ZIP from Eberhard Funck has a .PDF help file in Deutch. If you need
an English version I have converted the .PDF to a .RTF and translated it to
English. I would be happy to attach a copy to you at your own email address
if you wish.
I will not attached it to a GFA mail list message!!!
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:20:02 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zKGJh-00NElEC>; Sat, 19 Sep 1998 08:16:21 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 448B7D0AB; Sat, 19 Sep 1998 09:24:33 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36035C31.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 19 Sep 1998 02:15:40 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] wmconst.txt
X-UIDL: b030f070a03f5af16b490482444e5fd1

* List: gfabasic@aachen.linux.de

>>2)  Also, my editor does not recognize the keyword SCROLL.  Does any one
>>else have this problem? ( fortunately the windows equivalent works)


>Since it seems toi me that your question remaina un-answered in public,
.....
>It depends on the version of GFA you use. I used to experience the same
problem
>(SCROLL turned to SCREEN OLL) in the vesion 4.3. The latest version is
4.38,
>and quite naturally, the bug is gone.

My version is 4.38.

The keyword SCROLL , followed by parameters, is turned red in my editor, as
though it is a procedure. So the editor apparenly fails to recognize it as
a keyword at all.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:20:03 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zKGet-00NEm6C>; Sat, 19 Sep 1998 08:38:15 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1E2FAD0AD; Sat, 19 Sep 1998 09:46:29 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36036155.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id IAA03624 for <gfabasic@linux.net.eu.org>; 
          Sat, 19 Sep 1998 08:38:10 +0200 (MET DST)
Date: Sat, 19 Sep 1998 08:38:34 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: SV: [GFA] Help, please - volume label   1509xx1-
X-UIDL: a3b1429d215897b84b76d7f559c0f4a4

* List: gfabasic@aachen.linux.de

Tankyou, Tom.
I will try it!

Sven

----------

* List: gfabasic@aachen.linux.de

FSETDTA(addr)

addr:		address

The functions $4E (FSFIRST=get first file entry) and $4F (FSNEXT=get next
file entry) store the data about found files in the DTA. The first 42 bytes
of the DTA have the following layout:

OFFSET LengthContents
+$0021 bytes reserved
+$15 1 byte  file attributes
+$16 2 bytes time of last modification
+$18 2 bytes date of last modification
+$1A 4 bytes file size
+$1E12 bytes file name and extension only, no pathname


The layout of the attribute byte is as follows

bitmeaning when set
0  write protected file
1  hidden file
2  system file
3  volume label
4  directory
5  archive bit


Example:

DIM a(44)
~FSETDTA(V:a(0))

<F>
TomR.




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:20:04 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zKHAL-00NGh0C>; Sat, 19 Sep 1998 09:10:45 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 91F78D0AE; Sat, 19 Sep 1998 10:18:49 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <360368ED.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id A914F5D0170; Sat, 19 Sep 1998 09:11:16 +0200
Date: Sat, 19 Sep 1998 08:42:23 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] wmconst.txt
X-UIDL: a332046cf1d42ade54f0754e30db31a4

* List: gfabasic@aachen.linux.de

The keyword SCROLL has no meaning in GFAWIN.

Sjouke

-----Original Message-----
From: BDD <BrentDeck@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: zaterdag 19 september 1998 8:17
Subject: Re: [GFA] wmconst.txt


* List: gfabasic@aachen.linux.de

>>2)  Also, my editor does not recognize the keyword SCROLL.  Does any one
>>else have this problem? ( fortunately the windows equivalent works)


>Since it seems toi me that your question remaina un-answered in public,
....
>It depends on the version of GFA you use. I used to experience the same
problem
>(SCROLL turned to SCREEN OLL) in the vesion 4.3. The latest version is
4.38,
>and quite naturally, the bug is gone.

My version is 4.38.

The keyword SCROLL , followed by parameters, is turned red in my editor, as
though it is a procedure. So the editor apparenly fails to recognize it as
a keyword at all.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:20:06 1998
Return-Path: <CompuHelp@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zKIAi-00NEm6C>; Sat, 19 Sep 1998 10:15:12 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1FD61D0AF; Sat, 19 Sep 1998 11:23:25 +0200 (CEST)
From: CompuHelp@t-online.de (CompuHelp@T-Online.de)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3603780D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 19 Sep 98 10:22 +0100
X-Sender: 0675893545-0001@t-online.de
Subject: [GFA] Barcode, help please !!!
X-UIDL: 3e2f58248483d48899d5d9afe767f9c7

* List: gfabasic@aachen.linux.de

Hallo !

Kann mir jemand sagen, wie ich aus GFA-W Barcodes drucken kann ?

Gibt es irgendwo ein Beispiel Listing ?


Hi !

Can someone tell me how to Print a Barcode from GFA-W ?

Is there a listing somewhere ?

CU Ren 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:20:07 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zKIXY-00NEm6C>; Sat, 19 Sep 1998 10:38:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 765C1D0B0; Sat, 19 Sep 1998 11:47:01 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36037D95.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 19 Sep 1998 10:40:26 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Again a Dialog question...
X-UIDL: 4f87e47ee12e7e2e5a82a88552f34b7f

* List: gfabasic@aachen.linux.de


Using a GfA-Program within Win 95, the "close-button" on the top-right
position of the window does not react - at least with my checked events
(Alt-F4, "close" event of system menu, etc.)

What is the correct event which has to be checked ?

- Thanks, Michael

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Sep 20 06:20:11 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zKKSj-00NElEC>; Sat, 19 Sep 1998 12:41:57 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BF7A0D0B1; Sat, 19 Sep 1998 13:50:09 +0200 (CEST)
From: "SVEN KUMLIN" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36039A71.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id MAA18132 for <gfabasic@linux.net.eu.org>; 
          Sat, 19 Sep 1998 12:41:42 +0200 (MET DST)
Date: Sat, 19 Sep 1998 12:42:36 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: [GFA] wmconst.txt
X-UIDL: 9487f7761c8c8642bf890c0ddcc6b1e7

* List: gfabasic@aachen.linux.de

But why the SCROLL command exist in the GFA manual (page 333)?

Sven

----------
> Frn: Sjouke Hamstra <shamstra@gelrevision.nl>
> Till: gfabasic@aachen.linux.de
> mne: Re: [GFA] wmconst.txt
> Datum:  den 19 september 1998 08:42
> 
> * List: gfabasic@aachen.linux.de
> 
> The keyword SCROLL has no meaning in GFAWIN.
> 
> Sjouke
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 06 02:22:37 1998
Return-Path: <CompuHelp@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQ5H9-00NDMiC>; Mon, 5 Oct 1998 09:41:47 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D324FD074; Mon,  5 Oct 1998 10:50:03 +0200 (CEST)
From: CompuHelp@t-online.de (CompuHelp@T-Online.de)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3618883C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 5 Oct 98 09:44 +0100
X-Sender: 0675893545-0001@t-online.de
Subject: [GFA] Mailing Liste
X-UIDL: 8839a1909c6c47f11c5c2c6168f66426

* List: gfabasic@aachen.linux.de

Hi !!!

The last two weeks I dont recieved any E-Mail from the Mailing List !!!

Is there a problem ?

CU Ren

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 06 02:22:38 1998
Return-Path: <linux@microsoft.sucks.eu.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQ8Fd-00NIkWC>; Mon, 5 Oct 1998 12:52:25 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B0CFBD066; Mon,  5 Oct 1998 14:00:44 +0200 (CEST)
From: Bernhard Rosenkraenzer <linux@microsoft.sucks.eu.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3618B4EC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 5 Oct 1998 11:54:55 +0200 (CEST)
X-Sender: linux@k6.bero
In-Reply-To: <3618883C.BeroList-2.5.8@aachen.linux.de>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=iso-8859-1

Subject: Re: [GFA] Mailing Liste
X-UIDL: 9a2c02fe24ca32becf5aa34273a8b4c6

* List: gfabasic@aachen.linux.de

On Mon, 5 Oct 1998, CompuHelp@T-Online.de wrote:

> * List: gfabasic@aachen.linux.de
> 
> Hi !!!
> 
> The last two weeks I dont recieved any E-Mail from the Mailing List !!!
> 
> Is there a problem ?

More precisely, there WAS a problem - the mail server program crashed
while I was on vacation.
Something strange by the way - I've been using the current VMailer beta
version for 7 months without any problems, but as soon as I'm not there to
do anything about it, it crashes. (Luckily enough, it didn't take anything
else with it. Good thing I'm not running Windoze!)
It's fixed now.

LLaP
bero

-- 
Windows 98 supports real multitasking - it can boot and crash simultaneously.
***
Anyone sending unwanted advertising e-mail to this address will be charged
$25 for network traffic and computing time. By extracting my address from
this message or its header, you agree to these terms.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 06 02:22:40 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQBw8-00NIjvC>; Mon, 5 Oct 1998 16:48:32 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 74DF9D06B; Mon,  5 Oct 1998 17:55:20 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3618EBED.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 5 Oct 1998 07:42:33 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Mailing Liste
X-UIDL: 83fa0ae8f3ed1faa441fdf04b79efd5a

* List: gfabasic@aachen.linux.de

Thanks goodness,
I have been having some terrible withdrawal pains(G)
Thanks Brenhard,
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Bernhard Rosenkraenzer <linux@microsoft.sucks.eu.org>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Monday, October 05, 1998 3:53 AM
Subject: Re: [GFA] Mailing Liste


* List: gfabasic@aachen.linux.de

On Mon, 5 Oct 1998, CompuHelp@T-Online.de wrote:

> * List: gfabasic@aachen.linux.de
>
> Hi !!!
>
> The last two weeks I dont recieved any E-Mail from the Mailing List !!!
>
> Is there a problem ?

More precisely, there WAS a problem - the mail server program crashed
while I was on vacation.
Something strange by the way - I've been using the current VMailer beta
version for 7 months without any problems, but as soon as I'm not there to
do anything about it, it crashes. (Luckily enough, it didn't take anything
else with it. Good thing I'm not running Windoze!)
It's fixed now.

LLaP
bero

--
Windows 98 supports real multitasking - it can boot and crash
simultaneously.
***
Anyone sending unwanted advertising e-mail to this address will be charged
$25 for network traffic and computing time. By extracting my address from
this message or its header, you agree to these terms.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 06 02:22:44 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQDav-00NIjkC>; Mon, 5 Oct 1998 18:34:45 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 131E3D066; Mon,  5 Oct 1998 19:43:07 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3619052B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 5 Oct 1998 11:33:27 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 8bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <3618883C.BeroList-2.5.8@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Mailing Liste
X-UIDL: 8e37d9f187b2467e4d18b9045ae1e5cf

* List: gfabasic@aachen.linux.de

Hi Ren!

> The last two weeks I dont recieved any E-Mail from the
> Mailing List !!!
So wie es aussieht hat sich der Server verabschiedet ... :-(

Gre
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 06 02:22:48 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQFoy-00NIjiC>; Mon, 5 Oct 1998 20:57:24 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id DFAA8D066; Mon,  5 Oct 1998 22:05:46 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3619269C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 5 Oct 1998 11:52:40 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] News Letter
X-UIDL: a7a04b0cc4ce5c26c728bb96c46bd05b

* List: gfabasic@aachen.linux.de

If I ever get the software working I am planning on sending a weekly GFA
news letter to all who want it. I have a list of GFA programmers set up. If
you want your name on the list please send email to
adbryant@msn.com

I will check and see if you are already in the list. If not I will add your
name.
Please supply your email address.
Dale Bryant


http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 06 02:22:49 1998
Return-Path: <0592135705@nwn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQGVk-00NIlaC>; Mon, 5 Oct 1998 21:41:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A085ED073; Mon,  5 Oct 1998 22:49:51 +0200 (CEST)
From: "Karl-Heinz Groene" <0592135705@nwn.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361930EF.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 5 Oct 1998 21:38:06 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] How to useSetpriorityclass?
X-UIDL: aa05ec911df58fb641e4894dc4d338f9

* List: gfabasic@aachen.linux.de

It's hard to believe what Windows 95b-98 is doing to my old
animation-routines on
fast Intel II PCs.

I used mostly Stretch and Bitblt  --  worked fine and fast under Windows 95a
Now I'm looking for GFA-Win Code-Routines to control the priority of
processes
or threads in Win95a/95b/98.


Many thanks in advance

Kalle Groene    0592135705@NWN.de




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 06 11:45:51 1998
Return-Path: <CompuHelp@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQS2J-00NGrvC>; Tue, 6 Oct 1998 09:59:59 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D12D4D066; Tue,  6 Oct 1998 11:08:24 +0200 (CEST)
From: CompuHelp@t-online.de (CompuHelp@T-Online.de)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3619DE09.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 6 Oct 98 10:04 +0100
X-Sender: 0675893545-0001@t-online.de
Subject: [GFA] Barcode
X-UIDL: c9744eeee9c4e2c17f3701fae5540318

* List: gfabasic@aachen.linux.de

Hi !

Can someone tell me how to Print a Barcode from GFA-W ?

Is there a listing somewhere ?


Hallo !

Kann mir jemand sagen, wie ich aus GFA-W Barcodes drucken kann ?

Gibt es irgendwo ein Beispiel Listing ?


CU Ren 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 07 02:04:50 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQSmX-00NIKuC>; Tue, 6 Oct 1998 10:47:45 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 18387D066; Tue,  6 Oct 1998 11:56:02 +0200 (CEST)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3619E936.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Tue, 06 Oct 1998 11:44:53 +0000
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Re: small game "Eremit" for fun
X-UIDL: 4415cc513f8761714f93f6ea1e2ea3ee

* List: gfabasic@aachen.linux.de

The yesterday posted game has a bug (sorry):

In procedure HighScoreList the program tries to open
and read in the configuration file. If the file does
not exist You get an runtime error.

You have to add:	IF EXIST(CONFIGFILE$)
As a result the listing bust be:

IF EXIST(CONFIGFILE$)
  OPEN "i",#1,CONFIGFILE$ 'now read in the high score list
  DO UNTIL EOF(#1)
    LINE INPUT #1,Buffer$ 'get one line from the file
    IF LEFT$(Buffer$,3)=@CheckSum$(MID$(Buffer$,4)) 'add only to the list box if the check sum is correct
      ~SendMessage(hList&,LB_ADDSTRING,0,MID$(Buffer$,4))
    ENDIF
  LOOP
  CLOSE #1
ENDIF

O.K., I hope it was the only error ;-)
Bye, Roland


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 07 02:04:57 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQaO3-00NIn0C>; Tue, 6 Oct 1998 18:54:59 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1DE3FD066; Tue,  6 Oct 1998 20:03:20 +0200 (CEST)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361A5B68.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Tue, 06 Oct 1998 19:15:38 +0000
In-Reply-To: <35FFA8D5.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Content-Transfer-Encoding: 8bit
Subject: [GFA] Get volume label by Interrupt
X-UIDL: b1b4cb97aaab7ecdbe6d5210f9445b78

* List: gfabasic@aachen.linux.de

Here is an other way to get the volume label.
I would say FGETDTA is better - but may there is
anybody who don't hates interrupts  :-))))))


'Get the volume label by using BIOS interrupt function ReadSector INTR($13,_AH=$02)
'  Roland Walter, Schnhauser Allee 64, D-10437 Berlin; October 1998
'More information see Ralf Brown's Interrupt list (you will find it in Internet)
'
Drive|=1  '1=A:, 2=B: (use for floppy only)
~INTR($21,_AH=$30,_AL=$0) 'get DOS version
IF _AL>6 THEN W95!=TRUE 'MS-DOS 7.0 (Windows 95) - we have to lock the volume before direct read/write
IF W95!=TRUE
  ~INTR($21,_AX=$440D,_CX=$084A,_BL=Drive|,_BH=0,_DX =%000) 'level 0 volume lock to get only rights
  ~INTR($21,_AX=$440D,_CX=$084A,_BL=Drive|,_BH=0,_DX =%100) 'second level 0 volume lock for formatting
ENDIF
Buffer$=STRING$(512,0) 'receives the sector 0 (the boot sector)
~INTR($13,_AH=$02,_DL=Drive|,_AL=1,_CH=0,_CL=0,_DH=0,_BX=LOWORD(V:Buffer$),_ES=HIWORD(V:Buffer$))
IF W95!=TRUE
  ~INTR($21,_AX = $440D,_CX=$086A,_BL=Drive|) 'decrease volume lock level
  ~INTR($21,_AX = $440D,_CX=$086A,_BL=Drive|) 'unlock volume
ENDIF
'The volume label begins at byte 43 of the boot sector and has a size of 11 characters (rest filled with spaces)
'More information  list wich You can find in Internet (also as Windows help file)
Label$=PEEK$(V:Buffer$+43,11)
~MessageBox(0,"-"+Label$+"-","Label of drive "+CHR$(Drive|+64)+":",0)


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 07 02:05:02 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQaau-00NIkLC>; Tue, 6 Oct 1998 19:08:16 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 37E8FD075; Tue,  6 Oct 1998 20:16:30 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361A5E82.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 6 Oct 1998 17:16:47 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Bitmaps...
X-UIDL: 0548209ff328e960685986d1f223c01f

* List: gfabasic@aachen.linux.de

I've (again) problems....

* I'd like to save a bitmap (drawn in a truecolor-environment window)
with an optimized palette with 256 colors.

Reason: If I save a desktop background with true-color, it has a size of
more than 2 Megabyte !
Try: Savebmp procedure of gfa examples, it saves 256-color bitmaps, but
only with the standard color palette (iiiih)



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 07 02:05:11 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQd10-00NIoTC>; Tue, 6 Oct 1998 21:43:22 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 98E4FD06B; Tue,  6 Oct 1998 22:51:42 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361A82DE.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 6 Oct 1998 09:18:36 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] LostFocus-Event
X-UIDL: b50842a88af017bc18317c996e3d8679

* List: gfabasic@aachen.linux.de

Hi!

Do anyone know a method to ask for the "LostFocus-event" like in VB?

I have difficulties in using the KILLFOCUS-Message, because there is no
message send if you jump from one EDIT-Control to another or to an COMBOBOX,
it only works, if the next item will be a BUTTON.

Many thanks in advance
Yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 07 12:17:35 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQhBd-00NIoPC>; Wed, 7 Oct 1998 02:10:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BA416D06B; Wed,  7 Oct 1998 03:19:03 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361AC188.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 6 Oct 1998 17:05:58 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] GFA.NET
X-UIDL: 3037dfd8c5f967eff6ff6864a0264a39

* List: gfabasic@aachen.linux.de

Does anyone know what is going on with the GFA.NET. I haven't been able to
access it for three days. It seems like they have a lot of problems.
dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 07 22:52:12 1998
Return-Path: <webmaestro@web-evolution.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQv6I-00NIndC>; Wed, 7 Oct 1998 17:02:02 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BB477D06B; Wed,  7 Oct 1998 18:10:24 +0200 (CEST)
From: WebMaestro <webmaestro@web-evolution.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361B9270.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
     Wed, 07 Oct 98 11:01:39 -0400
Date: Wed, 07 Oct 1998 11:02:14 -0400
Organization: Web volution
X-Mailer: Mozilla 4.06 [en] (Win95; I)
MIME-Version: 1.0
References: <3619269C.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] GFA and CGI
X-UIDL: afb51696cc04d62f43b3121dae61a788

* List: gfabasic@aachen.linux.de

    Does anyone know how to handle CGI in GFA basic?

--
 . . Web Evolution / neurotica dot org
 . . Email:  webmaestro@web-evolution.com
 . . Web Site:
 . .     http://www.web-evolution.com
 . .     http://www.neurotica.org
 . . IRC Dalnet: John-Drake



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 07 22:52:16 1998
Return-Path: <key-j@bre.WinNET.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQxhV-00NIZSC>; Wed, 7 Oct 1998 19:48:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B8A00D073; Wed,  7 Oct 1998 20:57:03 +0200 (CEST)
From: Sven Thierfelder <key-j@bre.WinNET.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361BB97F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 07 Oct 1998 19:46:36 +0200
X-Mailer: Mozilla 4.03 [de] (Win95; I)
MIME-Version: 1.0
References: <361A82DE.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] LostFocus-Event
X-UIDL: 154361fe05ec118c83519488783a79d4

* List: gfabasic@aachen.linux.de



Thomas Gonschor schrieb:

> * List: gfabasic@aachen.linux.de
>
> Hi!
>
> Do anyone know a method to ask for the "LostFocus-event" like in VB?
>
> I have difficulties in using the KILLFOCUS-Message, because there is no
> message send if you jump from one EDIT-Control to another or to an COMBOBOX,
> it only works, if the next item will be a BUTTON.
>
> Many thanks in advance
> Yours
>
> Thomas
>

Hi Thomas

Try the notification-codes like
IF MENU(11)=WM_COMMAND AND HIWORD(MENU(13)) = EN_KILLFOCUS THEN ... for edittext
(or CBN_KILLFOCUS, LBN_KILLFOCUS for the other controls)

> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 07 22:52:17 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zQyTs-00NIopC>; Wed, 7 Oct 1998 20:38:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 32EF7D074; Wed,  7 Oct 1998 21:46:56 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361BC533.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981007183719.JNFR22015@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 7 Oct 1998 18:37:19 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 7 Oct 1998 18:37:19 +0000
Subject: [GFA] help w/ "clock"
X-UIDL: 76a552a344e759898296e0a4f6cecf4b

* List: gfabasic@aachen.linux.de

Is there a simple method (as reading processor registers) to determine
the clock of a processor/computer?

e.g.: this is a P-100 - how can I read the "100 MHz"?  I'm able to find
most of the system information, but this one escapes me.

Thanks.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 02:16:29 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zR8WU-00NEl7C>; Thu, 8 Oct 1998 07:21:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id AD2B4D077; Thu,  8 Oct 1998 08:30:20 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361C5C01.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 8 Oct 1998 07:23:29 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] help w/ "clock"
X-UIDL: a25b721ec3f2634fd3921e7c959afb18

* List: gfabasic@aachen.linux.de

Can't be done, even Norton failed doing so in godd old times (Norton
System Information) - the reason is simple: Intel does not know, if
produced CPUs are stable enoough in certain speeds, so they "get" their
speed after some speed checks and therefore Intel puts no hardcoded
information into the chip...

- Michael

PS.: Who heard already about a takeover of 3Com by Intel ?

>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Mittwoch, 07. Oktober 1998 19:37
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] help w/ "clock"
>
>* List: gfabasic@aachen.linux.de
>
>Is there a simple method (as reading processor registers) to determine
>the clock of a processor/computer?
>
>e.g.: this is a P-100 - how can I read the "100 MHz"?  I'm able to find
>most of the system information, but this one escapes me.
>
>Thanks.
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 02:16:30 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zREZa-00NElqC>; Thu, 8 Oct 1998 13:49:34 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BDF6ED07A; Thu,  8 Oct 1998 14:57:52 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361CB6D0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981008114919.BCHE17049@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 8 Oct 1998 11:49:19 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 8 Oct 1998 11:49:19 +0000
Subject: Re: AW: [GFA] help w/ "clock"
X-UIDL: af7fec93019808e9a6b1d2745dffcb54

* List: gfabasic@aachen.linux.de

Michael

Thanks.  Ever heard the expression "Dirty Birds"?  I suppose there must
be *somewhere* one can find the clock to attempt to "guess" it?

Sorry, but I haven't heard anything about a takeover.
<G>
TomR.



At 07:23 AM 08/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Can't be done, even Norton failed doing so in godd old times (Norton
>System Information) - the reason is simple: Intel does not know, if
>produced CPUs are stable enoough in certain speeds, so they "get" their
>speed after some speed checks and therefore Intel puts no hardcoded
>information into the chip...
>
>- Michael
>
>PS.: Who heard already about a takeover of 3Com by Intel ?
>
>>----------
>>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>>Gesendet: 	Mittwoch, 07. Oktober 1998 19:37
>>An: 	gfabasic@aachen.linux.de
>>Betreff: 	[GFA] help w/ "clock"
>>
>>* List: gfabasic@aachen.linux.de
>>
>>Is there a simple method (as reading processor registers) to determine
>>the clock of a processor/computer?
>>
>>e.g.: this is a P-100 - how can I read the "100 MHz"?  I'm able to find
>>most of the system information, but this one escapes me.
>>
>>Thanks.
>><G>
>>TomR.
>>
>>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 02:16:33 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRGZb-00NIn1C>; Thu, 8 Oct 1998 15:57:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D951ED07B; Thu,  8 Oct 1998 17:06:08 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361CD4E1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 8 Oct 1998 15:59:19 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: AW: [GFA] help w/ "clock"
X-UIDL: 4de0e72690fd3927a634341aa6788f34

* List: gfabasic@aachen.linux.de

Dirty bird ?

hhhm. my name is "Vogel", which is the german word for 'bird' (don't
think you knew that ;-)


Guessing in Windows is not so easy - the good old interrupts checking
the timer are making big troubles, doing some loops with arithmetic
operations produces "strange" results when using non-Intel CPUs.

A not totally serious approach...

a% = 8
b% = 9
c% = 7
i% = 95555
t% = TIMER
DO
  i% --
  n% = a% * b% DIV c%
LOOP UNTIL i% = 0
x% = TIMER - t%
PRINT 400 - x%'"MHz ?"

>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Donnerstag, 08. Oktober 1998 12:49
>An: 	gfabasic@aachen.linux.de
>Betreff: 	Re: AW: [GFA] help w/ "clock"
>
>* List: gfabasic@aachen.linux.de
>
>Michael
>
>Thanks.  Ever heard the expression "Dirty Birds"?  I suppose there must
>be *somewhere* one can find the clock to attempt to "guess" it?
>
>Sorry, but I haven't heard anything about a takeover.
><G>
>TomR.
>
>
>
>At 07:23 AM 08/10/98 +0200, you wrote:
>>* List: gfabasic@aachen.linux.de
>>
>>Can't be done, even Norton failed doing so in godd old times (Norton
>>System Information) - the reason is simple: Intel does not know, if
>>produced CPUs are stable enoough in certain speeds, so they "get" their
>>speed after some speed checks and therefore Intel puts no hardcoded
>>information into the chip...
>>
>>- Michael
>>
>>PS.: Who heard already about a takeover of 3Com by Intel ?
>>
>>>----------
>>>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>>>Gesendet: 	Mittwoch, 07. Oktober 1998 19:37
>>>An: 	gfabasic@aachen.linux.de
>>>Betreff: 	[GFA] help w/ "clock"
>>>
>>>* List: gfabasic@aachen.linux.de
>>>
>>>Is there a simple method (as reading processor registers) to determine
>>>the clock of a processor/computer?
>>>
>>>e.g.: this is a P-100 - how can I read the "100 MHz"?  I'm able to find
>>>most of the system information, but this one escapes me.
>>>
>>>Thanks.
>>><G>
>>>TomR.
>>>
>>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 02:16:37 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRJgL-00NGb4C>; Thu, 8 Oct 1998 19:16:53 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 617C4D06B; Thu,  8 Oct 1998 20:25:37 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361D03A1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981008171647.GBHZ17049@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 8 Oct 1998 17:16:47 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 8 Oct 1998 17:16:47 +0000
Subject: Re: AW: AW: [GFA] help w/ "clock"
X-UIDL: 7e2f7293e5801eff37977b95d9c6c2ff

* List: gfabasic@aachen.linux.de

Ha!  Wouldn't you know it!  Haven't had any exercize w/ German since 
before 1950, so is like a "new" language to me.

"dirty bird" is an expression with several related meanings.  None are
really deroggatory, but not really flattering, either.  In general, it
means the pulling of a trick on somebody that leaves them disappointed.

In this case, a tidbit of info that isn't available while tons of info
are.  The manuals for GFA-W have a lot of information in them, but the
indice are "dirty birds" - one must already _know_ what something is 
called to be able to look for it.  I often search futilly for something
& later run across it, discovering that it is called something I didn't
imagine when looking for it.

I used to review/modify docs for a young German programmer - I was always
having to explain expressions in simple English.  Some actually turned out
to have German counterparts that *almost* followed the translations.

My question about "how many motorcycles is the clock"... I don't often ask
about things "normal"... I wanted to include the clock in a sysinfo program
I'm working on & would have thought it would be available without a lot of
effort.  I'll give your formula a try - thank you very much.
<G>
TomR.



At 03:59 PM 08/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Dirty bird ?
>
>hhhm. my name is "Vogel", which is the german word for 'bird' (don't
>think you knew that ;-)
>
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:30 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRVLI-00NGrqC>; Fri, 9 Oct 1998 07:43:56 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8A2C2D06B; Fri,  9 Oct 1998 08:52:38 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DB2B8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 07:45:43 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] help w/ "clock"
X-UIDL: 9aea9f97d3d15e56d06b6bfb548bf253

* List: gfabasic@aachen.linux.de

Hi,
if you really try the code, keep in mind that it was just a test with
the interpreter. The compiled code is (surprise) faster, so some values
have to be changed. It seems also for me, that there is no linear change
in the delay of the test routine when using on CPUs with different speed
(but I don't have to many PCs for testing), so an interpolation must be
done. For doing this, a lot of values have to be collected to find an
appropiate function...
- Michael


// Compiler
i% = 375000

// Interpreter
i% = 100000

a% = 3
b% = 5
c% = 7

t% = TIMER
DO
  r% = a% * b% - c% \ a%
  i% --
LOOP UNTIL i% = 0

x% = TIMER - t%

// x% is around 275 on my PC with 150 MHz

x% = 25000 \ (x% ^ .91) // ... to be adapted...
MESSAGE "Your CPU is running at a speed of " + STR$(x%) + " MHz","(c)
vo@schoeller.at",MB_YES | MB_ICONINFORMATION,i&


>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:31 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRVMH-00NGqTC>; Fri, 9 Oct 1998 07:44:57 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6AD00D074; Fri,  9 Oct 1998 08:53:39 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DB2F3.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 07:46:50 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Color-Functions...
X-UIDL: e7859eb68c12e575a7fa071f5a5182e4

* List: gfabasic@aachen.linux.de

// This code...

OPENW #1,0,0,0,0,0
FULLW #1
hBACK& = LOADBMP("C:\win\fliesen.bmp")

PUT 0,0,hBACK&

FOR x& = 0 TO 199
  FOR y& = 0 TO 199
    PSET x&,y&,POINT(x&,y&)
  NEXT y&
NEXT x&

// Produces a yellow rectangle.
// Why ?


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:32 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRVMz-00NGj7C>; Fri, 9 Oct 1998 07:45:41 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B36B0D07A; Fri,  9 Oct 1998 08:54:22 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DB31E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 07:47:33 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Saving Bitmaps with 16/256 Colors ?
X-UIDL: 3a36aa996da20617ffb0faa6539c54ca

* List: gfabasic@aachen.linux.de

Colors are a mystery...

I'd like to save a bitmap as an background for the desktop. This works
with te example of savebmp. But I am using some special colors, produced
by including two 256 color bitmaps (In total, I have less than 256
different colors).
When I save it with 24 Bit depth, the result is ok, but then has a size
of 2.3 MByte !
When I am using 3 Bit or 8 Bit depth (16/256 colors), a standard palette
is used and the result is bad.

In the meantime, I tried to create a bitmap with 16/256 colors to
manipulate the palette before saving, but I am to silly for doing that.


---
picture& = LOADBMP("c:\temp\256color.bmp")

hmdc& = MEMDC(_DC(1))
hmono& = CreateBitmap(100,100,1,8,0)			// Does NOT work
'hmono& = CreateCompatibleBitmap(_DC(1),100,100) 	// Works, but has
"True-Color"
hnull& = SelectObject(hmdc&,hmono&)

SETDC hmdc&
put 0,0,picture&

setdc _dc(1)
put 0,0,hmono&
---

Can anyone help to use an optimized palette for saving a picture with
less colors ?




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:34 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRVO2-00NGj7C>; Fri, 9 Oct 1998 07:46:46 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 32FE5D07D; Fri,  9 Oct 1998 08:55:30 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DB362.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 07:48:38 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] Scrollbars in disabled Edit-Fields...
X-UIDL: e4e69d0552d21f4a65470b5f02974cbf

* List: gfabasic@aachen.linux.de

//Question 1
// Is it possible to do the anti-flickering procedure in an easier way
???

// Question 2
// Is it possible to scroll through the contents of the Multiline field
without
// allowing to edit the field (display only)

// I tried a "READONLY" flag ($800), "Disablew" and other things, but
failed.


antiflicker& = TRUE

Main
> PROCEDURE Main
  DIM WindRect&(3)
  FOR i& = 1 TO 10
    x$ = x$ + "Line..." + STR$(i&) + CHR$(13) + CHR$(10)
  NEXT i&

  opt_3d& = TRUE
  IF opt_3d&
    DLG 3D ON
  ENDIF

  DIALOG #10,10,10,580,454,"Mikes endless questionbox",WS_SYSMENU |
DS_MODALFRAME,16,"Helv"
    IF antiflicker& THEN CB DLG(10) WM_PAINT TO WM_PAINT AntiFlicker()

    CONTROL copyr$,999,"static",SS_RIGHT,120,10,425,16
    Embossed(800,18,217,532,2,4) // CONTROL
"",800,"static",$10000007,18,210,532,2
    CONTROL "&Volltext:",924,"static",SS_LEFT,20,259,65,22
    IF TRUE
      dummy% = WS_VSCROLL
    ELSE
      dummy% = ES_AUTOVSCROLL
    ENDIF
    CONTROL "", 111, "edit", $800 |  WS_BORDER | WS_TABSTOP | WS_CHILD |
ES_MULTILINE | dummy%, 86, 257, 461, 113

    Embossed(800,18,378,532,2,4) // CONTROL
"",800,"static",$10000007,18,372,532,2

    buttonx("&Ende"  ,1, 20,390,66,28)
    buttonx("  &<  " ,13,256,390,50,28)

    CONTROL "",840,"static",$10000006,0,0,0,0

  ENDDIALOG
  _WIN$(DLG(10,111)) = x$
  DLG FILL 10,RGB(192,192,192)

  quit& = 0

  pos& = 0

  SETTIMER DLG(10),1,200
  DISABLEW DLG(10,111)

  SHOWDIALOG #10

  DO

    GETEVENT
    SELECT _Mess

    CASE WM_SYSCOMMAND                          // ------------------ //
      SELECT _wParam
      CASE SC_CLOSE                             // Schlieen
        quit& = 1
      ENDSELECT

    CASE WM_COMMAND                             // ------------------ //

      SELECT _wParam
      CASE IDOK //,IDCANCEL                  // Default Enter, Esc ?
        quit& = 1

      CASE 13                                   // "<" Knopf
        pos& = 0
        DialogLoad

      ENDSELECT
    CASE WM_TIMER

      IF pos& < 530 THEN pos& += 5
      DialogLoad

    ENDSELECT
  LOOP UNTIL quit&

  KILLTIMER DLG(10),1
  CLOSEDIALOG #10

  IF opt_3d&
    DLG 3D OFF
  ENDIF

RETURN
> PROCEDURE AntiFlicker(handle&,Mess&,wParam&,lParam%)
  TRY  // Eliminiert Flackern des Scrollpnktchens (vgl. DialogLoad)
    ~GetUpdateRect(handle&,V:WindRect&(0),Mess&) ' Mess& statt dummy
    IF (WindRect&(1) = 376) AND (WindRect&(3) = 383)
      BEGINPAINT handle&,paint$
      ENDPAINT handle&,paint$
      RETVAL 0                    //// schaltet Redraw ab ////
    ENDIF
  CATCH
RETURN
> PROCEDURE DialogLoad
  i& = pos& + 18
  ~MoveWindow(DLG(10,840),i&,376,5,7,TRUE)      '  ...und malen

  'WindRect&(0) = 2                             '  ist nicht notwendig,
da
  'WindRect&(1) = 376                           '  376/383 durch
Knopfgre
  'WindRect&(2) = 530                           '  vordefiniert ist
(wird in
  'WindRect&(3) = 383                           '  MainPaint abgefragt)
  '~InvalidateRect(DLG(10),V:WindRect&(0),FALSE)
RETURN

> PROCEDURE Embossed(id&,x&,y&,w&,h&,mode&)
  IF opt_3d&
    CONTROL "",id&,"static",mode&,x&,y&,w&,h&
  ELSE
    CONTROL "",id& + 2,"static",mode&,x&,y&,w&,h&
    CONTROL "",id& + 1,"static",10 - mode&,x& + 1,y& + 1,w& - 1 ,h& - 1
    CONTROL "",id&,"static",0,x& + 1,y& + 1,w& - 2,h& - 2
  ENDIF
RETURN

PROCEDURE buttonx(text$,nr&,x&,y&,w&,h&)
  CONTROL text$,nr&,"button",$10010000,x&,y&,w&,h&
RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:35 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRVRg-00NGj7C>; Fri, 9 Oct 1998 07:50:32 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0229ED06B; Fri,  9 Oct 1998 08:59:17 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DB445.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 07:52:27 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Screensaver question...
X-UIDL: 988de629e1e602353b69a61b8fd300ec

* List: gfabasic@aachen.linux.de

Hi,

I'd try to copy the actual screen into a bitmap and then on the screen
WITHOUT any blinking/flickering effects. But there is ALWAYS a (very
short) moment where the screen will be filled with white color (during
the Bitblt transfer from the saved desktop bitmap to the screen).

Has anyone solved this ?
- Michael

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:36 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRVT9-00NGrqC>; Fri, 9 Oct 1998 07:52:03 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E07B5D06B; Fri,  9 Oct 1998 09:00:47 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DB4A0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 07:53:57 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] Callback for changing colors...
X-UIDL: 43ce8e13bf8389090207375cca5b3e84

* List: gfabasic@aachen.linux.de

When I am using Callback-Procedures with "new" ideas, some strange
things can happen...
I'd like to build colored text, bitmaps, lines and more within an
dialog. Everything seems to work, but more and more memory seems to be
allocated and so my routine crashes (sometimes) after a while.
It must have to do something with SelectObject or CreatePen, if I delete
these Lines, it works "for hours" without any problem.
Has anyone done such a job already ?


TYPE CBl:
- WORD ctltype
- WORD ctlid
- WORD itemid
- WORD itemaction
- WORD itemstate
- WORD hwnditem
- WORD hdc
- WORD rcitemleft
- WORD rcitemtop
- WORD rcitemright
- WORD rcitembottom
- LONG itemdata
ENDTYPE

DIM Rechteck&(4),bitmap&(9)

DIALOG #10,10,10,530,440,copyr$,WS_SYSMENU | DS_MODALFRAME,12,"Helv"
  FOR i& = 1 TO 12
    CONTROL "", 100 + i&,"button",WS_DISABLED | BS_OWNERDRAW, 66, 16 +
i& * 20,200,18
    CONTROL "", 200 + i&,"button",WS_DISABLED | BS_OWNERDRAW, 300, 16 +
i& * 20,200,18
  NEXT i&
  CONTROL "Mail:",902,"static",SS_LEFT, 20, 58, 30,18
  CONTROL "Name:",902,"static",SS_LEFT, 20, 38, 30,18
  CONTROL "Company:",902,"static",SS_LEFT, 20, 78, 30,18
  CONTROL "...",902,"static",SS_LEFT, 20, 98, 30,18
  CONTROL "", 302, "static", SS_CENTER,270, 56,26,18

  BUTTON STR$(bitmap&(3)),777,267,8,32,16,WS_DISABLED | BS_OWNERDRAW
  BUTTON STR$(bitmap&(3)),778,234,8,32,16,WS_DISABLED | BS_OWNERDRAW

ENDDIALOG
DLG FILL 10,RGB(192,192,192)
SHOWDIALOG #10
CB DLG(10),WM_DRAWITEM,CBDIalog()

DO
  GETEVENT

  IF _Mess = WM_CHAR
    IF _wParam > 32 THEN END
    FOR i& = 1 TO 12
      _WIN$(DLG(10,100 + i&)) = ":New Text " + STR$(RANDOM(6))
      _WIN$(DLG(10,200 + i&)) = ":New Text " + STR$(RANDOM(2) + 4)
      ~GetClientRect(DLG(10,100 + i&),V:Rechteck&(0))
      ~InvalidateRect(DLG(10,100 + i&),V:Rechteck&(0),FALSE)
      ~GetClientRect(DLG(10,200 + i&),V:Rechteck&(0))
      ~InvalidateRect(DLG(10,200 + i&),V:Rechteck&(0),FALSE)
    NEXT i&
  ENDIF
LOOP


PROCEDURE CBDIalog(CBh&,CBm&,CBw&,CBl%)
  LOCAL tapen&,text$

  IF CBm& = WM_DRAWITEM

    text$ = _WIN$(DLGITEM(10,{CBl%}.ctlid))

    SWITCH {CBl%}.ctlid
    CASE 101 TO 112, 201 TO 212
      '
      tapen& = {CBl%}.ctlid MOD 100 + 100
      IF _WIN$(DLGITEM(10,tapen&)) = _WIN$(DLGITEM(10,tapen& + 100))
        tapen& = CreateSolidBrush(RGB(240,240,240))
      ELSE
        tapen& = CreateSolidBrush(RGB(240,240,160))
      ENDIF

      '~SelectObject({CBl%}.hdc,tapen&)
      ~FillRect({CBl%}.hdc,CBl% + 14,tapen&)
      ~DeleteObject(tapen&)

      tapen& = CreatePen(PS_SOLID,1,RGB(128,128,128))
      '~SelectObject({CBl%}.hdc,tapen&)
      ~MoveTo({CBl%}.hdc,{CBl%}.rcitemleft,{CBl%}.rcitembottom)
      ~LineTo({CBl%}.hdc,{CBl%}.rcitemleft,{CBl%}.rcitemtop)
      ~LineTo({CBl%}.hdc,PRED({CBl%}.rcitemright),{CBl%}.rcitemtop)
      ~DeleteObject(tapen&)

      // IF THE FOLLOWING LINES WILL BE "UN-REM'D" THE PROBLEM
APPEARS...
      'tapen& = GetStockObject(WHITE_PEN)
      '~SelectObject({CBl%}.hdc,tapen&)
      '~LineTo({CBl%}.hdc,PRED({CBl%}.rcitemright),PRED({CBl%}.rcitembot
tom))
      '~LineTo({CBl%}.hdc,PRED({CBl%}.rcitemleft),PRED({CBl%}.rcitembott
om))
      '~SetBkColor({CBl%}.hdc,RGB(192,192,192))
      '~SetTextColor({CBl%}.hdc,RGB(0,0,0))
      '~SelectObject({CBl%}.hdc,fnt1&) //GetStockObject(SYSTEM_FONT)

      ~GetClientRect({CBl%}.hwnditem,V:Rechteck&(0))
      Rechteck&(0) += 2
      Rechteck&(1) += 2
      Rechteck&(2) -= 4
      Rechteck&(3) -= 2
      ~DrawText({CBl%}.hdc,V:text$ + 1,LEN(text$) -
1,V:Rechteck&(0),DT_LEFT | DT_WORDBREAK | DT_NOPREFIX)
      //~TextOut({CBl%}.hdc,2,2,text$,LEN(text$))

    CASE 777 TO 782
      // LOOKS NOT PERFECT FOR ME, BUT THIS WORKS...
      SETDC {CBl%}.hdc
      PUT 0,0,VAL(_WIN$(DLGITEM(10,{CBl%}.ctlid)))
    ENDSELECT

  ENDIF
  RETVAL 0
RETURN



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:38 1998
Return-Path: <M.KUNTNER@tirol.gv.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRW5N-00NGrwC>; Fri, 9 Oct 1998 08:31:33 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9CDE7D06B; Fri,  9 Oct 1998 09:40:15 +0200 (CEST)
From: KUNTNER Markus <M.KUNTNER@tirol.gv.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DBDDF.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 08:22:55 +0200 
Return-Receipt-To: KUNTNER Markus <M.KUNTNER@tirol.gv.at>
Mime-Version: 1.0
X-Mailer: Internet Mail Service (5.0.1460.8)
Content-Type: text/plain
Subject: AW: [GFA] Callback for changing colors...
X-UIDL: 1c408fcb8da64766efc0e34ccd56950e

* List: gfabasic@aachen.linux.de

     Hi!
     I changed some lines in your procedure CBDialog (remark "new").
     Maybe your problems are solved...

     - Markus

PROCEDURE CBDIalog(CBh&,CBm&,CBw&,CBl%)
  LOCAL tapen&,text$,old&                       //new

  IF CBm& = WM_DRAWITEM

    text$ = _WIN$(DLGITEM(10,{CBl%}.ctlid))

    SWITCH {CBl%}.ctlid
    CASE 101 TO 112, 201 TO 212
      '
      tapen& = {CBl%}.ctlid MOD 100 + 100
      IF _WIN$(DLGITEM(10,tapen&)) = _WIN$(DLGITEM(10,tapen& + 100))
        tapen& = CreateSolidBrush(RGB(240,240,240))
      ELSE
        tapen& = CreateSolidBrush(RGB(240,240,160))
      ENDIF

      old&=SelectObject({CBl%}.hdc,tapen&)     //new
      ~FillRect({CBl%}.hdc,CBl% + 14,tapen&)
      ~SelectObject({CBl%}.hdc,old&)           //new
      ~DeleteObject(tapen&)

      tapen& = CreatePen(PS_SOLID,1,RGB(128,128,128))
      old&=SelectObject({CBl%}.hdc,tapen&)      //new
      ~MoveTo({CBl%}.hdc,{CBl%}.rcitemleft,{CBl%}.rcitembottom)
      ~LineTo({CBl%}.hdc,{CBl%}.rcitemleft,{CBl%}.rcitemtop)
      ~LineTo({CBl%}.hdc,PRED({CBl%}.rcitemright),{CBl%}.rcitemtop)
      ~SelectObject({CBl%}.hdc,old&)          //new
      ~DeleteObject(tapen&)

      // IF THE FOLLOWING LINES WILL BE "UN-REM'D" THE PROBLEM
      '=>>APPEARS...
      tapen& = GetStockObject(WHITE_PEN)
      old&=SelectObject({CBl%}.hdc,tapen&)     //new
      ~LineTo({CBl%}.hdc,PRED({CBl%}.rcitemright),PRED({CBl%}.rcitembottom))
      ~LineTo({CBl%}.hdc,PRED({CBl%}.rcitemleft),PRED({CBl%}.rcitembottom))
      ~SetBkColor({CBl%}.hdc,RGB(192,192,192))
      ~SetTextColor({CBl%}.hdc,RGB(0,0,0))
      ~SelectObject({CBl%}.hdc,old&)           //new
      ~DeleteObject(tapen&)
      old&=SelectObject({CBl%}.hdc,fnt1&) //GetStockObject(SYSTEM_FONT)
//new

      ~GetClientRect({CBl%}.hwnditem,V:Rechteck&(0))
      Rechteck&(0) += 2
      Rechteck&(1) += 2
      Rechteck&(2) -= 4
      Rechteck&(3) -= 2
      ~DrawText({CBl%}.hdc,V:text$ + 1,LEN(text$) -1,V:Rechteck&(0),DT_LEFT
| DT_WORDBREAK | DT_NOPREFIX)
      ~TextOut({CBl%}.hdc,2,2,text$,LEN(text$))

      ~SelectObject({CBl%}.hdc,old&)           //new
      ~DeleteObject(fnt1&)                           //new


    CASE 777 TO 782
      // LOOKS NOT PERFECT FOR ME, BUT THIS WORKS...
      SETDC {CBl%}.hdc
      PUT 0,0,VAL(_WIN$(DLGITEM(10,{CBl%}.ctlid)))
    ENDSELECT

  ENDIF
  RETVAL 0
RETURN


> ----------
> Von: 	Vogel Michael[SMTP:vo@schoeller.at]
> Antwort an: 	gfabasic@linux.net.eu.org
> Gesendet: 	Freitag, 9. Oktober 1998 06:53
> An: 	gfabasic@aachen.linux.de
> Betreff: 	[GFA] Callback for changing colors...
> 
> * List: gfabasic@aachen.linux.de
> 
> When I am using Callback-Procedures with "new" ideas, some strange
> things can happen...
> I'd like to build colored text, bitmaps, lines and more within an
> dialog. Everything seems to work, but more and more memory seems to be
> allocated and so my routine crashes (sometimes) after a while.
> It must have to do something with SelectObject or CreatePen, if I delete
> these Lines, it works "for hours" without any problem.
> Has anyone done such a job already ?
> 
> 
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:39 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRX2e-00NILOC>; Fri, 9 Oct 1998 09:32:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C494BD06B; Fri,  9 Oct 1998 10:41:31 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DCC3C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981009073237.GCSL14150@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 9 Oct 1998 07:32:37 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 9 Oct 1998 07:32:37 +0000
Subject: Re: [GFA] Saving Bitmaps with 16/256 Colors ?
X-UIDL: 3d75f7d052337570e39f96a4dd750874

* List: gfabasic@aachen.linux.de

Michael
GFA-W & Windows have a conflict over pallettes!  GFA-W loses every time.
Save 1-bit or 24-bit is fine (quality).  All others suck!  Sjouke says
it's because no pallette is involved w/ LOADBMP, but attempts to get it 
involved failed.  I find that 8-bit saves in straight GFA-W are just fine
but for one idiotic thing... any shade of gray becomes a shade of gold!

Perhaps you want to use a *.dll to get around SAVEBMP ?
<G>
TomR.


At 07:47 AM 09/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Colors are a mystery...
>
>I'd like to save a bitmap as an background for the desktop. This works
>with te example of savebmp. But I am using some special colors, produced
>by including two 256 color bitmaps (In total, I have less than 256
>different colors).
>When I save it with 24 Bit depth, the result is ok, but then has a size
>of 2.3 MByte !
>When I am using 3 Bit or 8 Bit depth (16/256 colors), a standard palette
>is used and the result is bad.
>
>In the meantime, I tried to create a bitmap with 16/256 colors to
>manipulate the palette before saving, but I am to silly for doing that.
>
>
>---
>picture& = LOADBMP("c:\temp\256color.bmp")
>
>hmdc& = MEMDC(_DC(1))
>hmono& = CreateBitmap(100,100,1,8,0)			// Does NOT work
>'hmono& = CreateCompatibleBitmap(_DC(1),100,100) 	// Works, but has
>"True-Color"
>hnull& = SelectObject(hmdc&,hmono&)
>
>SETDC hmdc&
>put 0,0,picture&
>
>setdc _dc(1)
>put 0,0,hmono&
>---
>
>Can anyone help to use an optimized palette for saving a picture with
>less colors ?
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:41 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRYAT-00NGrqC>; Fri, 9 Oct 1998 10:44:57 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 13241D06B; Fri,  9 Oct 1998 11:53:30 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DDD1D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id AD0B6701B8; Fri, 09 Oct 1998 10:44:59 +0200
Date: Fri, 9 Oct 1998 10:17:58 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Saving Bitmaps with 16/256 Colors ?
X-UIDL: 63952741809ff38ffefd3e66e26d92e2

* List: gfabasic@aachen.linux.de


>GFA-W & Windows have a conflict over pallettes!  GFA-W loses every time.
>Save 1-bit or 24-bit is fine (quality).  All others suck!  Sjouke says
>it's because no pallette is involved w/ LOADBMP, but attempts to get it
>involved failed.  I find that 8-bit saves in straight GFA-W are just fine
>but for one idiotic thing... any shade of gray becomes a shade of gold!


I'm not aware of any failure in my BmpSave routine presented in my book. It
handles palettes correctly and you can even compress a BMP to save space. If
there would be a flaw in any of my BMP.DLL routines I immediately repait it.
LOADBMP is indeed a clumsy function since it can be used to load only one
bitmap per window because it updates the window palette to reflect the
bitmap's color palette (unless the bitmap is 16-color bitmap). On the other
hand, if LOADBMP would return a palette rather than changing the current
window palette, you would have to be familiar with palette management and
select/realize the palette by yourself.

Sjouke Hamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:43 1998
Return-Path: <timeverest@hotmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRaQv-00NIL1C>; Fri, 9 Oct 1998 13:10:05 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7DBD8D06B; Fri,  9 Oct 1998 14:18:48 +0200 (CEST)
From: "Tim Everest" <timeverest@hotmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361DFF28.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Originating-IP: [195.171.143.229]
Content-Type: text/plain
Date: Fri, 09 Oct 1998 04:09:57 PDT
Subject: [GFA] Simple Printing Question?
X-UIDL: 3e8a39e04f8bfde77434b988e799f3e5

* List: gfabasic@aachen.linux.de

Hello to everyone,

This is my first question.

I've a program that reads a file , formats the data and prints it. The 
prints are about 15 pages long. Some of the pages need to be in 
'Landscape' mode and some in 'Portrait' mode. How do I switch between 
these modes without using the Common Print Dialog for EACH 
page of the print?

I've tried changing the DEVMODE structure but with no success.
I've tried using the Escape sequence GETSETPRINTORIENT before starting 
the page but it seems to have unpredictable results. My documentation 
also suggests that this is now redundant.
I can't find any examples of code anywhere that does this.

Any assistance is greatly appreciated.
Tim


______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:44 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRael-00NGqTC>; Fri, 9 Oct 1998 13:24:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E9DECD074; Fri,  9 Oct 1998 14:32:55 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361E0278.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 07:23:05 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Screensaver question...
X-UIDL: aa1ad762762a89567d2f23e4265612f4

* List: gfabasic@aachen.linux.de

>>>>

I'd try to copy the actual screen into a bitmap and then on the screen
WITHOUT any blinking/flickering effects. But there is ALWAYS a (very
short) moment where the screen will be filled with white color (during
the Bitblt transfer from the saved desktop bitmap to the screen).

Has anyone solved this ?

<<<


Yes, 

Here's my method, because I don't know how to guarantee that a window is on
top.

I never try to blit from the screen. I only blit to the screen. 

Do all your writing to a memdc, and then blit it to the screen.

The memdc remains the archive screen saver.

B.D.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:45 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRalV-00NIKcC>; Fri, 9 Oct 1998 13:31:21 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 007F0D07A; Fri,  9 Oct 1998 14:39:52 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361E0419.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 07:30:06 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Callback for changing colors...
X-UIDL: 0a179aaa7ed45afa9857dfb81167451b

* List: gfabasic@aachen.linux.de

>>>

     ~SelectObject({CBl%}.hdc,tapen&)
      ~FillRect({CBl%}.hdc,CBl% + 14,tapen&)
      ~DeleteObject(tapen&)

<<<<<


For starters try this change:

       oldpen&=SelectObject({CBl%}.hdc,tapen&)
      ~FillRect({CBl%}.hdc,CBl% + 14,tapen&)
      ~SelectObject({CBl%}.hdc,oldpen&)   // reselect oldpen before
deleting current pen
      ~DeleteObject(tapen&)


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:48 1998
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRh7V-00NIldC>; Fri, 9 Oct 1998 20:18:29 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id ECF98D074; Fri,  9 Oct 1998 21:26:56 +0200 (CEST)
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361E6382.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 09 Oct 1998 20:12:28 +0200
X-Mailer: Mozilla 4.06 [de] (Win95; I)
MIME-Version: 1.0
References: <3619269C.BeroList-2.5.8@aachen.linux.de> <361B9270.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 333200002801-0001@t-online.de
Subject: [GFA] GFABASIC under NT : installation problems
X-UIDL: a6bf59cc8f52edcacb11d700fad5ef66

* List: gfabasic@aachen.linux.de

Hi,
I try to install the GFABASIC interpreter under NT on a laptop computer
getting always the following error messages when activating GFAWIN37.EXE :
1) TOOLHELP.DLL can not be found
2) directory C:\WINNT\GFAWIN\GFAWIN37.EXE can not be found

Actually these files exist in the correponding directories.
GFA version : 4.36

There is no installing problem under NT on a network computer.

I highly appreaciate any hint solving my problem.
Many thanks in advance

Juergen




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 09 21:58:49 1998
Return-Path: <lrn@zeppo.geosurv.gov.nf.ca>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRhM5-00NIL1C>; Fri, 9 Oct 1998 20:33:33 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 39988D07A; Fri,  9 Oct 1998 21:42:07 +0200 (CEST)
From: Larry Nolan <lrn@zeppo.geosurv.gov.nf.ca>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361E670F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 09 Oct 1998 16:02:15 -0230
Organization: Geological Survey of Newfoundland
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <3619269C.BeroList-2.5.8@aachen.linux.de> <361B9270.BeroList-2.5.8@aachen.linux.de> <361E6382.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] GFABASIC under NT : installation problems
X-UIDL: d6f56ff6d042dc23855307f85eeb46f6

* List: gfabasic@aachen.linux.de

Some kind sole solved this for me on NT about ayear ago.

Put TOOLHELP.DLL in the SYSTEM32 directory  which in my case was

WINNT\SYSTEM32


Juergen Burgmeier wrote:

> * List: gfabasic@aachen.linux.de
>
> Hi,
> I try to install the GFABASIC interpreter under NT on a laptop computer
> getting always the following error messages when activating GFAWIN37.EXE :
> 1) TOOLHELP.DLL can not be found
> 2) directory C:\WINNT\GFAWIN\GFAWIN37.EXE can not be found
>
> Actually these files exist in the correponding directories.
> GFA version : 4.36
>
> There is no installing problem under NT on a network computer.
>
> I highly appreaciate any hint solving my problem.
> Many thanks in advance
>
> Juergen
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org



--
Larry Nolan
P.O. Box 8700
St. John's, Newfoundland
Canada, A1B 4J6

voice (709) 729-2168
email lrn@zeppo.geosurv.gov.nf.ca

          "My employer has no opinion    -   It's a politician "



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:23 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRjgq-00NIL1C>; Fri, 9 Oct 1998 23:03:08 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0B0E4D07A; Sat, 10 Oct 1998 00:11:51 +0200 (CEST)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361E8A27.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 15:02:36 -0600 (MDT)
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] GFABASIC under NT : installation problems
X-UIDL: c929550f45ee059fe480b38387245939

* List: gfabasic@aachen.linux.de

>Hi,
>I try to install the GFABASIC interpreter under NT on a laptop computer
>getting always the following error messages when activating GFAWIN37.EXE :
>1) TOOLHELP.DLL can not be found
>2) directory C:\WINNT\GFAWIN\GFAWIN37.EXE can not be found
>
>Actually these files exist in the correponding directories.
>GFA version : 4.36
>
Download the GFA NT Patch from Bernhard Rosenkraenzer,
available at ftp://ftp.bero-online.ml.org

Yours

Sven Thomas
GFA Software


+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:24 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRmvs-00NDLrC>; Sat, 10 Oct 1998 02:30:52 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id AC079D077; Sat, 10 Oct 1998 03:39:34 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361EBAD9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 20:29:49 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] TMMT.GFW
X-UIDL: dd6406dc3369176ee445458d7208c594

* List: gfabasic@aachen.linux.de

I have 2 questions regarding the download program TMMT.GFW:

1) The DLL "nviewl16.dll" is required for display of bitmaps. Where can
this DLL be found?

2) The undocumented GFA function _OEM$(a$) is used in the program.  What
does this function do?

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:25 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRnVX-00NGq6C>; Sat, 10 Oct 1998 03:07:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C5707D077; Sat, 10 Oct 1998 04:16:25 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361EC37C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 9 Oct 1998 18:01:57 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] TMMT.GFW
X-UIDL: 65af8ea92cb7de5bf39f085b111092fe

* List: gfabasic@aachen.linux.de

attn:BDD
Copy of nview.dll is attached to a private message which has been sent to
you.
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: BDD <BrentDeck@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Friday, October 09, 1998 5:31 PM
Subject: [GFA] TMMT.GFW


* List: gfabasic@aachen.linux.de

I have 2 questions regarding the download program TMMT.GFW:

1) The DLL "nviewl16.dll" is required for display of bitmaps. Where can
this DLL be found?

2) The undocumented GFA function _OEM$(a$) is used in the program.  What
does this function do?

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:26 1998
Return-Path: <webmaestro@web-evolution.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRpLQ-00NDLrC>; Sat, 10 Oct 1998 05:05:24 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 60DE1D07B; Sat, 10 Oct 1998 06:13:55 +0200 (CEST)
From: WebMaestro <webmaestro@web-evolution.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361EDF07.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
     Fri, 09 Oct 98 23:05:01 -0400
Date: Fri, 09 Oct 1998 23:05:39 -0400
Organization: Web volution
X-Mailer: Mozilla 4.06 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] GFA & CGI
X-UIDL: 2b9527363b16500f3bedebf4390bf0c5

* List: gfabasic@aachen.linux.de

    I think I should have been more precise in my post about handling
CGI...

    Here's a small program written in C:

/* hello.c: a minimal stdio CGI program */
#include <stdio.h>
int main (argc, argv)
    int argc;
    char *argv[];
{
 printf("Content-type: text/html\n\n");
return 0;
}

    I want to be able to do the same thing in GFA, that is; read and
write to the standard I/O (stdio) interface.

    any help would be appreciated


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:27 1998
Return-Path: <andrew@tasone.globalnet.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRuIV-00NIlzC>; Sat, 10 Oct 1998 10:22:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9B205D07B; Sat, 10 Oct 1998 11:31:26 +0200 (CEST)
From: "Andrew" <andrew@tasone.globalnet.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361F2970.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 10 Oct 1998 09:21:01 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0518.4
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0518.4
Subject: [GFA] remove me from this list
X-UIDL: e29be4c87df68636bae65b88501df92c

* List: gfabasic@aachen.linux.de

please can you remove me from this list

     Yours electronically,

     Andrew Gledhill.

+--------------------------------------------------------+
                         ////
                        (o o)
                   -oOO--(_)--OOo-
  Email : andrew@tasone.globalnet.co.uk
  www : http://www.users.globalnet.co.uk/~tasone/index.htm
  PGP Public Keys available (RSA or DSS) at the above
  W.W.W. site or by email to me.
+--------------------------------------------------------+


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:28 1998
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zRxEO-00NInxC>; Sat, 10 Oct 1998 13:30:40 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 21A3AD07B; Sat, 10 Oct 1998 14:39:25 +0200 (CEST)
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361F557D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 10 Oct 1998 13:29:06 +0200
X-Mailer: Mozilla 4.06 [de] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 333200002801-0001@t-online.de
Subject: [GFA] Under NT GETFONT/RFONT doesn't work correctly
X-UIDL: e763ad2e09f724b4bd947d29c6cb6c4e

* List: gfabasic@aachen.linux.de

Hi,
I found under W95 (screen resolution 1024/768/small character)
with the following routine
------
GETFONT SYSTEM_FONT
RFONT WIDTH w&, HEIGHT h&
PRINT w&,h&
------
w&=7 and h&=16   as expected.

But under NT 4.0 the same routine shows w&=0 and h&=0

Question: It is possible to replace RFONT
by a Windows API function ?

Any hint is highly appreciated.
Yours
Juergen



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:29 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zS0N2-00NIndC>; Sat, 10 Oct 1998 16:51:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D1E5AD07B; Sat, 10 Oct 1998 18:00:31 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361F84A0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 10 Oct 1998 16:52:43 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] GFA & CGI
X-UIDL: 0dc7802f50c7d9a398e9de9b30b9ce82

* List: gfabasic@aachen.linux.de

Because there is no Standard-Output in Windows (so far I know), a
CGI-program should create a (new) html-file as your result. This can be
a totally prepared file, where just some place holders are replaced by
special values, for instance a reference to gifs of a counter. Normally
this file is taken instead of the standard input. Depending which Server
you use, the name of this file for input can be found (but only while
your CGI-Program is executed by the Server) within an INI-File of the
WWW-Server.

Just play around with your WWW-Server, which method (POST / GET) will be
handled easier. To check the parameters, just start with the followinf
program. Compile it, and enter a typical reference (<a
href="/cgi-win/test.exe"> Click </a>) into a web page, and see what
happens...

_______

max& = 99
DIM var$(max&),val$(max&),par$(max&)

OPENW #1,0,0,_X,430,0
'
PRINT "Parameter: ";_dosCmd$
////////////////////////////
par& = 0
dummy$ = _dosCmd$
'
WHILE LEN(dummy$)
  pos& = INSTR(dummy$," ")
  IF pos& = 0 THEN pos& = SUCC(LEN(dummy$))
  par$(par&) = LEFT$(dummy$,PRED(pos&))
  dummy$ = MID$(dummy$,SUCC(pos&))
  PRINT par&'par$(par&)
  INC par&
WEND
'
'
?
PRINT "Environment:"
////////////////////
'
adr% = GetDOSEnvironment() 'address of environment block

env& = 0
WHILE PEEK(adr%) <> 0 'block end reached?
  dummy$ = ""
  WHILE PEEK(adr%) <> 0 'string end reached?
    dummy$ = dummy$ + CHR$(PEEK(adr%))
    INC adr%
  WEND
  pos& = INSTR(dummy$,"=")
  var$(env&) = LEFT$(dummy$,PRED(pos&))
  val$(env&) = MID$(dummy$,SUCC(pos&))
  PRINT env&'var$(env&)'"="'val$(env&)
  INC env&
  INC adr%
WEND
PRINT
PRINT "Beenden mit Alt-F4";
WHILE MENU(1) <> 4
  PEEKEVENT
WEND
CLOSEW #1
______





>----------
>Von: 	WebMaestro[SMTP:webmaestro@web-evolution.com]
>Gesendet: 	Samstag, 10. Oktober 1998 04:05
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] GFA & CGI
>
>* List: gfabasic@aachen.linux.de
>
>    I think I should have been more precise in my post about handling
>CGI...
>
>    Here's a small program written in C:
>
>/* hello.c: a minimal stdio CGI program */
>#include <stdio.h>
>int main (argc, argv)
>    int argc;
>    char *argv[];
>{
> printf("Content-type: text/html\n\n");
>return 0;
>}
>
>    I want to be able to do the same thing in GFA, that is; read and
>write to the standard I/O (stdio) interface.
>
>    any help would be appreciated
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:31 1998
Return-Path: <schonema@post6.tele.dk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zS0vo-00NInKC>; Sat, 10 Oct 1998 17:27:44 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 120B4D07D; Sat, 10 Oct 1998 18:36:27 +0200 (CEST)
From: "Jan Schnemann" <schonema@post6.tele.dk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361F8D0B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v4.0 201-221) with ESMTP
          id <19981010152725.QQZQ3697.fep2@post6.tele.dk>
          for <gfabasic@linux.net.eu.org>; Sat, 10 Oct 1998 17:27:25 +0200
Date: Sat, 10 Oct 1998 17:26:10 +0200
X-Mailer: Mozilla 4.05 [en] (Win95; I)
MIME-Version: 1.0
References: <361F2970.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Subject: Re: [GFA] remove me from this list
X-UIDL: 131e71fbd8bf0580108878c0112a1a08

* List: gfabasic@aachen.linux.de

please can you remove me from this list
> 
>      Yours electronically,
> 
Jan Schnemann 
> +--------------------------------------------------------+

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:32 1998
Return-Path: <THIELE-DOKUMENTATION@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zS2VA-00NInGC>; Sat, 10 Oct 1998 19:08:20 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B5521D07B; Sat, 10 Oct 1998 20:17:04 +0200 (CEST)
From: THIELE-DOKUMENTATION@t-online.de (Dr.-Ing. U. Thiele)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361FA4A0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 09 Oct 1998 16:19:23 +0100
Organization: THIELE DOKUMENTATION + MEDIA
X-Mailer: Mozilla 4.01 [de]C-DT  (WinNT; I)
MIME-Version: 1.0
X-Priority: 3 (Normal)
References: <361DB31E.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 0602332112-0001@t-online.de
Subject: Re: [GFA] Saving Bitmaps with 16/256 Colors ?
X-UIDL: 7f7fae9072c1c69461c04354143c3a27

* List: gfabasic@aachen.linux.de

Vogel Michael schrieb:
> 
> * List: gfabasic@aachen.linux.de
> 
> Colors are a mystery...
> 
> I'd like to save a bitmap as an background for the desktop. This works
> with te example of savebmp. But I am using some special colors,
> produced
> by including two 256 color bitmaps (In total, I have less than 256
> different colors).


Should that be conducted via a GFA routine, or are you looking for a
manual solution?


Gruss aus Alzenau
Ulrich Thiele

 u.thiele@thiele-dokumentation.de
 j.thiele@thiele-dokumentation.de
----------------------------------
http://www.thiele-dokumentation.de
----------------------------------
 Fon + Fax (0 60 23) 3 21 12



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:33 1998
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zS2sE-00NIk5C>; Sat, 10 Oct 1998 19:32:10 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6A332D065; Sat, 10 Oct 1998 20:40:49 +0200 (CEST)
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361FAA34.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 08 Oct 1988 19:33:09 +0200
X-Mailer: Mozilla 4.06 [de] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 333200002801-0001@t-online.de
Subject: [GFA] Font problem for GFA under NT
X-UIDL: 136a4aea825b8664669eabda844caa8b

* List: gfabasic@aachen.linux.de

Hi,
I am try to run a GFABASIC program (developed under  WIN95)
on a NT workstation showing a somewhat strange behavior.

The problem could be indentified in this reduced routine:
-----
FULLW #1
FONT "roman",ITALIC 1,WIDTH 12,HEIGHT 24, FAMILY FF_ROMAN
FONT TO fnt&
SETFONT fnt&
TEXT 100,100,"iii"
// SETFONT SYSTEM_FIXED_FONT   // TEST
SETFONT SYSTEM_FONT            // (+++)
FREEFONT fnt&
TEXT 200,200,"XXX"

KEYGET d
CLOSEW #1
------
Athough the font is set to SYSTEM_FONT (+++)  the font presentation of "XXX"
is the same as "iii". So (+++) has not effect on the current font.
Activating the "TEST" line,  the font presentation of "XXX" became SYSTEM_FIXED_FONT.

I think this behavior might be a bug of GFA under NT.

Question:
Is there a way to reset the font to SYSTEM_FONT after having activating another font ?

Any hint solving the problem is appreciated.
Thanks in advance.
Juergen


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:36 1998
Return-Path: <jaln@sprintmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zS3cs-00NIn1C>; Sat, 10 Oct 1998 20:20:22 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 69648D065; Sat, 10 Oct 1998 21:29:07 +0200 (CEST)
From: jerry allen <jaln@sprintmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361FB583.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 10 Oct 1998 11:20:10 -0700
X-Mailer: Mozilla 4.06 [en] (WinNT; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <361E8A27.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] GFABASIC under NT : installation problems
X-UIDL: c0bb99441d4148c5b16b0533e18aa390

* List: gfabasic@aachen.linux.de

Don't bother! Just move toolhelp.dll (8/9/96) into the \winnt\system32\
subdirectory and your trouble will be over!

GFA wrote:

> * List: gfabasic@aachen.linux.de
>
> >Hi,
> >I try to install the GFABASIC interpreter under NT on a laptop computer
> >getting always the following error messages when activating GFAWIN37.EXE :
> >1) TOOLHELP.DLL can not be found
> >2) directory C:\WINNT\GFAWIN\GFAWIN37.EXE can not be found
> >
> >Actually these files exist in the correponding directories.
> >GFA version : 4.36
> >
> Download the GFA NT Patch from Bernhard Rosenkraenzer,
> available at ftp://ftp.bero-online.ml.org
>
> Yours
>
> Sven Thomas
> GFA Software
>
> +++ How to contact GFA +++
> FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
> WWW: http://ourworld.compuserve.com/homepages/gfasoft
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:38 1998
Return-Path: <jaln@sprintmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zS3dr-00NIn1C>; Sat, 10 Oct 1998 20:21:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id EA9AFD07B; Sat, 10 Oct 1998 21:29:09 +0200 (CEST)
From: jerry allen <jaln@sprintmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361FB586.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 10 Oct 1998 11:20:10 -0700
X-Mailer: Mozilla 4.06 [en] (WinNT; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <361E8A27.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] GFABASIC under NT : installation problems
X-UIDL: 1c7af710dedafcb099f792b19b112fa3

* List: gfabasic@aachen.linux.de

Don't bother! Just move toolhelp.dll (8/9/96) into the \winnt\system32\
subdirectory and your trouble will be over!

GFA wrote:

> * List: gfabasic@aachen.linux.de
>
> >Hi,
> >I try to install the GFABASIC interpreter under NT on a laptop computer
> >getting always the following error messages when activating GFAWIN37.EXE :
> >1) TOOLHELP.DLL can not be found
> >2) directory C:\WINNT\GFAWIN\GFAWIN37.EXE can not be found
> >
> >Actually these files exist in the correponding directories.
> >GFA version : 4.36
> >
> Download the GFA NT Patch from Bernhard Rosenkraenzer,
> available at ftp://ftp.bero-online.ml.org
>
> Yours
>
> Sven Thomas
> GFA Software
>
> +++ How to contact GFA +++
> FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
> WWW: http://ourworld.compuserve.com/homepages/gfasoft
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:39 1998
Return-Path: <andrew@tasone.globalnet.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zS3hX-00NIn1C>; Sat, 10 Oct 1998 20:25:11 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 21B00D080; Sat, 10 Oct 1998 21:33:56 +0200 (CEST)
From: "Andrew" <andrew@tasone.globalnet.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361FB6A4.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 10 Oct 1998 19:25:59 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0518.4
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0518.4
Subject: [GFA] how do you get removed from this list
X-UIDL: 4645ebb3e5946866788a728d60b67055

* List: gfabasic@aachen.linux.de

please can you remove me from this list

     Yours electronically,

     Andrew Gledhill.

+--------------------------------------------------------+
                         ////
                        (o o)
                   -oOO--(_)--OOo-
  Email : andrew@tasone.globalnet.co.uk
  www : http://www.users.globalnet.co.uk/~tasone/index.htm
  PGP Public Keys available (RSA or DSS) at the above
  W.W.W. site or by email to me.
+--------------------------------------------------------+


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 11 00:11:43 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zS4hf-00NInZC>; Sat, 10 Oct 1998 21:29:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1F5D5D07B; Sat, 10 Oct 1998 22:38:05 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <361FC5AF.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981010192818.BINY19652@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 10 Oct 1998 19:28:18 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 10 Oct 1998 19:28:18 +0000
Subject: [GFA] 1 more time....
X-UIDL: 90f3ae4f922b17ef650476d8de4cbde9

* List: gfabasic@aachen.linux.de

* List: gfabasic@aachen.linux.de

I've just returned from a 1-week vacation to find this list full of
malformed unsubscription requests - so I guess I'd better explain it
again: to remove yourself from this list, send a message to
gfabasic@aachen.linux.de with "unsubscribe" (without the quotation marks)
in the SUBJECT of the message. Don't add anything else (such as
"un-subscribe"), because the list processor can't recognize that as a
request.

LLaP
bero


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:23 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSJNv-00NGqaC>; Sun, 11 Oct 1998 13:09:59 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 961EBD07D; Sun, 11 Oct 1998 14:18:37 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3620A21D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981011110940.HLYM9650@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 11 Oct 1998 11:09:40 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 11 Oct 1998 11:09:40 +0000
Subject: [GFA] Help w/ xlate$, PLEASE!!!
X-UIDL: e20ade7fe1ebb1e92e11746159d759bd

* List: gfabasic@aachen.linux.de

PRINT XLATE$(INPUT$(64,#1),m&())  gives me what I want, onscreen.
PRINT #2, XLATE$(INPUT$(64,#1),m&())  gives me something entirely different!
WHY????
caz$ = XLATE$(INPUT$(64,#1),m&())
PRINT #2, caz$
gives me the same nonsense... WHY??????
<G>
TomR.


''''  xlate1.lst
Dv& = _DRIVE
Dr$ = DIR$(0)
n2$ = "ident.dat"

IF EXIST(n2$)
  GOTO Hop_Over
ELSE
  OPEN "o", #3, n2$
  CLOSE #3
ENDIF
Hop_Over:

TITLEW #1, " Xlate 46 chars"
OPENW #1, 0,0,300,200,48
'
DIM m&(255)

FOR i% = 0 TO 31
  m&(i%) = 46
NEXT i%
m&(32) = 32
FOR i% = 33 TO 47
  m&(i%) = 46
NEXT i%
FOR i% = 48 TO 57
  m&(i%) = i%
NEXT i%
FOR i% = 58 TO 64
  m&(i%) = 46
NEXT i%
FOR i% = 65 TO 90
  m&(i%) = i%
NEXT i%
FOR i% = 91 TO 96
  m&(i%) = 46
NEXT i%
FOR i% = 97 TO 122
  m&(i%) = i%
NEXT i%
FOR i% = 123 TO 255
  m&(i%) = 46
NEXT i%
' m&(123) = 46
'OPENW #1
FILESELECT #"Select anything","All Files (*.*)","*.*",n1$
OPEN "I",#1, n1$
PRINT XLATE$(INPUT$(64,#1),m&())

CHDRIVE Dv&
CHDIR Dr$
OPEN "A",#2, n2$
PRINT #2, n1$
PRINT #2, XLATE$(INPUT$(64,#1),m&())
CLOSE #1
CLOSE #2
PRINT
PRINT "                     <any key>"
KEYGET a%
CLOSEW #1

'
'
KEYGET k%
CLOSEW #1
END


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:24 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSN3t-00NIoGC>; Sun, 11 Oct 1998 17:05:33 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8F6F5D07D; Sun, 11 Oct 1998 18:14:15 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3620D957.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sun, 11 Oct 1998 08:00:30 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-Mimeole: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] SORRY
X-UIDL: 8e7348f932e826cd16a8be451930d0a8

* List: gfabasic@aachen.linux.de

I know that some people on he new GFA news letter list are probably
receiving multiple copies.  Please accept my apologies.  After successfully
sending 2 news letters I cannot seem to get a successful send to ALL names
on the list. I think the problem is with  Microsoft  but can't prove it. If
I can't get the mailer to send all names sometime this week I will probably
just give up on the GFA mail list idea. If you receive more than one copy
please just delete them. Hopefully, I will find out what is going on.

Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:25 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSRZ5-00NInxC>; Sun, 11 Oct 1998 21:54:03 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C65ABD065; Sun, 11 Oct 1998 23:02:47 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36211CF7.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981011195356.NRIM9650@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 11 Oct 1998 19:53:56 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 11 Oct 1998 19:53:56 +0000
Subject: Re: [GFA] SORRY
X-UIDL: 660e8e8fdb010facdb1e2de1c6417021

* List: gfabasic@aachen.linux.de

Dale
*WE* can delete - *YOU* don't give up!  GFA-W NEEDS this, BADLY!
<G>
TomR.


At 08:00 AM 11/10/98 -0700, you wrote:
>* List: gfabasic@aachen.linux.de
>
>I know that some people on he new GFA news letter list are probably
>receiving multiple copies.  Please accept my apologies.  After successfully
>sending 2 news letters I cannot seem to get a successful send to ALL names
>on the list. I think the problem is with  Microsoft  but can't prove it. If
>I can't get the mailer to send all names sometime this week I will probably
>just give up on the GFA mail list idea. If you receive more than one copy
>please just delete them. Hopefully, I will find out what is going on.
>
>Dale Bryant
>
>http://www.gfawhelp.gfa.net
>webmaster.gfawhelp@gfa.net
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:27 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSS5k-00NInsC>; Sun, 11 Oct 1998 22:27:48 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7BC37D065; Sun, 11 Oct 1998 23:36:26 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362124DA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 11 Oct 1998 13:22:55 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] SORRY
X-UIDL: bd85152e82d2adaefe3e4c19d0e38f96

* List: gfabasic@aachen.linux.de

Thanks Tom,
I guess it is just getting to be a little frustrating. I have tried probably
20 or so times on the third letter but it is only sending to the first 2 or
so. They are, and rightly so, getting a little testy.
I will have 3 more letters in the can to send so I will try some more.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Sunday, October 11, 1998 12:55 PM
Subject: Re: [GFA] SORRY


>* List: gfabasic@aachen.linux.de
>
>Dale
>*WE* can delete - *YOU* don't give up!  GFA-W NEEDS this, BADLY!
><G>
>TomR.
>
>
>At 08:00 AM 11/10/98 -0700, you wrote:
>>* List: gfabasic@aachen.linux.de
>>
>>I know that some people on he new GFA news letter list are probably
>>receiving multiple copies.  Please accept my apologies.  After
successfully
>>sending 2 news letters I cannot seem to get a successful send to ALL names
>>on the list. I think the problem is with  Microsoft  but can't prove it.
If
>>I can't get the mailer to send all names sometime this week I will
probably
>>just give up on the GFA mail list idea. If you receive more than one copy
>>please just delete them. Hopefully, I will find out what is going on.
>>
>>Dale Bryant
>>
>>http://www.gfawhelp.gfa.net
>>webmaster.gfawhelp@gfa.net
>>
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:37 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSVdG-00NILKC>; Mon, 12 Oct 1998 02:14:38 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C555CD07D; Mon, 12 Oct 1998 03:23:22 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36215A0B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sun, 11 Oct 1998 17:09:13 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] letter
X-UIDL: 5ba789eb521f056920dd02ef0caed4f7

* List: gfabasic@aachen.linux.de

If any of you have received any news letters today would you send me a
message so I can determine if the mailer is reporting correctly
Thanks,
send to:
adbryant@msn.com

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:39 1998
Return-Path: <Hannu.Pohjanheimo@snafu.phys.jyu.fi>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSaOe-00NInKC>; Mon, 12 Oct 1998 07:19:52 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D3C7AD074; Mon, 12 Oct 1998 08:28:38 +0200 (CEST)
From: Hannu Pohjanheimo <Hannu.Pohjanheimo@snafu.phys.jyu.fi>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3621A197.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 12 Oct 1998 08:18:08 +0200
X-Mailer: Mozilla 4.04 [en] (WinNT; I)
MIME-Version: 1.0
References: <36215A0B.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Subject: Re: [GFA] letter
X-UIDL: 43a4b7cad75c3d2fd48cd1d455a804a8

* List: gfabasic@aachen.linux.de

Hello Dale

I got nine newletters, but dont worry that.
Good luck

Hannu Pohjanheimo


Dale Bryant wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> If any of you have received any news letters today would you send me a
> message so I can determine if the mailer is reporting correctly
> Thanks,
> send to:
> adbryant@msn.com
> 
> http://www.gfawhelp.gfa.net
> webmaster.gfawhelp@gfa.net
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:41 1998
Return-Path: <peters@service.schenker-eurocargo.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSavN-00NIkNC>; Mon, 12 Oct 1998 07:53:41 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 283B0D074; Mon, 12 Oct 1998 09:02:27 +0200 (CEST)
From: Peter "Sthr" <peters@service.schenker-eurocargo.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3621A983.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 12 Oct 1998 07:55:58 +0200
X-Mailer: Mozilla 3.01 (Win95; I)
MIME-Version: 1.0
References: <36215A0B.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] letter
X-UIDL: e966a38bf7135c8b8196be57c4347f65

* List: gfabasic@aachen.linux.de

Dale Bryant wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> If any of you have received any news letters today would you send me a
> message so I can determine if the mailer is reporting correctly
> Thanks,
> send to:
> adbryant@msn.com
> 
> http://www.gfawhelp.gfa.net
> webmaster.gfawhelp@gfa.net
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
yep

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:47 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSbFz-00NInKC>; Mon, 12 Oct 1998 08:14:59 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 28B25D077; Mon, 12 Oct 1998 09:23:34 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3621AE7C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 12 Oct 1998 08:16:09 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Font problem for GFA under NT
X-UIDL: db67c9b30de47f40221e8cee4d3ee8db

* List: gfabasic@aachen.linux.de

Maybe the DEVICE_DEFAULT_FONT works, have a look into the help page of
SETFONT...

>----------
>Von: 	J.Burgmeier@t-online.de[SMTP:J.Burgmeier@t-online.de]
>Gesendet: 	Samstag, 08. Oktober 1988 18:33
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] Font problem for GFA under NT
>
>* List: gfabasic@aachen.linux.de
>
>Hi,
>I am try to run a GFABASIC program (developed under  WIN95)
>on a NT workstation showing a somewhat strange behavior.
>
>The problem could be indentified in this reduced routine:
>-----
>FULLW #1
>FONT "roman",ITALIC 1,WIDTH 12,HEIGHT 24, FAMILY FF_ROMAN
>FONT TO fnt&
>SETFONT fnt&
>TEXT 100,100,"iii"
>// SETFONT SYSTEM_FIXED_FONT   // TEST
>SETFONT SYSTEM_FONT            // (+++)
>FREEFONT fnt&
>TEXT 200,200,"XXX"
>
>KEYGET d
>CLOSEW #1
>------
>Athough the font is set to SYSTEM_FONT (+++)  the font presentation of "XXX"
>is the same as "iii". So (+++) has not effect on the current font.
>Activating the "TEST" line,  the font presentation of "XXX" became
>SYSTEM_FIXED_FONT.
>
>I think this behavior might be a bug of GFA under NT.
>
>Question:
>Is there a way to reset the font to SYSTEM_FONT after having activating
>another font ?
>
>Any hint solving the problem is appreciated.
>Thanks in advance.
>Juergen
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:47:56 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSbLQ-00NGqaC>; Mon, 12 Oct 1998 08:20:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7A58CD077; Mon, 12 Oct 1998 09:29:22 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3621AFD2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 12 Oct 1998 08:22:07 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Help w/ xlate$, PLEASE!!!
X-UIDL: a58d760518ab92ccd85b6f4d2ad0a8ac

* List: gfabasic@aachen.linux.de

Is it a joke ?

At least the following produces the same results...

FILESELECT #"Select anything","All Files (*.*)","*.*",n1$
OPEN "I",#1, n1$
PRINT XLATE$(INPUT$(64,#1),m&())
PRINT
PRINT "                     <any key>"

SEEK #1,0

caz$ = XLATE$(INPUT$(64,#1),m&())
PRINT caz$
PRINT
PRINT "                     <any key>"


>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Sonntag, 11. Oktober 1998 12:09
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] Help w/ xlate$, PLEASE!!!
>
>* List: gfabasic@aachen.linux.de
>
>PRINT XLATE$(INPUT$(64,#1),m&())  gives me what I want, onscreen.
>PRINT #2, XLATE$(INPUT$(64,#1),m&())  gives me something entirely different!
>WHY????
>caz$ = XLATE$(INPUT$(64,#1),m&())
>PRINT #2, caz$
>gives me the same nonsense... WHY??????
><G>
>TomR.
>
>
>''''  xlate1.lst
>Dv& = _DRIVE
>Dr$ = DIR$(0)
>n2$ = "ident.dat"
>
>IF EXIST(n2$)
>  GOTO Hop_Over
>ELSE
>  OPEN "o", #3, n2$
>  CLOSE #3
>ENDIF
>Hop_Over:
>
>TITLEW #1, " Xlate 46 chars"
>OPENW #1, 0,0,300,200,48
>'
>DIM m&(255)
>
>FOR i% = 0 TO 31
>  m&(i%) = 46
>NEXT i%
>m&(32) = 32
>FOR i% = 33 TO 47
>  m&(i%) = 46
>NEXT i%
>FOR i% = 48 TO 57
>  m&(i%) = i%
>NEXT i%
>FOR i% = 58 TO 64
>  m&(i%) = 46
>NEXT i%
>FOR i% = 65 TO 90
>  m&(i%) = i%
>NEXT i%
>FOR i% = 91 TO 96
>  m&(i%) = 46
>NEXT i%
>FOR i% = 97 TO 122
>  m&(i%) = i%
>NEXT i%
>FOR i% = 123 TO 255
>  m&(i%) = 46
>NEXT i%
>' m&(123) = 46
>'OPENW #1
>FILESELECT #"Select anything","All Files (*.*)","*.*",n1$
>OPEN "I",#1, n1$
>PRINT XLATE$(INPUT$(64,#1),m&())
>
>CHDRIVE Dv&
>CHDIR Dr$
>OPEN "A",#2, n2$
>PRINT #2, n1$
>PRINT #2, XLATE$(INPUT$(64,#1),m&())
>CLOSE #1
>CLOSE #2
>PRINT
>PRINT "                     <any key>"
>KEYGET a%
>CLOSEW #1
>
>'
>'
>KEYGET k%
>CLOSEW #1
>END
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:48:00 1998
Return-Path: <CompuHelp@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSd8n-00NInKC>; Mon, 12 Oct 1998 10:15:41 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D147DD07B; Mon, 12 Oct 1998 11:23:11 +0200 (CEST)
From: CompuHelp@t-online.de (CompuHelp@T-Online.de)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3621CA80.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 12 Oct 98 10:15 +0100
X-Sender: 0675893545-0001@t-online.de
Subject: [GFA] Barcode
X-UIDL: e60f9fb0f554eaae9b9be02bdbc1592d

* List: gfabasic@aachen.linux.de

Hi all !

Is there noone who can tell me, how to print "Barcodes" from
GFA-W under Win95 ?

CU Ren

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:48:01 1998
Return-Path: <postmaster@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSdqY-00NIndC>; Mon, 12 Oct 1998 11:00:54 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 430B0D077; Mon, 12 Oct 1998 12:09:27 +0200 (CEST)
From: "Gemworks Direct" <postmaster@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3621D55B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 12 Oct 1998 09:49:54 +0100
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] REMOVE
X-UIDL: 01d844a758a2a796fb5fa6b22c2b9478

This is a multi-part message in MIME format.

------=_NextPart_000_00B4_01BDF5C5.AA083930
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

From ???@??? Fri Oct 16 02:48:09 1998
Return-Path: <timeverest@hotmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zShXj-00NInnC>; Mon, 12 Oct 1998 14:57:43 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 10E3DD065; Mon, 12 Oct 1998 16:06:20 +0200 (CEST)
From: "Tim Everest" <timeverest@hotmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36220CDC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Originating-IP: [195.171.143.231]
Content-Type: text/plain
Date: Mon, 12 Oct 1998 05:57:22 PDT
Subject: Re: [GFA] Simple Printing Question?
X-UIDL: a896cf1650a764221b09522c7eed114d

* List: gfabasic@aachen.linux.de

Is there anyone who can help me? 

How do I switch between printing in 'Landscape' mode and 'Portrait' mode 
in my program without using DLG PRINT.

I've looked through a number of examples and manuals but none seem to do 
this. I've tried the Escape GETSETPRINTORIENT 'function'  but this 
appears to be redundant now and gives unpredictable results.

Any assistance would be very much appreciated.

Tim


______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:50:41 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSiFW-00NIokC>; Mon, 12 Oct 1998 15:42:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5EC3DD065; Mon, 12 Oct 1998 16:49:14 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362216EC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981012134017.HSEH6192@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 12 Oct 1998 13:40:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 12 Oct 1998 13:40:17 +0000
Subject: Re: AW: [GFA] Help w/ xlate$, PLEASE!!!
X-UIDL: 419e63e8800961e0993383d228ae0578

* List: gfabasic@aachen.linux.de

Well, there you go again, showing off your superior programming skills!
Joke, don't get angry, please.

>
>SEEK #1,0
>

Little, tiny, miniscule tidbits such as this make all the difference in the
world.  It has been often proved that the most powerful word in the English 
language(s) is "if", one of the smallest words!

If I had....  If I did.... Etc.  The moment I saw that SEEK, I knew what was
wrong & why I kept getting completely different results.  Yeah, what I posted
was a joke... a very nasty joke on myself for not remembering to reposition 
the pointer.  I "if"ed hell outa that thing before posting it but I missed one
"if" - "If I just repositioned the data pointer it might work...."  Agreed?

Thanks, Sir Michael

BTW (I _hate_ that expression!), I, too, am related to "bird".  I am nearly 1/4
Cherokee Indian.  My tribal "name" is: Little Tom, son of Long Jim Tom, son of
Laura, daughter of the BlueJay.  The funny part of all this is that in that 
bloodline (Jay), a long way back, the blood is Apache... Black Hawk (the Black
Hawk wars), was half Apache & his son changed the spelling of his last name to 
avoid being stigmatized & persecuted.  The Cherokee blood is from my father
also,
but through his father & *his* mother.  The Apache blood didn't get to me at
all.
<G>
TomR.



At 08:22 AM 12/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Is it a joke ?
>
>At least the following produces the same results...
>
>FILESELECT #"Select anything","All Files (*.*)","*.*",n1$
>OPEN "I",#1, n1$
>PRINT XLATE$(INPUT$(64,#1),m&())
>PRINT
>PRINT "                     <any key>"
>
>SEEK #1,0
>
>caz$ = XLATE$(INPUT$(64,#1),m&())
>PRINT caz$
>PRINT
>PRINT "                     <any key>"
>
>
>>----------
>>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>>Gesendet: 	Sonntag, 11. Oktober 1998 12:09
>>An: 	gfabasic@aachen.linux.de
>>Betreff: 	[GFA] Help w/ xlate$, PLEASE!!!
>>
>>* List: gfabasic@aachen.linux.de
>>
>>PRINT XLATE$(INPUT$(64,#1),m&())  gives me what I want, onscreen.
>>PRINT #2, XLATE$(INPUT$(64,#1),m&())  gives me something entirely different!
>>WHY????
>>caz$ = XLATE$(INPUT$(64,#1),m&())
>>PRINT #2, caz$
>>gives me the same nonsense... WHY??????
>><G>
>>TomR.
>>
>>
>>''''  xlate1.lst
>>Dv& = _DRIVE
>>Dr$ = DIR$(0)
>>n2$ = "ident.dat"
>>
>>IF EXIST(n2$)
>>  GOTO Hop_Over
>>ELSE
>>  OPEN "o", #3, n2$
>>  CLOSE #3
>>ENDIF
>>Hop_Over:
>>
>>TITLEW #1, " Xlate 46 chars"
>>OPENW #1, 0,0,300,200,48
>>'
>>DIM m&(255)
>>
>>FOR i% = 0 TO 31
>>  m&(i%) = 46
>>NEXT i%
>>m&(32) = 32
>>FOR i% = 33 TO 47
>>  m&(i%) = 46
>>NEXT i%
>>FOR i% = 48 TO 57
>>  m&(i%) = i%
>>NEXT i%
>>FOR i% = 58 TO 64
>>  m&(i%) = 46
>>NEXT i%
>>FOR i% = 65 TO 90
>>  m&(i%) = i%
>>NEXT i%
>>FOR i% = 91 TO 96
>>  m&(i%) = 46
>>NEXT i%
>>FOR i% = 97 TO 122
>>  m&(i%) = i%
>>NEXT i%
>>FOR i% = 123 TO 255
>>  m&(i%) = 46
>>NEXT i%
>>' m&(123) = 46
>>'OPENW #1
>>FILESELECT #"Select anything","All Files (*.*)","*.*",n1$
>>OPEN "I",#1, n1$
>>PRINT XLATE$(INPUT$(64,#1),m&())
>>
>>CHDRIVE Dv&
>>CHDIR Dr$
>>OPEN "A",#2, n2$
>>PRINT #2, n1$
>>PRINT #2, XLATE$(INPUT$(64,#1),m&())
>>CLOSE #1
>>CLOSE #2
>>PRINT
>>PRINT "                     <any key>"
>>KEYGET a%
>>CLOSEW #1
>>
>>'
>>'
>>KEYGET k%
>>CLOSEW #1
>>END
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:50:46 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSmOw-00NIpAC>; Mon, 12 Oct 1998 20:08:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BBD8DD066; Mon, 12 Oct 1998 21:17:40 +0200 (CEST)
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362255D4.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id UAA27163 for <gfabasic@linux.net.eu.org>; 
          Mon, 12 Oct 1998 20:08:46 +0200 (MET DST)
Date: Mon, 12 Oct 1998 20:09:48 +0100
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: [GFA] letter
X-UIDL: db79642781eb0cf1030c2b909b6ca66a

* List: gfabasic@aachen.linux.de

Hi Dale,
Yes, I have received 6-8 copies of GFAWHELPAD today.
Sven

----------
> Frn: Dale Bryant <adbryant@email.msn.com>
> Till: gfabasic@aachen.linux.de
> mne: [GFA] letter
> Datum:  den 12 oktober 1998 01:09
> 
> * List: gfabasic@aachen.linux.de
> 
> If any of you have received any news letters today would you send
me a
> message so I can determine if the mailer is reporting correctly
> Thanks,
> send to:
> adbryant@msn.com
> 
> http://www.gfawhelp.gfa.net
> webmaster.gfawhelp@gfa.net
> 
> 
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:50:47 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSmZE-00NJidC>; Mon, 12 Oct 1998 20:19:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8DDB1D074; Mon, 12 Oct 1998 21:28:22 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36225856.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 12 Oct 1998 11:14:29 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] letter
X-UIDL: 232097891e15bc2b6178d6f4446c1091

* List: gfabasic@aachen.linux.de

Hi Sven,
It looks as if my News Letter software is giving me erroneous sent reports
as it reports on 7 sent but your email address is way down on the list. I
must driving you guys crazy.  Thanks for telling me.
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Sven Kumlin <sven.kumlin@swipnet.se>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Monday, October 12, 1998 11:10 AM
Subject: SV: [GFA] letter


>* List: gfabasic@aachen.linux.de
>
>Hi Dale,
>Yes, I have received 6-8 copies of GFAWHELPAD today.
>Sven
>
>----------
>> Frn: Dale Bryant <adbryant@email.msn.com>
>> Till: gfabasic@aachen.linux.de
>> mne: [GFA] letter
>> Datum:  den 12 oktober 1998 01:09
>>
>> * List: gfabasic@aachen.linux.de
>>
>> If any of you have received any news letters today would you send
>me a
>> message so I can determine if the mailer is reporting correctly
>> Thanks,
>> send to:
>> adbryant@msn.com
>>
>> http://www.gfawhelp.gfa.net
>> webmaster.gfawhelp@gfa.net
>>
>>
>>
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:50:49 1998
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSpgY-00NJjZC>; Mon, 12 Oct 1998 23:39:22 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9A969D07B; Tue, 13 Oct 1998 00:47:58 +0200 (CEST)
From: Reuben E Carlsen <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36228722.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 13 Oct 1998 07:38:13 +1000
Organization: RMC
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <36220CDC.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Simple Printing Question?
X-UIDL: 2821a517cf3dc8469d29b744a5330e1b

* List: gfabasic@aachen.linux.de

I may be barking up the wrong tree here but wouldn't it be a simple
method to send the appropriate control code for Landscape or Portait to
the printer in question.


Reuben
Sydney Australia
======================================================
             Inside Every Sensitive New Age Guy... There Isn't One!
======================================================



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:50:51 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSrgT-00NJlxC>; Tue, 13 Oct 1998 01:47:25 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A5574D04A; Tue, 13 Oct 1998 02:56:08 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3622A528.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 12 Oct 1998 16:41:04 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] TASMANIA
X-UIDL: 642f30755f525bac583e9287e9f8b32e

* List: gfabasic@aachen.linux.de

Does anyone on the list know if Tasmania has its own flag or is it the
Australian flag.
Of course I need to know and I thank you.
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:50:52 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSv8o-00NElqC>; Tue, 13 Oct 1998 05:28:54 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D2707D07F; Tue, 13 Oct 1998 06:37:41 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3622D916.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981013032534.EUJR14510@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 13 Oct 1998 03:25:34 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 13 Oct 1998 03:25:34 +0000
Subject: [GFA] help/info - ~GFA.DEF 
X-UIDL: 4aa9ebeff4cb8806fa0a381dc3b4aaf1

* List: gfabasic@aachen.linux.de

I don't suppose there is any way to convince GFA-W's wgen.exe to use 
a modified ~GFA.DEF, is there?  ~GFA.RES can be modified by changing 
the icon during compile.

I'd like to add version info to GFA-COMPILED, just for fun.  It will
always replace a modified file w/ the stock file.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:50:53 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zSxCl-00NILKC>; Tue, 13 Oct 1998 07:41:07 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C4D0CD066; Tue, 13 Oct 1998 08:49:53 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3622F812.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 13 Oct 1998 07:42:48 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] help/info - ~GFA.DEF 
X-UIDL: 592e9cfba2bb8b10e8cf7f02f42a5872

* List: gfabasic@aachen.linux.de


You can change the all resources after compiling with tools like the
Borland Resource Workshop.

I recommend this, because the Gfa-Linker has a BIG bug !
If there is a more complex resource you are linking automaticaly with
the GFA-Linker, it can happens, that your program will hang after some
starts.
I forwarded this problem already long time ago to GFA with no result.
I'm not sure when it get's tricky for the Linker, but maybe there the
problems are appearing, if the sum of bitmaps and  icons within the
resource is about 20.

Workaround: compiling with/without an icon only, adding the ressource
"manually" with the workshop, then it works (same code, no other
tricks). Lousy job, but the safer way !

-Michael

>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Dienstag, 13. Oktober 1998 04:25
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] help/info - ~GFA.DEF 
>
>* List: gfabasic@aachen.linux.de
>
>I don't suppose there is any way to convince GFA-W's wgen.exe to use 
>a modified ~GFA.DEF, is there?  ~GFA.RES can be modified by changing 
>the icon during compile.
>
>I'd like to add version info to GFA-COMPILED, just for fun.  It will
>always replace a modified file w/ the stock file.
>
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:00 1998
Return-Path: <Hannu.Pohjanheimo@snafu.phys.jyu.fi>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zT0PM-00NIniC>; Tue, 13 Oct 1998 11:06:20 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BE60FD066; Tue, 13 Oct 1998 12:14:41 +0200 (CEST)
From: Hannu Pohjanheimo <Hannu.Pohjanheimo@snafu.phys.jyu.fi>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36232812.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 13 Oct 1998 12:04:02 +0200
X-Mailer: Mozilla 4.04 [en] (WinNT; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <3621CA80.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Subject: Re: [GFA] Barcode
X-UIDL: 69b566ce17459c9c171743e040f727ec

* List: gfabasic@aachen.linux.de

There is one shareware DLL that may help you.

ftp://ftp.simtel.net/pub/simtelnet/win3/dll/dmbcdll1.zip

Hannu

CompuHelp@T-Online.de wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> Hi all !
> 
> Is there noone who can tell me, how to print "Barcodes" from
> GFA-W under Win95 ?
> 
> CU Ren
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:01 1998
Return-Path: <Hannu.Pohjanheimo@snafu.phys.jyu.fi>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zT0QT-00NGqaC>; Tue, 13 Oct 1998 11:07:29 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 33C0DD04A; Tue, 13 Oct 1998 12:14:43 +0200 (CEST)
From: Hannu Pohjanheimo <Hannu.Pohjanheimo@snafu.phys.jyu.fi>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36232813.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 13 Oct 1998 12:04:02 +0200
X-Mailer: Mozilla 4.04 [en] (WinNT; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <3621CA80.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Subject: Re: [GFA] Barcode
X-UIDL: 7f0b7a5107e28bae1db2171af51b8e58

* List: gfabasic@aachen.linux.de

There is one shareware DLL that may help you.

ftp://ftp.simtel.net/pub/simtelnet/win3/dll/dmbcdll1.zip

Hannu

CompuHelp@T-Online.de wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> Hi all !
> 
> Is there noone who can tell me, how to print "Barcodes" from
> GFA-W under Win95 ?
> 
> CU Ren
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:03 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zT2SZ-00NIlzC>; Tue, 13 Oct 1998 13:17:47 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 185F6D07D; Tue, 13 Oct 1998 14:26:16 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>(by way of Tom Record <tiger.genealogical.rescue@worldnet.att.net>)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362346EC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981013111722.DNXX16714@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 13 Oct 1998 11:17:22 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 13 Oct 1998 11:17:22 +0000
Sender: tiger.genealogical.rescue@worldnet.att.net
Subject: AW: [GFA] help/info - ~GFA.DEF 
X-UIDL: f52f5ba6d405f250d39c066b50eb8812

* List: gfabasic@aachen.linux.de

Very interesting to know... Thank You.
I'm curious if ~GFA.DEF can be altered.  I'd like to add the version
to the 'gfa-compiled' statement instead of as a comment string in the
code.  There are several bits of info I'd really like to add to that.
<G>
TomR.


* List: gfabasic@aachen.linux.de


You can change the all resources after compiling with tools like the
Borland Resource Workshop.

I recommend this, because the Gfa-Linker has a BIG bug !
If there is a more complex resource you are linking automaticaly with
the GFA-Linker, it can happens, that your program will hang after some
starts.
I forwarded this problem already long time ago to GFA with no result.
I'm not sure when it get's tricky for the Linker, but maybe there the
problems are appearing, if the sum of bitmaps and  icons within the
resource is about 20.

Workaround: compiling with/without an icon only, adding the ressource
"manually" with the workshop, then it works (same code, no other
tricks). Lousy job, but the safer way !

-Michael

>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Dienstag, 13. Oktober 1998 04:25
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] help/info - ~GFA.DEF 
>
>* List: gfabasic@aachen.linux.de
>
>I don't suppose there is any way to convince GFA-W's wgen.exe to use 
>a modified ~GFA.DEF, is there?  ~GFA.RES can be modified by changing 
>the icon during compile.
>
>I'd like to add version info to GFA-COMPILED, just for fun.  It will
>always replace a modified file w/ the stock file.
>
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:06 1998
Return-Path: <AlanLennon@alanl.globalnet.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zT4rd-00NJiiC>; Tue, 13 Oct 1998 15:51:49 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id CA8FED066; Tue, 13 Oct 1998 17:00:27 +0200 (CEST)
From: Alan Lennon <AlanLennon@alanl.globalnet.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36236B0B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 13 Oct 1998 14:49:32 +0100
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <3622D916.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] help/info - ~GFA.DEF
X-UIDL: 87fbf9eb5404504ad4f5e50551f82584

* List: gfabasic@aachen.linux.de

Tom Record wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> I don't suppose there is any way to convince GFA-W's wgen.exe to use
> a modified ~GFA.DEF, is there?  ~GFA.RES can be modified by changing
> the icon during compile.
> 
> I'd like to add version info to GFA-COMPILED, just for fun.  It will
> always replace a modified file w/ the stock file.

Hi Tom

I use Borlands resource workshop to produce a .RES file which has a
version resource. When compiled and linked the resulting .EXE file
properties contains a version tab (WIN95/98). The resource is specified
in the .GFA source file as

		$LNK RES MYPROG.RES

Is this the type of version info you are referring to?

Regards    Alan

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:11 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zT9C0-00NKSoC>; Tue, 13 Oct 1998 20:29:08 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6952AD066; Tue, 13 Oct 1998 21:37:36 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3623AC02.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981013182840.PVPK21009@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 13 Oct 1998 18:28:40 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 13 Oct 1998 18:28:40 +0000
Subject: Re: [GFA] help/info - ~GFA.DEF
X-UIDL: 2c40330bda7edb03aed264d6654dd831

* List: gfabasic@aachen.linux.de

Hey, Alan
I honestly don't know if we are talking about the same thing.  I find a
lot of things about GFA-W are contradictory.  I'm NOT a "C" programmer, 
so I don *think* like one.  I often form a perception of what a command
or statement does based on *my* understanding of the words within.  I
find that I'm frequently wrong in GFA-W.

I can put statements into my code in the form of unused strings, but I'd
prefer they be inserted by the compiler.  The version I'm trying for is 
the language version, not the platform or O/S.  I'm using v4.38.  wgen.exe
version is 1.07.  The _only_ importance (if any at all) is related to a
mess of tasks I've undertaken.

I am engaged in writing a totally comprehensive software uninstaller.  Yes,
I don't really know what the hell I'm doing!  HouseKeeper has the capability
to locate *ANYTHING* on any drive or disk.  Hidden, system, registry, it can
seek &/or spot *ANYTHING*.  The internal ID of files is a capability.  I have
learned to "reverse engineer" files to the extent that I can "read" *ALL* text
within them.  This capability has become, for me, very important.

I got involved in trying to recognize BO & NB components *BEFORE* they're
installed.  Finding them afterward is of little consequence - the damage they
are designed to do has already been done.  They are remote access & control
programs that allow others to *read* anything they want & perform anything
they choose to do on your computer by way of your internet connection(s).

I've discovered that *some* *.exe & *.dll files contain info on the language
& even on the compiler used.  BO is MS-compiled, NB is Borland-compiled.  It
is just a passing fancy of mine to identify these things within my files.

I know I can include the info I seek in my code & I also know I can link in a
*.res file containing the info.  That makes 2 ways.  I was just curious of it
couldn't be done by tweaking ~gfa.def since *that* is going to be involved in 
every compile.

I have much to learn yet - much of it is learning the inner workings of good
ol' Windows... v3.1 thru early v95 is within reach.  Win98 is another problem 
all by itself because it's not fully backward-compatable to anything but the 
later version(s) of Win95 & perhaps the ultimate WinNT.  GFA-W programs that
are compiled on 98 don't run properly on anything earlier & vice-versa.  I
have to write 98-bound apps without some controls (buttons, etc) because
they don't show up.  Everything I write must work on a 386/Win3.1/no coprocessor
to have the widest possible market.  Win98 doesn't co-operate.

Thank you for taking an interest - perhaps in attempting to be brief I left out
too much of my reasoning.  All suggestions are welcomed as a learning step.

<G>
TomR.



At 02:49 PM 13/10/98 +0100, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Tom Record wrote:
>> 
>> * List: gfabasic@aachen.linux.de
>> 
>> I don't suppose there is any way to convince GFA-W's wgen.exe to use
>> a modified ~GFA.DEF, is there?  ~GFA.RES can be modified by changing
>> the icon during compile.
>> 
>> I'd like to add version info to GFA-COMPILED, just for fun.  It will
>> always replace a modified file w/ the stock file.
>
>Hi Tom
>
>I use Borlands resource workshop to produce a .RES file which has a
>version resource. When compiled and linked the resulting .EXE file
>properties contains a version tab (WIN95/98). The resource is specified
>in the .GFA source file as
>
>		$LNK RES MYPROG.RES
>
>Is this the type of version info you are referring to?
>
>Regards    Alan
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:14 1998
Return-Path: <johnkt@tig.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zTDp5-00NIp9C>; Wed, 14 Oct 1998 01:25:47 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 45B69D074; Wed, 14 Oct 1998 02:34:30 +0200 (CEST)
From: John Knight <johnkt@tig.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3623F196.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 14 Oct 1998 09:25:23 +1000 (EST)
X-Sender: johnkt@tig.com.au
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] TASMANIA
X-UIDL: 65ef86de5894191a91b1bac6c10a0a29

* List: gfabasic@aachen.linux.de

As well as the national flag all Australian states and territories have
their own flags. To view Tasmania's go to the following website
www.dpac.tas.gov.au/emblems/tasflag.htm

John Knight

At 04:41 PM 10/12/98 -0700, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Does anyone on the list know if Tasmania has its own flag or is it the
>Australian flag.
>Of course I need to know and I thank you.
>Dale Bryant
>
>http://www.gfawhelp.gfa.net
>webmaster.gfawhelp@gfa.net
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:16 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zTDvR-00NIpZC>; Wed, 14 Oct 1998 01:32:21 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 59208D077; Wed, 14 Oct 1998 02:41:02 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3623F321.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 13 Oct 1998 16:26:58 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] TASMANIA
X-UIDL: 1a829df126e35b09ddec6f6db8a822eb

* List: gfabasic@aachen.linux.de

HI John,
Thanks for the flag information. I have looked and collected.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: John Knight <johnkt@tig.com.au>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Tuesday, October 13, 1998 4:26 PM
Subject: Re: [GFA] TASMANIA


>* List: gfabasic@aachen.linux.de
>
>As well as the national flag all Australian states and territories have
>their own flags. To view Tasmania's go to the following website
>www.dpac.tas.gov.au/emblems/tasflag.htm
>
>John Knight
>
>At 04:41 PM 10/12/98 -0700, you wrote:
>>* List: gfabasic@aachen.linux.de
>>
>>Does anyone on the list know if Tasmania has its own flag or is it the
>>Australian flag.
>>Of course I need to know and I thank you.
>>Dale Bryant
>>
>>http://www.gfawhelp.gfa.net
>>webmaster.gfawhelp@gfa.net
>>
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:26 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zTdRy-00NDLrC>; Thu, 15 Oct 1998 04:47:38 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0833ED06B; Thu, 15 Oct 1998 05:56:18 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36257262.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 15 Oct 1998 12:19:32 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <3621CA80.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Subject: Re: [GFA] Barcode
X-UIDL: 22acdcd478be57f9060db136db58ffe6

* List: gfabasic@aachen.linux.de

CompuHelp@T-Online.de wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> Hi all !
> 
> Is there noone who can tell me, how to print "Barcodes" from
> GFA-W under Win95 ?
> 
> CU Ren
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

Found something!
This is brand new. A colleague of mine has produced a shareware DLL that
prints barcode labels. I've only seen the prototype and been told the
finished version is more polished. It was uploaded to Simtek only a few
days ago. The filename is DMBC.DLL. It should be callable from GFA. The
bonus is that I know the programmer and he is generally responsive to
alterations. If you can't find it via Simtek, the programmer is Gian
Young, email dataman@camtech.net.au   He owns the Dataman Barcode
Systems company here in Adelaide.

---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:27 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zTgSH-00NDLrC>; Thu, 15 Oct 1998 08:00:09 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9AA12D073; Thu, 15 Oct 1998 09:08:46 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36259F82.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 15 Oct 1998 08:00:57 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] Dialog Questions
X-UIDL: 6e6d208c1344ed971405d9e0ce854194

* List: gfabasic@aachen.linux.de

//Question 1
// Is it possible to do the anti-flickering procedure in an easier way
???

// Question 2
// Is it possible to scroll through the contents of the Multiline field
without
// allowing to edit the field (display only)

// I tried a "READONLY" flag ($800), "Disablew" and other things, but
failed.


antiflicker& = TRUE

Main
> PROCEDURE Main
  DIM WindRect&(3)
  FOR i& = 1 TO 10
    x$ = x$ + "Line..." + STR$(i&) + CHR$(13) + CHR$(10)
  NEXT i&

  opt_3d& = TRUE
  IF opt_3d&
    DLG 3D ON
  ENDIF

  DIALOG #10,10,10,580,454,"Schoeller's Mystery Database",WS_SYSMENU |
DS_MODALFRAME,16,"Helv"
    IF antiflicker& THEN CB DLG(10) WM_PAINT TO WM_PAINT AntiFlicker()

    CONTROL copyr$,999,"static",SS_RIGHT,120,10,425,16
    Embossed(800,18,217,532,2,4) // CONTROL
"",800,"static",$10000007,18,210,532,2
    CONTROL "&Volltext:",924,"static",SS_LEFT,20,259,65,22
    IF TRUE
      dummy% = WS_VSCROLL
    ELSE
      dummy% = ES_AUTOVSCROLL
    ENDIF
    CONTROL "", 111, "edit", $800 |  WS_BORDER | WS_TABSTOP | WS_CHILD |
ES_MULTILINE | dummy%, 86, 257, 461, 113

    Embossed(800,18,378,532,2,4) // CONTROL
"",800,"static",$10000007,18,372,532,2

    buttonx("&Ende"  ,1, 20,390,66,28)
    buttonx("  &<  " ,13,256,390,50,28)

    CONTROL "",840,"static",$10000006,0,0,0,0

  ENDDIALOG
  _WIN$(DLG(10,111)) = x$
  DLG FILL 10,RGB(192,192,192)

  quit& = 0

  pos& = 0

  SETTIMER DLG(10),1,200
  DISABLEW DLG(10,111)

  SHOWDIALOG #10

  DO

    GETEVENT
    SELECT _Mess

    CASE WM_SYSCOMMAND                          // ------------------ //
      SELECT _wParam
      CASE SC_CLOSE                             // Schlieen
        quit& = 1
      ENDSELECT

    CASE WM_COMMAND                             // ------------------ //

      SELECT _wParam
      CASE IDOK //,IDCANCEL                  // Default Enter, Esc ?
        quit& = 1

      CASE 13                                   // "<" Knopf
        pos& = 0
        DialogLoad

      ENDSELECT
    CASE WM_TIMER

      IF pos& < 530 THEN pos& += 5
      DialogLoad

    ENDSELECT
  LOOP UNTIL quit&

  KILLTIMER DLG(10),1
  CLOSEDIALOG #10

  IF opt_3d&
    DLG 3D OFF
  ENDIF

RETURN
> PROCEDURE AntiFlicker(handle&,Mess&,wParam&,lParam%)
  TRY  // Eliminiert Flackern des Scrollpnktchens (vgl. DialogLoad)
    ~GetUpdateRect(handle&,V:WindRect&(0),Mess&) ' Mess& statt dummy
    IF (WindRect&(1) = 376) AND (WindRect&(3) = 383)
      BEGINPAINT handle&,paint$
      ENDPAINT handle&,paint$
      RETVAL 0                    //// schaltet Redraw ab ////
    ENDIF
  CATCH
RETURN
> PROCEDURE DialogLoad
  i& = pos& + 18
  ~MoveWindow(DLG(10,840),i&,376,5,7,TRUE)      '  ...und malen

  'WindRect&(0) = 2                             '  ist nicht notwendig,
da
  'WindRect&(1) = 376                           '  376/383 durch
Knopfgre
  'WindRect&(2) = 530                           '  vordefiniert ist
(wird in
  'WindRect&(3) = 383                           '  MainPaint abgefragt)
  '~InvalidateRect(DLG(10),V:WindRect&(0),FALSE)
RETURN

> PROCEDURE Embossed(id&,x&,y&,w&,h&,mode&)
  IF opt_3d&
    CONTROL "",id&,"static",mode&,x&,y&,w&,h&
  ELSE
    CONTROL "",id& + 2,"static",mode&,x&,y&,w&,h&
    CONTROL "",id& + 1,"static",10 - mode&,x& + 1,y& + 1,w& - 1 ,h& - 1
    CONTROL "",id&,"static",0,x& + 1,y& + 1,w& - 2,h& - 2
  ENDIF
RETURN

PROCEDURE buttonx(text$,nr&,x&,y&,w&,h&)
  CONTROL text$,nr&,"button",$10010000,x&,y&,w&,h&
RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:30 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zThpe-00NIk2C>; Thu, 15 Oct 1998 09:28:22 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9792AD07A; Thu, 15 Oct 1998 10:36:55 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3625B42A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 15 Oct 1998 17:00:19 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <36259F82.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Dialog Questions
X-UIDL: a0ddb1ebf176a7d2337109b347a15186

* List: gfabasic@aachen.linux.de

Vogel Michael wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> //Question 1
> // Is it possible to do the anti-flickering procedure in an easier way
> ???
> 
> // Question 2
> // Is it possible to scroll through the contents of the Multiline field
> without
> // allowing to edit the field (display only)
> 
> // I tried a "READONLY" flag ($800), "Disablew" and other things, but
> failed.
> 

I don't know the answer to Question 1 and I spent some time on 2. I may
have something that works.
Basically I get the handle of the editbox then check to see if the focus
has moved to it. If it has, I move the focus off to something else. It
isn't an elegant solution but it seems to work. I was able to scroll the
editbox OK.

  edid&=DLG(10,111)		'added this line to get the handle of the editbox
  DO
    GETEVENT
    gh&=GetFocus()		'get the current focus
    IF gh&=edid& THEN ~SetFocus(DLG(10,1))	'if it is the editbox, shift
it
    SELECT _Mess



---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 02:51:32 1998
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zTtUG-00NKgzC>; Thu, 15 Oct 1998 21:55:04 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 77D4AD07F; Thu, 15 Oct 1998 23:03:51 +0200 (CEST)
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36266337.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-Sender: gfa@bero-online.ml.org
X-Mailer: Windows Eudora Light Version 1.5.4 (16)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 15 Oct 1998 23:03:46 +0200 (CEST)
Subject: Re: [GFA] GFA and CGI
X-UIDL: 1873cc49f56f27655014c83f31aa7ad2

* List: gfabasic@aachen.linux.de


>    Does anyone know how to handle CGI in GFA basic?
> . . Web Evolution / neurotica dot org
> . . Email:  webmaestro@web-evolution.com
> . . Web Site:
> . .     http://www.web-evolution.com
> . .     http://www.neurotica.org
> . . IRC Dalnet: John-Drake


It is a little bit difficult.
The best solution is to use WinCGI interface, that
handles all CGI variables by passing temporary INI
files.
Real CGI, using standard input and output, can be
done in a stable way within Win32 only.
You have to declare a lot of Win32 API functions,
using the WOW interface (because GFA-BASIC is a
16 bit language, fast, but limited to 16 Bit API
calls).
Some of the Win32 API functions that will help you:
- GetStdHandle
- SetStdHandle
- WriteConsole (or just WriteFile)
- ReadConsoleInput (or just ReadFile)

You can get an overview for Win32 API at
http://www.microsoft.com/msdn or
ftp.inprise.com (ftp.borland.com).
On Inprise's FTP server search for
win32api.zip, that contains a large
Windows help file with nearly all of
the Win32 API calls - free of charge.

Yours

Sven Thomas
GFA Support




+++ How to contact GFA +++
FTP: ftp://ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
WWW: http://ourworld.compuserve.com/homepages/gfasoft



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 21:28:50 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zTxyf-00NGjWC>; Fri, 16 Oct 1998 02:42:45 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4E1DBD07F; Fri, 16 Oct 1998 03:51:33 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3626A6A5.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 15 Oct 1998 20:42:23 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Dialog Questions
X-UIDL: d3829480cad9982cdaf670bd49554c2d

* List: gfabasic@aachen.linux.de

Thanks for your post. You seem to have made a remarkable discovery
regarding the way GFA handles dialogues.


I think you've nailed nearly the minimum configuration.
I deleted 5 more lines that seem unnecessary.
Note in one of those lines that AND is not a boolean operator. 
Use "&&"  as the booean version of "and".
Since youre not doing anything in the procedure, 
I'm would guess that TRY is unnecessary.

Note that (presumably) DefWindowsProc()  paints of  the dialoge in 
response to the WM_ERASEBKGND message,which is issued by 
your BEGINPAINT function. 

It is appartently GFA that  blanks the dialogue 
if you dont process the WM_PAINT message first.


// Revisions

CB DLG(10), WM_PAINT, AntiFlicker()

PROCEDURE AntiFlicker(handle&,Mess&,wParam&,lParam%)
    LOCALl paint$
    BEGINPAINT handle&,paint$
    ENDPAINT handle&,paint$
    RETVAL 0                    //// schaltet Redraw ab ////
RETURN


// deleted lines 

'  TRY  // Eliminiert Flackern des Scrollpnktchens (vgl. DialogLoad)
    '    ~GetUpdateRect(handle&,V:WindRect&(0),Mess&) ' Mess& statt dummy
    '   IF (WindRect&(1) = 376) AND (WindRect&(3) = 383)
    'ENDIF
'  CATCH

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 21:28:51 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zTzIF-00NIjxC>; Fri, 16 Oct 1998 04:07:03 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 16B9DD080; Fri, 16 Oct 1998 05:15:52 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3626BA68.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981016020608.GHNG29685@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 16 Oct 1998 02:06:08 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 16 Oct 1998 02:06:08 +0000
Subject: [GFA] help: $ABIG   1510xx1-
X-UIDL: 081af7bfcb996287368ebb196d14e380

* List: gfabasic@aachen.linux.de

15/10/98 08:49:39 PM   help: $ABIG   1510xx1-

After compile I get :
$ABIG missing [4]: Dim too big!

I tried this, but still get the error :
DIM bo_dat$(30000)
$ABIG bo_dat$()

Would appreciate guidance - I don't find it in use altho I probably 
have at least one example... somewhere.

Thank you
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 21:28:55 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zU3YM-00NIlbC>; Fri, 16 Oct 1998 08:39:58 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9D2F1D081; Fri, 16 Oct 1998 09:48:44 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3626FA5C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 16 Oct 1998 08:41:01 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] help: $ABIG   1510xx1-
X-UIDL: 518c2fbc1d363bc7b006633da3a93768

* List: gfabasic@aachen.linux.de

Try $CHKA+ to check what's going on wrong...
Maybe you have to change the order of the two lines

>$ABIG bo_dat$()
>DIM bo_dat$(30000)

- Michael 


>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Freitag, 16. Oktober 1998 03:06
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] help: $ABIG   1510xx1-
>
>* List: gfabasic@aachen.linux.de
>
>15/10/98 08:49:39 PM   help: $ABIG   1510xx1-
>
>After compile I get :
>$ABIG missing [4]: Dim too big!
>
>I tried this, but still get the error :
>DIM bo_dat$(30000)
>$ABIG bo_dat$()
>
>Would appreciate guidance - I don't find it in use altho I probably 
>have at least one example... somewhere.
>
>Thank you
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 21:28:59 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zU4VI-00NIpqC>; Fri, 16 Oct 1998 09:40:52 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1EF4ED083; Fri, 16 Oct 1998 10:49:30 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3627089A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981016074032.KUJF29685@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 16 Oct 1998 07:40:32 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 16 Oct 1998 07:40:32 +0000
Subject: Re: AW: [GFA] help: $ABIG   1510xx1-
X-UIDL: 8d7c4e73fc8a6679f4d4e6f810750239

* List: gfabasic@aachen.linux.de

Didn't think of that - thanks.  I *think* I've seen it somewhere, but
an hour of looking doesn't turn it up.  The prog works OK from the
interpretor, but bombs after compile.  Just my day, I guess.
Thanks, Michael
<G>
TomR.


At 08:41 AM 16/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Try $CHKA+ to check what's going on wrong...
>Maybe you have to change the order of the two lines
>
>>$ABIG bo_dat$()
>>DIM bo_dat$(30000)
>
>- Michael 
>
>
>>----------
>>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>>Gesendet: 	Freitag, 16. Oktober 1998 03:06
>>An: 	gfabasic@aachen.linux.de
>>Betreff: 	[GFA] help: $ABIG   1510xx1-
>>
>>* List: gfabasic@aachen.linux.de
>>
>>15/10/98 08:49:39 PM   help: $ABIG   1510xx1-
>>
>>After compile I get :
>>$ABIG missing [4]: Dim too big!
>>
>>I tried this, but still get the error :
>>DIM bo_dat$(30000)
>>$ABIG bo_dat$()
>>
>>Would appreciate guidance - I don't find it in use altho I probably 
>>have at least one example... somewhere.
>>
>>Thank you
>><G>
>>TomR.
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 16 21:29:00 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zU4bp-00NJlIC>; Fri, 16 Oct 1998 09:47:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E731AD084; Fri, 16 Oct 1998 10:56:22 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36270A37.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981016074725.KUZZ29685@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 16 Oct 1998 07:47:25 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 16 Oct 1998 07:47:25 +0000
Subject: [GFA] $ABIG
X-UIDL: d5e2a59d4fcbf6c7272a09a98c9a7920

* List: gfabasic@aachen.linux.de

Dv& = _DRIVE
Dr$ = DIR$(0)
$ABIG bo_dat$()
DIM bo_dat$(30000)

Michael
Absolutely right... $ABIG must be before the DIM statement.  Cleard the whole
problem up, just reversing their order.

Thank you, thank you, thank you, thank you, thank you, thank you, thank you!
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 17 00:07:23 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUEfb-00NKZ1C>; Fri, 16 Oct 1998 20:32:11 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 42955D066; Fri, 16 Oct 1998 21:40:54 +0200 (CEST)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3627A149.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 16 Oct 1998 21:28:34 +0000
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Some new listings
X-UIDL: 1b7bb2b0fb37de1ca5570a1945adf6ca

* List: gfabasic@aachen.linux.de

Hallo,
I have added some new listings to my homepage.
One of this is a viewer for formatted text similar (but not equal)
to HTML. It's simple to implement into existing projects - to make
an internal help or what ever You like ;-)
Bye, Roland Walter

http://userpage.fu-berlin.de/~alibaba/gfabasic/


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 17 00:07:25 1998
Return-Path: <MAILER-DAEMON>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from server012.anpost.ie (194.125.4.65) with smtp
	  id <m0zUEhJ-00NKTZC>; Fri, 16 Oct 1998 20:33:57 +0200 (MEST)
Received: from server012.anpost.ie [194.125.4.65]
	(HELO localhost)
	by server012.anpost.ie (AltaVista Mail V2.0J/2.0J BL25J listener)
	id 0000_00da_3627_9397_6d3c;
	Fri, 16 Oct 1998 19:42:31 +0100
Message-ID: <27ABB936BC44D211AB2400805FC18A9401A5B7@server010.anpost.ie>
From: Sean Murray <Sean.Murray@anpost.ie>
To: Roland Walter <alibaba@zedat.fu-berlin.de>
Subject: Out of Office AutoReply: [GFA] Some new listings
Date: Fri, 16 Oct 1998 19:33:54 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2232.9)
Content-Type: multipart/alternative;
	boundary="----_=_NextPart_001_01BDF933.87AC1BF6"
X-UIDL: 6058e51b1944a3ad2d7a64d7e485ab23

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">
<META NAME="Generator" CONTENT="MS Exchange Server version 5.5.2232.0">
<TITLE>Out of Office AutoReply: [GFA] Some new listings</TITLE>
</HEAD>
<BODY>

<P><FONT SIZE=2>Thank you for your message. I'm currently out of the office and will be back on Monday 21th of October so I'll get back to you then.</FONT></P>

<P><FONT SIZE=2>Regards</FONT>
<BR><FONT SIZE=2>Sean Murray</FONT>
</P>

</BODY>
</HTML></x-html>From ???@??? Sun Oct 18 16:22:56 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUebR-00M4GHC>; Sun, 18 Oct 1998 00:13:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 87ADBD074; Sun, 18 Oct 1998 01:22:24 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362926B0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sat, 17 Oct 1998 14:54:08 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] FORMTEXT
X-UIDL: f074123c13b675b8c8d79feec7c69dac

* List: gfabasic@aachen.linux.de

ALL,
If you haven't grabbed FORMTEXT by Roland Walter you are making a big
mistake. This is really a great utility. Roland has put a lot of options in
this program and I love it!
FORMTEXT provides a fantastic way to have small help files incorporated into
you program.  Use tags like HTML and is very easy to use and write your own
RTM (file extension).
Good grief, don't miss this one!
Available from Rolands web site or the GFAWHELP web site.
Sorry Roland, this one was just too good to pass up!
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 18 19:13:55 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUtlc-00NIoYC>; Sun, 18 Oct 1998 16:25:08 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9F384D077; Sun, 18 Oct 1998 17:33:54 +0200 (CEST)
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A0A62.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id QAA22044 for <gfabasic@linux.net.eu.org>; 
          Sun, 18 Oct 1998 16:24:43 +0200 (MET DST)
Date: Sun, 18 Oct 1998 16:24:59 +0100
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: [GFA] FORMTEXT
X-UIDL: 5090a0f3b59b1a5083e388970ffa0ef7

* List: gfabasic@aachen.linux.de

Hi Dale,
I downloaded the file Formtext.zip from Roland Walter and unzipped
it.

I started the Formtext.exe and tried to open the two example files,
but it was impossible. I got an error message 'GFA-BASIC Runtime
Error -002'.

I started the GFA Interpreter (version 4.36) and tried to open te
file Formtext.gfw, but it was impossible. I tried to merge the file
Formtext.lst - also impossible.

But I could have look at Formtext.lst in an ordinary text editor, and
even print it out (11 pages).

It is not the first time this problem occurs. Why all these troubles?

Sven Kumlin

----------
> Frn: Dale Bryant <adbryant@email.msn.com>
> Till: gfabasic@aachen.linux.de
> mne: [GFA] FORMTEXT
> Datum:  den 17 oktober 1998 22:54
> 
> * List: gfabasic@aachen.linux.de
> 
> ALL,
> If you haven't grabbed FORMTEXT by Roland Walter you are making a
big
> mistake. This is really a great utility. Roland has put a lot of
options in
> this program and I love it!
> FORMTEXT provides a fantastic way to have small help files
incorporated into
> you program.  Use tags like HTML and is very easy to use and write
your own
> RTM (file extension).
> Good grief, don't miss this one!
> Available from Rolands web site or the GFAWHELP web site.
> Sorry Roland, this one was just too good to pass up!
> Dale Bryant
> 
> http://www.gfawhelp.gfa.net
> webmaster.gfawhelp@gfa.net
> 
> 
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Oct 18 19:13:57 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUuCQ-00NIoBC>; Sun, 18 Oct 1998 16:52:50 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 1EAAAD07A; Sun, 18 Oct 1998 18:01:45 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A10E9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 18 Oct 1998 07:40:11 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] FORMTEXT
X-UIDL: 55f2d520b61a5ae54c2f4de21206d148

* List: gfabasic@aachen.linux.de

HI Sven,
I think you must have received a bad download. Everything works perfect for
me. I can run it in the editor or from the included .exe.  Maybe you should
try another download. If not successful let me know and I will try an file
attachment to you to see if that works. As I said, my copy seems to work
flawlessly. I have even created my own .RTM file just to try it out. Let me
know.
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Sven Kumlin <sven.kumlin@swipnet.se>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Sunday, October 18, 1998 7:26 AM
Subject: SV: [GFA] FORMTEXT


>* List: gfabasic@aachen.linux.de
>
>Hi Dale,
>I downloaded the file Formtext.zip from Roland Walter and unzipped
>it.
>
>I started the Formtext.exe and tried to open the two example files,
>but it was impossible. I got an error message 'GFA-BASIC Runtime
>Error -002'.
>
>I started the GFA Interpreter (version 4.36) and tried to open te
>file Formtext.gfw, but it was impossible. I tried to merge the file
>Formtext.lst - also impossible.
>
>But I could have look at Formtext.lst in an ordinary text editor, and
>even print it out (11 pages).
>
>It is not the first time this problem occurs. Why all these troubles?
>
>Sven Kumlin
>
>----------
>> Frn: Dale Bryant <adbryant@email.msn.com>
>> Till: gfabasic@aachen.linux.de
>> mne: [GFA] FORMTEXT
>> Datum:  den 17 oktober 1998 22:54
>>
>> * List: gfabasic@aachen.linux.de
>>
>> ALL,
>> If you haven't grabbed FORMTEXT by Roland Walter you are making a
>big
>> mistake. This is really a great utility. Roland has put a lot of
>options in
>> this program and I love it!
>> FORMTEXT provides a fantastic way to have small help files
>incorporated into
>> you program.  Use tags like HTML and is very easy to use and write
>your own
>> RTM (file extension).
>> Good grief, don't miss this one!
>> Available from Rolands web site or the GFAWHELP web site.
>> Sorry Roland, this one was just too good to pass up!
>> Dale Bryant
>>
>> http://www.gfawhelp.gfa.net
>> webmaster.gfawhelp@gfa.net
>>
>>
>>
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:18:54 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUvUp-00NIpJC>; Sun, 18 Oct 1998 18:15:55 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4FEFAD07B; Sun, 18 Oct 1998 19:24:50 +0200 (CEST)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A2462.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Sun, 18 Oct 1998 19:06:43 +0000
In-Reply-To: <362926B0.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Re: FORMTEXT
X-UIDL: e308a680e6024a40dc4cb1edc075bdb6

* List: gfabasic@aachen.linux.de

At 14:54 17.10.1998 -0700, you wrote:

A good change to FORMTEXT:
(Viewer for floating text with formatting similar to HTML)

I found the information in MS Knowledge Base that the function
ExtTextOut is the lowest level text drawing function and
TextOut is essentially a call to ExtTextOut
As result the ExtTextOut function is more fast then TextOut.
I have tested this on a 386SX 20MHz and could see the complete
text window was much faster drawn with ExtTextOut. Now on this
slow old computer there is nearly a sudden repaint.

To simple change TEXTVIEW.LST do the following:

Search for:     ~TextOut(hDC&,0,0,SUB(BeginOfWord%,1),1)
Replace by:     ~ExtTextOut(hDC&,0,0,0,0,SUB(BeginOfWord%,1),1,0)

Search for:     ~TextOut(hDC&,0,0,BeginOfWord%,lenWord&)
Replace by:     ~ExtTextOut(hDC&,0,0,0,0,BeginOfWord%,lenWord&,0)

I have replaced the listing on my home page by the new one.
http://userpage.fu-berlin.de/~alibaba/gfabasic/

Bye, Roland



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:18:55 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUvd4-00NIo0C>; Sun, 18 Oct 1998 18:24:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 80ED1D07D; Sun, 18 Oct 1998 19:33:20 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A2660.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981018162417.MCAZ27258@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 18 Oct 1998 16:24:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Sun, 18 Oct 1998 16:24:17 +0000
Subject: Re: SV: [GFA] FORMTEXT
X-UIDL: fbd68b2f10652c617a930196a4dc4971

* List: gfabasic@aachen.linux.de

If one of you is using Win98 & the other isn't, *there* is one problem.
TomR.



At 04:24 PM 18/10/98 +0100, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi Dale,
>I downloaded the file Formtext.zip from Roland Walter and unzipped
>it.
>
>I started the Formtext.exe and tried to open the two example files,
>but it was impossible. I got an error message 'GFA-BASIC Runtime
>Error -002'.
>
>I started the GFA Interpreter (version 4.36) and tried to open te
>file Formtext.gfw, but it was impossible. I tried to merge the file
>Formtext.lst - also impossible.
>
>But I could have look at Formtext.lst in an ordinary text editor, and
>even print it out (11 pages).
>
>It is not the first time this problem occurs. Why all these troubles?
>
>Sven Kumlin
>
>----------
>> Frn: Dale Bryant <adbryant@email.msn.com>
>> Till: gfabasic@aachen.linux.de
>> mne: [GFA] FORMTEXT
>> Datum:  den 17 oktober 1998 22:54
>> 
>> * List: gfabasic@aachen.linux.de
>> 
>> ALL,
>> If you haven't grabbed FORMTEXT by Roland Walter you are making a
>big
>> mistake. This is really a great utility. Roland has put a lot of
>options in
>> this program and I love it!
>> FORMTEXT provides a fantastic way to have small help files
>incorporated into
>> you program.  Use tags like HTML and is very easy to use and write
>your own
>> RTM (file extension).
>> Good grief, don't miss this one!
>> Available from Rolands web site or the GFAWHELP web site.
>> Sorry Roland, this one was just too good to pass up!
>> Dale Bryant
>> 
>> http://www.gfawhelp.gfa.net
>> webmaster.gfawhelp@gfa.net
>> 
>> 
>> 
>> 
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:19:00 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUwBg-00NIo0C>; Sun, 18 Oct 1998 19:00:12 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B10F5D07E; Sun, 18 Oct 1998 20:09:05 +0200 (CEST)
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A2EC1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id SAA08342 for <gfabasic@linux.net.eu.org>; 
          Sun, 18 Oct 1998 18:59:48 +0200 (MET DST)
Date: Sun, 18 Oct 1998 19:00:05 +0100
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="----=_NextPart_000_01BDFAC9.84A331A0"
Content-Transfer-Encoding: 7bit
Subject: SV: [GFA] FORMTEXT
X-UIDL: b4e1476116f19933c5e6802b1c58fd52

Hi Dale,
Possibly my problems depends on a bad download. I will try a new
download later on.

Now I have to let you know about another strange occurence today. At
the same time as I received your mail, time stamp 15.53, I also had
my own mail back from MILER-DAEMON@mailin00.btx.dtag.de, about the
subject "mail failed, returning to sender". This mail had time stamp
15.56.

How can they send my mail back whith an error message, when you
already had recieved it? I don't understand anything, but I attach
the file for information.

Sven

----------
> Frn: Dale Bryant <adbryant@email.msn.com>
> Till: gfabasic@aachen.linux.de
> mne: Re: [GFA] FORMTEXT
> Datum:  den 18 oktober 1998 15:40
> 
> * List: gfabasic@aachen.linux.de
> 
> HI Sven,
> I think you must have received a bad download. Everything works
perfect for
> me. I can run it in the editor or from the included .exe.  Maybe
you should
> try another download. If not successful let me know and I will try
an file
> attachment to you to see if that works. As I said, my copy seems to
work
> flawlessly. I have even created my own .RTM file just to try it
out. Let me
> know.
> Dale Bryant

Attachment Converted: "c:\programme\eudora\attach\mail failed, returning to sender.txt"
From ???@??? Tue Oct 20 12:19:02 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUwEl-00NJiwC>; Sun, 18 Oct 1998 19:03:23 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 26694D07F; Sun, 18 Oct 1998 20:12:17 +0200 (CEST)
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A2F81.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id TAA11760 for <gfabasic@linux.net.eu.org>; 
          Sun, 18 Oct 1998 19:03:07 +0200 (MET DST)
Date: Sun, 18 Oct 1998 19:04:01 +0100
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: SV: [GFA] FORMTEXT
X-UIDL: c957fec0c152cc3df7c9fbe4dc8432f6

* List: gfabasic@aachen.linux.de

Hi Tom,
I am using Windows 95. Perhaps Roland Walter is using W98?

Sven

----------
Frn: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Till: gfabasic@aachen.linux.de
mne: Re: SV: [GFA] FORMTEXT
Datum:  den 18 oktober 1998 17:24

* List: gfabasic@aachen.linux.de

If one of you is using Win98 & the other isn't, *there* is one
problem.
TomR.


At 04:24 PM 18/10/98 +0100, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi Dale,
>I downloaded the file Formtext.zip from Roland Walter and unzipped
>it.
>
>I started the Formtext.exe and tried to open the two example files,
>but it was impossible. I got an error message 'GFA-BASIC Runtime
>Error -002'.
>
>I started the GFA Interpreter (version 4.36) and tried to open te
>file Formtext.gfw, but it was impossible. I tried to merge the file
>Formtext.lst - also impossible.
>
>But I could have look at Formtext.lst in an ordinary text editor,
and
>even print it out (11 pages).
>
>It is not the first time this problem occurs. Why all these
troubles?
>
>Sven Kumlin
>
>----------
>> Frn: Dale Bryant <adbryant@email.msn.com>
>> Till: gfabasic@aachen.linux.de
>> mne: [GFA] FORMTEXT
>> Datum:  den 17 oktober 1998 22:54
>> 
>> * List: gfabasic@aachen.linux.de
>> 
>> ALL,
>> If you haven't grabbed FORMTEXT by Roland Walter you are making a
>big
>> mistake. This is really a great utility. Roland has put a lot of
>options in
>> this program and I love it!
>> FORMTEXT provides a fantastic way to have small help files
>incorporated into
>> you program.  Use tags like HTML and is very easy to use and write
>your own
>> RTM (file extension).
>> Good grief, don't miss this one!
>> Available from Rolands web site or the GFAWHELP web site.
>> Sorry Roland, this one was just too good to pass up!
>> Dale Bryant
>> 
>> http://www.gfawhelp.gfa.net
>> webmaster.gfawhelp@gfa.net
>> 
>> 
>> 
>> 
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org
----------


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:19:05 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUwog-00NJiqC>; Sun, 18 Oct 1998 19:40:30 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C7363D081; Sun, 18 Oct 1998 20:49:20 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A3830.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 18 Oct 1998 10:35:20 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] FORMTEXT
X-UIDL: d696b097919cf864ba0a0cd539494897

* List: gfabasic@aachen.linux.de

Hi Sven,
I don't know how this happens but I also get it all the time. Bernard
probably knows. I just delete them and forget about as the original message
has already come back to me I know it got through ok.
Perhaps Bernard will enlighten us both.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Sven Kumlin <sven.kumlin@swipnet.se>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Sunday, October 18, 1998 10:01 AM
Subject: SV: [GFA] FORMTEXT


>Hi Dale,
>Possibly my problems depends on a bad download. I will try a new
>download later on.
>
>Now I have to let you know about another strange occurence today. At
>the same time as I received your mail, time stamp 15.53, I also had
>my own mail back from MILER-DAEMON@mailin00.btx.dtag.de, about the
>subject "mail failed, returning to sender". This mail had time stamp
>15.56.
>
>How can they send my mail back whith an error message, when you
>already had recieved it? I don't understand anything, but I attach
>the file for information.
>
>Sven
>
>----------
>> Frn: Dale Bryant <adbryant@email.msn.com>
>> Till: gfabasic@aachen.linux.de
>> mne: Re: [GFA] FORMTEXT
>> Datum:  den 18 oktober 1998 15:40
>>
>> * List: gfabasic@aachen.linux.de
>>
>> HI Sven,
>> I think you must have received a bad download. Everything works
>perfect for
>> me. I can run it in the editor or from the included .exe.  Maybe
>you should
>> try another download. If not successful let me know and I will try
>an file
>> attachment to you to see if that works. As I said, my copy seems to
>work
>> flawlessly. I have even created my own .RTM file just to try it
>out. Let me
>> know.
>> Dale Bryant
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:19:09 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUxME-00NJinC>; Sun, 18 Oct 1998 20:15:10 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C6738D082; Sun, 18 Oct 1998 21:24:04 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A4054.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 18 Oct 1998 11:10:05 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: SV: [GFA] FORMTEXT
X-UIDL: a8b558f9fbe22e9b7f288086fd217b4d

* List: gfabasic@aachen.linux.de

I am using w95 and it works great!
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net
-----Original Message-----
From: Sven Kumlin <sven.kumlin@swipnet.se>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Sunday, October 18, 1998 10:04 AM
Subject: SV: SV: [GFA] FORMTEXT


>* List: gfabasic@aachen.linux.de
>
>Hi Tom,
>I am using Windows 95. Perhaps Roland Walter is using W98?
>
>Sven
>
>----------
>Frn: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>Till: gfabasic@aachen.linux.de
>mne: Re: SV: [GFA] FORMTEXT
>Datum:  den 18 oktober 1998 17:24
>
>* List: gfabasic@aachen.linux.de
>
>If one of you is using Win98 & the other isn't, *there* is one
>problem.
>TomR.
>
>
>At 04:24 PM 18/10/98 +0100, you wrote:
>>* List: gfabasic@aachen.linux.de
>>
>>Hi Dale,
>>I downloaded the file Formtext.zip from Roland Walter and unzipped
>>it.
>>
>>I started the Formtext.exe and tried to open the two example files,
>>but it was impossible. I got an error message 'GFA-BASIC Runtime
>>Error -002'.
>>
>>I started the GFA Interpreter (version 4.36) and tried to open te
>>file Formtext.gfw, but it was impossible. I tried to merge the file
>>Formtext.lst - also impossible.
>>
>>But I could have look at Formtext.lst in an ordinary text editor,
>and
>>even print it out (11 pages).
>>
>>It is not the first time this problem occurs. Why all these
>troubles?
>>
>>Sven Kumlin
>>
>>----------
>>> Frn: Dale Bryant <adbryant@email.msn.com>
>>> Till: gfabasic@aachen.linux.de
>>> mne: [GFA] FORMTEXT
>>> Datum:  den 17 oktober 1998 22:54
>>>
>>> * List: gfabasic@aachen.linux.de
>>>
>>> ALL,
>>> If you haven't grabbed FORMTEXT by Roland Walter you are making a
>>big
>>> mistake. This is really a great utility. Roland has put a lot of
>>options in
>>> this program and I love it!
>>> FORMTEXT provides a fantastic way to have small help files
>>incorporated into
>>> you program.  Use tags like HTML and is very easy to use and write
>>your own
>>> RTM (file extension).
>>> Good grief, don't miss this one!
>>> Available from Rolands web site or the GFAWHELP web site.
>>> Sorry Roland, this one was just too good to pass up!
>>> Dale Bryant
>>>
>>> http://www.gfawhelp.gfa.net
>>> webmaster.gfawhelp@gfa.net
>>>
>>>
>>>
>>>
>>> ---
>>> This mailing list is currently running BeroList v2.5.6
>>> Report problems to bero@bero-online.ml.org
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>----------
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:19:12 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zUz9w-00NJivC>; Sun, 18 Oct 1998 22:10:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id CAEA6D083; Sun, 18 Oct 1998 23:19:24 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362A5B5D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sun, 18 Oct 1998 13:05:26 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] NEW
X-UIDL: 3bacfa6a83e8da376aba5a32eab199fd

* List: gfabasic@aachen.linux.de

FORMTEXT.ZIP, by Roland Walter Has been updated to make it faster. This is a
great utility for including small help files for your programs in a separate
Window. This utility reads .RTM (Roland Text Markup) files. The .RTM files
are easily created in a text editor such as Notepad. If you have a text
editor that can have more than one file open at a time just load format.rtm
and write your .RTM file in another Window. You can download it from the
Roland Walter web site or from the GFAWHELP site below. Don't miss this
one!!
Also the 'Not Affiliated With GFA News Letter'  that have been sent to
subscribers are also available for download.  Click on Letters from the
index page to go to the news letter archive page. All future news letters
will be archived here.
Have a great week!
Dale Bryant

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:19:18 1998
Return-Path: <Hannu.Pohjanheimo@snafu.phys.jyu.fi>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zV84K-00NIZ2C>; Mon, 19 Oct 1998 07:41:24 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 65887D0E6; Mon, 19 Oct 1998 08:50:20 +0200 (CEST)
From: Hannu Pohjanheimo <Hannu.Pohjanheimo@snafu.phys.jyu.fi>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362AE12C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 19 Oct 1998 08:39:39 +0200
X-Mailer: Mozilla 4.04 [en] (WinNT; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Drag&drop
X-UIDL: 8a1b333cbdc20a39e103f1026960762c

* List: gfabasic@aachen.linux.de

hi there

I have an application that should be started in FileManager or Explorer,
either with dragging a file over the application name or using file
extension association. I can get the file name and path with _dosCmd$.
But I should know which one, drag&drop or association, is used.

Anyone know, how to solve it. 


In WIN3 the DIR$(0) gives the application path or the file path
depending of the start method, but it can't be used in WIN95.

DIR$(0) forgets part of the path if there is spaces in dir names e.g
"Program Files".
You can get the application start path in short form with:

hnd&=_INSTANCE                // handle of the app
name$=SPACE$(255)             // space for app name+path
a&= GetModuleFileName(hnd&,V:name$,255) // get it
name$=LEFT$(name$,a&)                    // remove empty space or TRIM$
startpath$=LEFT$(name$,RINSTR(name$,"\"))  // remove app name

Hannu Pohjanheimo

http://www.jyu.fi/~hanpohj/

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:19:22 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVCuG-00NJitC>; Mon, 19 Oct 1998 12:51:20 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 41147D0E8; Mon, 19 Oct 1998 13:59:57 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362B29BD.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981019105055.BGVK25846@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 19 Oct 1998 10:50:55 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 19 Oct 1998 10:50:55 +0000
Subject: [GFA] Problem   1910xx1-
X-UIDL: fe23e2813ddd01c4aee032af980c3029

* List: gfabasic@aachen.linux.de

19/10/98 05:18:30 AM   Problem   1910xx1-

~StretchBlt(hdc&, x&, y&, {lpRect%}.rcRight, {lpRect%}.rcBottom, 
pic.picHdc, 0, 0, pic.picWidth, pic.picHeight, SRCCOPY)

I've gone crazy trying to scale an image to display at it's own 
proportions with the above.  As that stands, imageX is stretched to 
clientX & imageY is stretched to clientY... at any size of window.

Am presently using a window:
OPENW #1,scrnX / 4, scrnY / 4, scrnX / 2, scrnY / 2,752

It appears at mid-screen, regardless of the display mode.  scrnX & 
scrnY are obtained with GetSysMetrics.

Am doing CLS w/ GetNearest(), so there should always be some gray 
above & below or left & right of the image... _IF_ I could get the 
image scaled to it's own proportions.

Can somebody please point me to the right way to scale it?  I'm 
consuming Aspirin by the Kg!

Thanks
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 12:19:33 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVODK-00MM53C>; Tue, 20 Oct 1998 00:55:46 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 20F79D0EA; Tue, 20 Oct 1998 02:04:38 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362BD398.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Mon, 19 Oct 1998 15:50:25 -0700
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Importance: Normal
Subject: [GFA] NEW FILES
X-UIDL: 30fa8c5df53a2f41a40622780b2a82d1

* List: gfabasic@aachen.linux.de

ALL,
Just posted for download on the GFAWHELP web page.
1. WAC- Windows Arc Converter by Bev Brown
2. COMPRESS- Contains every compression program know to man and Bev Brown
Windows Arc Converter looks for the compression files in a folder named
COMPRESS. Be sure and UNZIP COMPRESS into a folder named COMPRESS.

Let me make this perfectly clear. UNZIP COMPRESS into a folder with the same
name as the zip file.
if you unzip COMPRESS into some other folder WAC will not find all those
compression programs.
There may be a penalty if you unzip COMPRESS incorrectly. (G)


http://www.gfa.net/adbryant/index.htm




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:44:52 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVXzW-00MM7gC>; Tue, 20 Oct 1998 11:22:10 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E26D9D06B; Tue, 20 Oct 1998 12:31:01 +0200 (CEST)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362C6666.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Sun, 18 Oct 1998 19:24:54 +0000
In-Reply-To: <362A0A62.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: SV: [GFA] FORMTEXT
X-UIDL: 7587981aa9640c4fcf4cd422b7cbd77c

* List: gfabasic@aachen.linux.de

At 16:24 18.10.1998 +0100, you wrote:

>(...) unzipped
>(...) open the two example files (...) was impossible
>(...) open the file Formtext.gfw (...) was impossible
>It is not the first time this problem occurs. Why all these troubles?

Hello Sven Kumlin,
If there is no general problem while downloading it also could be
Your UnZip tool is wrong.

My recommendation:
Use the current Windows Commander 3.51 - a phantastic file manager
with bult-in ZIP/ARJ/LHA and so on. (And also with built-in FTP)
You will get it here:
http://www.ghisler.com
There are 16 bit and 32 bit versions. Also the Windows Commander
supports several languages. I think the program is a "Must Be" for
programmers.
The one and only shareware restriction is a reminder at startup.
(Registration on the other hand is cheap.)

Bye, Roland



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:49:44 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVY7q-00MM7xC>; Tue, 20 Oct 1998 11:30:46 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A675BD0E9; Tue, 20 Oct 1998 12:39:22 +0200 (CEST)
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362C685A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 20 Oct 1998 05:29:55 -0400
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
In-Reply-To: <362C6666.BeroList-2.5.8@aachen.linux.de>
Subject: RE: SV: [GFA] FORMTEXT
X-UIDL: 2c7c240023500895971cd0a6c904d7b1

* List: gfabasic@aachen.linux.de

Morning Roland:

Time to get on to Win Commanders home page; version is now 3.52!

                    -->Bev<--
 

> -----Original Message-----
> From: Roland Walter [mailto:alibaba@zedat.fu-berlin.de]
> Sent: October 18, 1998 1525 Bev
> To: gfabasic@aachen.linux.de
> Subject: Re: SV: [GFA] FORMTEXT
> 
> 
> * List: gfabasic@aachen.linux.de
> 
> At 16:24 18.10.1998 +0100, you wrote:
> 
> >(...) unzipped
> >(...) open the two example files (...) was impossible
> >(...) open the file Formtext.gfw (...) was impossible
> >It is not the first time this problem occurs. Why all these troubles?
> 
> Hello Sven Kumlin,
> If there is no general problem while downloading it also could be
> Your UnZip tool is wrong.
> 
> My recommendation:
> Use the current Windows Commander 3.51 - a phantastic file manager
> with bult-in ZIP/ARJ/LHA and so on. (And also with built-in FTP)
> You will get it here:
> http://www.ghisler.com
> There are 16 bit and 32 bit versions. Also the Windows Commander
> supports several languages. I think the program is a "Must Be" for
> programmers.
> The one and only shareware restriction is a reminder at startup.
> (Registration on the other hand is cheap.)
> 
> Bye, Roland
> 
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:49:47 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVYtJ-00MM60C>; Tue, 20 Oct 1998 12:19:49 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A4E2AD0EC; Tue, 20 Oct 1998 13:25:20 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362C7320.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 20 Oct 1998 12:16:55 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Dialog Questions
X-UIDL: 6765688b7dbbd0e4dbce9bc7bffa5dbe

* List: gfabasic@aachen.linux.de

Great tricky idea !

I am using your idea within my program now. It works quite good, is
simple, but is not perfect. So if anyone has better ideas, go ahead.
The open points:
- Cursor changes from the arrow to the text cursor form above edit field
- When clicking on the field you see a cursor line for a short time (not
very often)
- If opening an other window/dialog you can select and edit text within
the dialog (this can be solved by disabling/enabling the field)

Thanks, 
	Michael


>----------
>Von: 	Dean Hodgson[SMTP:dhodgson@nexus.edu.au]
>Gesendet: 	Donnerstag, 15. Oktober 1998 08:30
>An: 	gfabasic@aachen.linux.de
>Betreff: 	Re: [GFA] Dialog Questions
>
>* List: gfabasic@aachen.linux.de
>
>Vogel Michael wrote:
>> 
>> * List: gfabasic@aachen.linux.de
>> 
>> //Question 1
>> // Is it possible to do the anti-flickering procedure in an easier way
>> ???
>> 
>> // Question 2
>> // Is it possible to scroll through the contents of the Multiline field
>> without
>> // allowing to edit the field (display only)
>> 
>> // I tried a "READONLY" flag ($800), "Disablew" and other things, but
>> failed.
>> 
>
>I don't know the answer to Question 1 and I spent some time on 2. I may
>have something that works.
>Basically I get the handle of the editbox then check to see if the focus
>has moved to it. If it has, I move the focus off to something else. It
>isn't an elegant solution but it seems to work. I was able to scroll the
>editbox OK.
>
>  edid&=DLG(10,111)		'added this line to get the handle of the editbox
>  DO
>    GETEVENT
>    gh&=GetFocus()		'get the current focus
>    IF gh&=edid& THEN ~SetFocus(DLG(10,1))	'if it is the editbox, shift
>it
>    SELECT _Mess
>
>
>
>---------------------------------------------------------------------------
>Dean Hodgson
>The Book Mark Project -- School Library Automation Software
>Department of Education, Training and Employment  Adelaide, South
>Australia
>email to:  dhodgson@nexus.edu.au
>website:   http://www.nexus.edu.au/bookmark/
>phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
>---------------------------------------------------------------------------
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:49:49 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVYwN-00MM5MC>; Tue, 20 Oct 1998 12:22:59 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0120BD0EF; Tue, 20 Oct 1998 13:27:31 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362C73A6.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 20 Oct 1998 12:19:29 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Dialog Questions
X-UIDL: 4622fc4071de02eb068896efac34af61

* List: gfabasic@aachen.linux.de

Hi a new (old) one, I'd like to use UPPERCASE letters only within a
CBS_DROPDOWN field, but that doesn not work I fear. Any other ideas ?


  DIALOG #17,250,340,326,148,"Reportfilter",WS_SYSMENU |
DS_MODALFRAME,16,"Helv"

    CONTROL "&Suchfilter:",901,"static",SS_LEFT,15,12,80,22
    'CONTROL "", 101, "edit", ES_LEFT | ES_UPPERCASE | WS_BORDER |
WS_TABSTOP | WS_CHILD, 15, 46, 260, 24
    COMBOBOX "", 101,15, 46, 150, 124, CBS_DROPDOWN | WS_TABSTOP |
ES_LEFT | CBS_HASSTRINGS | CBS_SORT

    CONTROL "&Ok",1,"button",$10010001,226,86,77,26
  ENDDIALOG

  SHOWDIALOG #17

  ~SetFocus(DLGITEM(17,101))
  
  DO
    GETEVENT
  loop

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:49:50 1998
Return-Path: <jrm13@york.ac.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVZGp-00MM7RC>; Tue, 20 Oct 1998 12:44:07 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B1E9DD0F0; Tue, 20 Oct 1998 13:52:35 +0200 (CEST)
From: jrm13 <jrm13@york.ac.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362C7983.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Tue, 20 Oct 1998 11:43:42 +0100 ()
Sender: jrm13@york.ac.uk
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Subject: [GFA] unsubcribe
X-UIDL: 5510c2d5456efbacbbebb8f8a0cce994

* List: gfabasic@aachen.linux.de


Hi,

Could you remove me from the mailing list please.

Thanks,

John..

------------------------------------------------------------ 
   John Mason               E-Mail          jrm13@york.ac.uk                    
   Computing Service        Phone (DD)    +44-(0)1904-433813                    
   University of York       Fax           +44-(0)1904-433740                    
   Heslington              
   York       Y01 5DD






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:49:51 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVaSr-00MM5MC>; Tue, 20 Oct 1998 14:00:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 46265D0ED; Tue, 20 Oct 1998 15:09:27 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362C8B8A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 20 Oct 1998 14:01:34 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: AW: [GFA] GFA and CGI
X-UIDL: c9414954499b0dfdf7f71733a0bc17ec

* List: gfabasic@aachen.linux.de

Maybe you have still some problems using CGI, so just two simple
examples showing what you can do 

(1) #########################  A counter  #########################

This program implement a counter which is used in nearly every homepage.
Because I didn't know a lot about the gif and jpg file formats, I
prepared
10 files containing the ciffers 0 to 9, and a left and right border. 
When the program was started by CGI from a html-page, it incremented a
counter
(saved within an Ini-file) and copied the ciffers to files which have
been referenced
by the html-page (n0.gif for the 'ones', n1.gif for the 'tens', etc.)

To fasten this up, I moved the source graphic files into the resoutrce
of the Program,
but the principle is still the same:

$LNK Exe e:\counter.exe
$LNK Res e:\counter.res

ExeHandle& = GetModuleHandle(_INSTANCE)

' Counter erhhen...
counter% = GetPrivateProfileInt("Counter","HugosWWW",0,"vermeer.ini")
MOD 100000
~WritePrivateProfileString("Counter","HugosWWW",STR$(SUCC(counter%)),"ve
rmeer.ini")
'
' Pfad einlesen
pfad$ = SPACE$(255)
~GetPrivateProfileString("Counter","Pfad","\",VARPTR(pfad$),250,"vermeer
ini")
i& = INSTR(pfad$,CHR$(0))
IF i& > 0 THEN pfad$ = LEFT$(pfad$,PRED(i&))
IF RIGHT$(pfad$,1) <> "\" THEN pfad$ = pfad$ + "\"
'
'
' Offsets einlesen...
DIM size&(9)
size&(0) = 987
size&(1) = 975
size&(2) = 980
size&(3) = 986
size&(4) = 975
size&(5) = 985
size&(6) = 980
size&(7) = 971
size&(8) = 989
size&(9) = 981
'
'
BufHandle& = FindResource(ExeHandle&,"counter","data")
AdrHandle& = LoadResource(ExeHandle&,BufHandle&)
BufAdress% = LockResource(AdrHandle&)
puffer$ = SPACE$(1000)
'
'
s& = 5
DO
  z& = counter% MOD 10
  DIV counter%,10
  '
  n& = 0
  start& = 0
  WHILE n& < z&
    ADD start&,size&(n&)
    INC n&
  WEND
  len& = size&(z&)
  '
  kopiere(s&,start&,len&)
  '
  DEC s&
LOOP UNTIL s& = 0
'
kopiere(0,9809,895)   ' Linker Abschlu
kopiere(6,10704,910)  ' Rechter Abschlu
'
~UnlockResource(AdrHandle&)
~FreeResource(BufHandle&)
'
'
END
'
PROCEDURE kopiere(x&,start&,len&)
  TRY
    error& = 0
    OPEN "o",#1,pfad$ + "n" + CHR$(x& + 48) + ".gif"
    BMOVE BufAdress% + start&,V:puffer$,len&
    PRINT #1,LEFT$(puffer$,len&);
    CLOSE #1
  CATCH
  error& = 1
RETURN


>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:49:53 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVaUn-00MLMPC>; Tue, 20 Oct 1998 14:02:37 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 7BEABD0EB; Tue, 20 Oct 1998 15:09:47 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362C8B9D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 20 Oct 1998 14:01:57 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] GFA and CGI
X-UIDL: 1e6e5528556a6ea359aeee9128d0ab99

* List: gfabasic@aachen.linux.de

.. and number 2...

(2) #########################  Real CGI-Work  #########################

For a private html page, I wanted to give users the chance to vote (a)
if they
want a certain contents within the page or not. I needed two counters in
an
Ini file, wrote a html-page (c) with place-holders (e.g. /**+**/) which
have to be
replaced by the number of counte. This is done by a CFA-GI-program (b).

(a)
<big>Your vote... <a href="cgi-win/umfrage.exe#stimm=pro">   <IMG
SRC="pro.jpg" border=0 align=middle></a>
                  <a href="cgi-win/umfrage.exe#stimm=contra"><IMG
SRC="contra.jpg" border=0 align=middle></a>

(b)
$ABIG zeilen$()
DIM zeilen$(5000)
'
IniDatei$ = _dosCmd$
'
'
methode& = 1 // 0: POST, 1: GET
control& = 0 // Debugger
'
main
'
PROCEDURE main
  DEFMOUSE 2
  '
  pro% = GetPrivateProfileInt("Counter","VarPro",0,"vermeer.ini") MOD
100000
  cta% = GetPrivateProfileInt("Counter","VarCon",0,"vermeer.ini") MOD
100000

  '
  IF IniDatei$ <> ""
    pos& = INSTR(IniDatei$," ")
    Argument$ = ""
    IF pos&
      Argument$ = MID$(IniDatei$,SUCC(pos&))
      IniDatei$ = LEFT$(IniDatei$,PRED(pos&))
    ENDIF

    IF INSTR(IniDatei$,"\") = 0
      dummy$ = DIR$(0)
      IF RIGHT$(dummy$,1) <> "\" THEN dummy$ = dummy$ + "\"
      IniDatei$ = dummy$ + IniDatei$
    ENDIF
    '
    IF EXIST(IniDatei$)
      '
      Hi$      = @Variable$("stimm")
      Ausgabe$   = @Einlesen$("System","Output File")
      '
      IF UPPER$(LEFT$(Hi$,1)) = "C"
        INC cta%
        ~WritePrivateProfileString("Counter","VarCon",STR$(cta%),"vermee
r.ini")
      ELSE
        INC pro%
        ~WritePrivateProfileString("Counter","VarPro",STR$(pro%),"vermee
r.ini")
      ENDIF
      '
      filecopy("e:\www\html\divs\txt002.htm",Ausgabe$)  // prepared
html-page (see below)
    ENDIF
  ELSE
    IF GetKeyState(VK_SHIFT) & 128
      filecopy("e:\www\html\divs\txt002.htm","e:\www\html\sndcalc.htm")
      BEEP
    ENDIF
  ENDIF
  IF control&
    KEYGET dummy%
  ENDIF
  OPENW #1,0,0,0,0,0
  SETTIMER 1,1,500
  quit& = 0
  DO
    GETEVENT
    IF _Mess = WM_TIMER THEN INC quit&
  LOOP UNTIL quit& = 3
  DEFMOUSE 0
RETURN
'
'
PROCEDURE filecopy(von$,nach$)
  LOCAL dummy$,dummy&,pos&,cnt&,n&,z&
  '
  sum% = pro% + cta%
  IF sum% = 0
    pro% = 50
    cta% = 50
  ELSE
    cta% = (100 * cta%) DIV sum%
    pro% = 100 - cta%
  ENDIF
  '
  z& = 0
  n& = 0
  cnt& = 0
  OPEN "i",#1,von$
  OPEN "o",#2,nach$
  WHILE NOT(EOF(#1))
    LINE INPUT #1,dummy$
    IF INSTR(dummy$,"/**+**/")
      pos& = INSTR(dummy$,"/**+**/")
      MID$(dummy$,pos&,7) = STR$(pro%,7)
    ENDIF

    IF INSTR(dummy$,"/**-**/")
      pos& = INSTR(dummy$,"/**-**/")
      MID$(dummy$,pos&,7) = STR$(cta%,7)
    ENDIF

    PRINT #2,dummy$                               // in den anderen Modi
gleich schreiben
  WEND
  CLOSE #2
  CLOSE #1
RETURN
FUNCTION  Einlesen$(s$,V$)
  LOCAL pos&,dummy$
  dummy$ = SPACE$(255)
  ~GetPrivateProfileString(s$,V$,"",VARPTR(dummy$),250,IniDatei$)
  pos& = INSTR(dummy$,CHR$(0))
  IF pos& THEN dummy$ = LEFT$(dummy$,PRED(pos&))
  RETURN dummy$
ENDFUNC
PROCEDURE append(datei$)
  TRY
    OPEN "a",#2,datei$
    PRINT #2,"<tr><TD><IMG SRC=""pict/d00.gif"" border=0></TD>"
    PRINT #2,"    <TD>";@html$(vorName$);"
<b>";@html$(Name$);"</b></td>"
    PRINT #2,"    <TD><FONT
COLOR=""#202080""><i>";@html$(Bemerkung$);"</i></FONT></td></tr>
/**Entry**/"
    CLOSE #2
  CATCH
RETURN
FUNCTION  Variable$(VName$)
  LOCAL i&,pos&,psx&,dummy$
  IF control& THEN PRINT VName$;" : ";
  '
  IF methode&
    dummy$ = ""
    pos& = INSTR(Argument$,VName$ + "=")
    IF pos& THEN
      i& = LEN(VName$)
      psx& = INSTR(Argument$ + "&","&",pos& + i&)
      dummy$ = MID$(Argument$,SUCC(pos& + i&),PRED(psx& - pos& - i&))
      i& = LEN(dummy$)
      WHILE i&
        SELECT MID$(dummy$,i&,1)
        CASE "+"
          MID$(dummy$,i&,1) = " "
        CASE "%"
          dummy$ = LEFT$(dummy$,PRED(i&)) + CHR$(VAL("$" +
MID$(dummy$,SUCC(i&),2))) + MID$(dummy$,i& + 3)
        ENDSELECT
        DEC i&
      WEND
      IF control& THEN PRINT dummy$
    ENDIF
    RETURN dummy$
  ELSE
    RETURN @Einlesen$("Form Literal",VName$)
  ENDIF
ENDFUNC
FUNCTION html$(s$)
  LOCAL r$,r&,a&,t$
  r$ = ""
  r& = 0
  '
  WHILE r& < LEN(s$)
    INC r&
    '
    t$ = MID$(s$,r&,1)
    a& = ASC(t$)
    '
    SELECT a&
    CASE "&"
      t$ = "&amp;"
    CASE """"
      t$ = "&quot;"
    CASE "<"
      t$ = "&lt;"
    CASE ">"
      t$ = "&gt;"

    ' and all other special characters
    ' :
    ' :

    ENDSELECT
    r$ = r$ + t$
  WEND
  RETURN r$
ENDFUNC


(c) - e:\www\html\divs\txt002.htm

<HTML>
<HEAD>
  <TITLE>Aktuelle Hochrechnung</TITLE>
  <meta http-equiv="refresh" content="5; URL=indey.htm">
</HEAD>


<body background="pict/b04.gif">
<BODY TEXT="#000000" LINK="#FF0000">

<br>
<center>
<table width=624 border=0>
<td><center><IMG SRC="pict/a10.gif"></center></td>
<td><center><H1>HOCHRECHNUNG</center></td>
<td><center><IMG SRC="pict/a10.gif"></center></td>
</table>
</center>

<br><br>
<CENTER><IMG SRC="pict/i07.gif"></CENTER>
<br><br>

<center>
<table width=620 cellpadding=0 cellspacing=0 border=1>
  <tr><td colspan=2 bgcolor=#e0e0ff><br>
      <center><h2><FONT COLOR="#000080"><big>M</big>EHR NACKTE
<big>T</big>ATSACHEN IM BLAUEN <big>B</big>OTEN</FONT></center>
      <br>
      </td>
  </tr>
  <tr><td colspan=2 bgcolor=#606080><h6>&nbsp;</td></tr>
  <tr><td bgcolor=#60ff60 width=/**+**/%><CENTER><br><H1><FONT
COLOR="#000000">+</FONT></H1></CENTER></td>
      <td bgcolor=#ff6060 width=/**-**/%><CENTER><br><H1><FONT
COLOR="#000000">-</FONT></H1></CENTER></td>
  </tr>
</table>

<table width=620 cellpadding=0 cellspacing=0 border=1>
  <tr><td colspan=2 bgcolor=#606080><h6>&nbsp;</td></tr>
  <tr><td bgcolor=#e0ffe0 width=50%><CENTER><FONT
COLOR="#000000">/**+**/% Pro</FONT></CENTER></td>
      <td bgcolor=#ffe0e0 width=50%><CENTER><FONT
COLOR="#000000">/**-**/% Contra</FONT></CENTER></td>
  </tr>
  <tr><td colspan=2 bgcolor=#606080><h6>&nbsp;</td></tr>
</table>
</center>

<br>

</BODY>

>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:49:57 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVcua-00MNoaC>; Tue, 20 Oct 1998 16:37:24 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 117E3D0F3; Tue, 20 Oct 1998 17:46:21 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362CB04D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 20 Oct 1998 13:28:41 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
In-Reply-To: <362A2EC1.BeroList-2.5.8@aachen.linux.de>
Importance: Normal
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] FORMTEXT
X-UIDL: b1659728521c1d9716f0b325ac27e3e6

* List: gfabasic@aachen.linux.de

Hi Sven!

> How can they send my mail back whith an error message, when you
> already had recieved it? I don't understand anything, but I attach
> the file for information.

This seems to be normal - it happens to me too!

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:49:58 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVd4I-00MMiEC>; Tue, 20 Oct 1998 16:47:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C0964D0F4; Tue, 20 Oct 1998 17:56:17 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362CB2A1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 20 Oct 1998 13:27:17 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
In-Reply-To: <362A2660.BeroList-2.5.8@aachen.linux.de>
Importance: Normal
X-Sender: 02204410-0001@t-online.de
Subject: AW: SV: [GFA] FORMTEXT
X-UIDL: 12d92e2f80e0a5bd35b190f7e9cc05b2

* List: gfabasic@aachen.linux.de

Hi Tom!

> If one of you is using Win98 & the other isn't, *there* is
> one problem.

Does this mean I have to compile my programm on a Win98 machine if I want to
run it there? Are the problems gone with this method?

Thanks
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:50:06 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVfew-00MLMFC>; Tue, 20 Oct 1998 19:33:26 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 59BBFD0E7; Tue, 20 Oct 1998 20:42:14 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362CD986.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Tue, 20 Oct 1998 10:25:32 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] COMPRESS
X-UIDL: cf1d7e92d7b19f479afb641831e1fb78

* List: gfabasic@aachen.linux.de

I have been severely chastised for giving the wrong information on where to
unzip the WAC sister program COMPRESS.ZIP.  WAC (Windows Arc Converter)
includes an .INI file where the paths are set for all the compression
utilities. Set your paths in the WAC.INI file. See below.

[Configuration]
arc=c:\compress\arc.exe
arc sfx=c:\compress\mksarc.exe
lzh=c:\compress\lha.exe
arj=c:\compress\arj.exe
zip=c:\compress\pkzip.exe
unzip=c:\compress\pkunzip.exe
zip sfx=c:\compress\zip2exe.exe
rar=c:\compress\rar.exe
unrar=c:\compress\unrar.exe
zip split=c:\compress\zc32.exe
view=c:\compress\av.exe
cab=c:\compress\cabpack.exe
cab extract=c:\compress\extract.exe

**************************
My abject apologies to Bev Brown for misleading you on where to install
COMPRESS.ZIP.  For self punishment I will eat no ice cream today!
Dale Bryant


http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 20 22:50:14 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVgpc-00MIjSC>; Tue, 20 Oct 1998 20:48:32 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6CC87D0E7; Tue, 20 Oct 1998 21:57:24 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362CEB24.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981020184738.NKGE4467@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 20 Oct 1998 18:47:38 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 20 Oct 1998 18:47:38 +0000
Subject: Re: AW: SV: [GFA] FORMTEXT
X-UIDL: 16161a6e9fe2920a62b4f4bfe32d472d

* List: gfabasic@aachen.linux.de

Thomas
I've been unable to get anybody to commit themselves on this subject, BUT...
I'm finding that the last 2 or 3 issues of Win95 are more Win98 compliant
& will NOT run GFA_W or LibertyBasic programs from a Win3.1 or early Win95
computer & vice versa.  I don't know how else to interpret this than to say
that latter95 & 98 must not be backward compatable in some ways.  I've run
into this problem all over the U.S. & in Canada.  Compiled on 98, will not
run on 3.1/95.  Compiled on 1.3 or 95, won't run on 98.

I've resorted to compiling many of my modules aimed at a 386 w/ no coprocessor
& using no controls on-screen.  I try to make all displays simple windows using
KEYGET i% to close or simple 1-click-select listboxes because things like
BUTTON/BMPBUTTON simply don't show up.  Makes it very hard to get user
interaction!

I've tried to outline where buttons are, but the outlines don't show,
either.  In
several modules, there is drive selection w/ images for the drives.  Only the 
drive letters show up & later95/98 users have to realize that the buttons/icons
are to the right of the drive letters & there is, in effect, a hotspot at those
locations.  The hotspots function, but the images don't appear.

If any of the GURUs have an answer to this, I'd appreciate being informed.
<G>
TomR.



At 01:27 PM 20/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi Tom!
>
>> If one of you is using Win98 & the other isn't, *there* is
>> one problem.
>
>Does this mean I have to compile my programm on a Win98 machine if I want to
>run it there? Are the problems gone with this method?
>
>Thanks
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:55:41 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVhq3-00MIjAC>; Tue, 20 Oct 1998 21:53:03 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A7682D0E8; Tue, 20 Oct 1998 23:01:57 +0200 (CEST)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362CFA45.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Tue, 20 Oct 1998 12:26:19 +0000
In-Reply-To: <362A2F81.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: SV: SV: [GFA] FORMTEXT
X-UIDL: 5fa50a2f767629f64408eed2b4a1e449

* List: gfabasic@aachen.linux.de

At 19:04 18.10.1998 +0100, you wrote:

>I am using Windows 95. Perhaps Roland Walter is using W98?

No, I use Win95 - and I think I will not "update" ;-)
Roland


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:55:54 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVsxw-00MM78C>; Wed, 21 Oct 1998 09:45:56 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 6A446D0E7; Wed, 21 Oct 1998 10:54:50 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362DA15A.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 21 Oct 1998 09:09:33 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] ODBC
X-UIDL: 04c811b0049b9a1679a75179e8a014cb

* List: gfabasic@aachen.linux.de

Hi!

I try to handle a Access-Database from my GFA-Programm, and I think that the
only way to do this is to use ODBC.

Has anyone experiences in this method by using GFA?

Thanks
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:55:55 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVszw-00MMhrC>; Wed, 21 Oct 1998 09:48:00 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3E7D7D0E9; Wed, 21 Oct 1998 10:56:51 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362DA1D3.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 21 Oct 1998 08:55:10 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <362CEB24.BeroList-2.5.8@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: AW: SV: [GFA] FORMTEXT
X-UIDL: 0026fd59887bf43c3121e3b1e12d1952

* List: gfabasic@aachen.linux.de

Hi Tom!

As the result I think it is better to compile it especially for the OS where
it should run.

Thanks
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:55:58 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVtTK-00MMi7C>; Wed, 21 Oct 1998 10:18:22 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 00891D0EB; Wed, 21 Oct 1998 11:27:19 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362DA8F8.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981021081818.LTMD24049@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 21 Oct 1998 08:18:18 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 21 Oct 1998 08:18:18 +0000
Subject: Re: AW: AW: SV: [GFA] FORMTEXT
X-UIDL: 9b4a5aa796851b5c892090f0f3a093a4

* List: gfabasic@aachen.linux.de

Thomas
Most of my target market is running 386s or less, but many are on 486s & 
as time passes, the number using W98 is going to grow because the other
platforms are no longer available.  I'm NOT going to downgrade to Win98, 
so I may shortly be out of the market.
<G>
TomR.


At 08:55 AM 21/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi Tom!
>
>As the result I think it is better to compile it especially for the OS where
>it should run.
>
>Thanks
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:55:59 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVtin-00MKtUC>; Wed, 21 Oct 1998 10:34:21 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 72090D0EC; Wed, 21 Oct 1998 11:43:06 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362DACAA.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id AC214701EC; Wed, 21 Oct 1998 10:32:33 +0200
  (SMTPD32-4.06) id AC8322602A6; Wed, 21 Oct 1998 10:34:11 +0200
Date: Wed, 21 Oct 1998 10:23:16 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: AW: SV: [GFA] FORMTEXT
X-UIDL: 24376e31e1b065e50d2187ee88710958

* List: gfabasic@aachen.linux.de

Tom,

>I've been unable to get anybody to commit themselves on this subject, BUT...
>I'm finding that the last 2 or 3 issues of Win95 are more Win98 compliant
>& will NOT run GFA_W or LibertyBasic programs from a Win3.1 or early Win95
>computer & vice versa.  I don't know how else to interpret this than to say
>that latter95 & 98 must not be backward compatable in some ways.  I've run
>into this problem all over the U.S. & in Canada.  Compiled on 98, will not
>run on 3.1/95.  Compiled on 1.3 or 95, won't run on 98.


An executable has a MSDOS, Windows 16-bit or Windows 32-bit format. This
format is defined by the OS. No language produces its own format, the exe must
have this layout otherwise it cannot be run. All formats run under Win32. This
is a fact. GFA is no exception, it produces a 16-bit format exe.

>From what you say, it seems your message loop is incorrect. Please reread
Chapter 3 of my book. Keep in mind that a properly written Windows program
only operates in response of messages. You may add some initializing things
before entering the main loop, but once you entered it, it is your task to
create procedures that execute when a message is retrieved. No Keyget, Input
and Print commands in release versions of a program.
Tip: Use BASIS.GFW as a start for each GFA windows application.

Sjouke




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:56:22 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVwW7-00MM5MC>; Wed, 21 Oct 1998 13:33:27 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C8D61D0EA; Wed, 21 Oct 1998 14:42:06 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362DD69F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981021113259.HTGL4692@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 21 Oct 1998 11:32:59 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 21 Oct 1998 11:32:59 +0000
Subject: Re: AW: SV: [GFA] FORMTEXT
X-UIDL: f33a55310ab3f7aca4abc6e080cf246d

* List: gfabasic@aachen.linux.de

Sjouke

I don't want to appear to be argumentive, but I've encountered a bunch of 
problems... NOT with just GFA-W, but w/ LibertyBasic, too.  4 of us write
*.dlls for LibertyBasic.  2 of us have no problem... we're writing 16-bit
for 16-bit.  2, however, write in 2 different languages, both 32-bit, &
most of the LibertyBasic community can NOT use *their* *.dlls.  I know that
they are involving calls or functions that are unavailable.  One language 
I don't know for sure what it is, but the other is Oberon2.  These both 
claim they are NOT making calls that aren't legal, but one admitted finally
that he has no idea what *.dlls are involved because he just uses functions
that are in the language.

I have sent various programs for test to a computer in Texas that is running
the last version of Win95.  NOTHING in either GFA-W or LibertyBasic will run
on that computer.  I've been writing in LibertyBasic since 1994.

Bev writes on Win98.  I can compile his code & usually do OK but I can NOT
run his *.exes - they crash.  The same is true at his end... *my* *.exes
crash on him.  I am running Win95 v4.00.950a.  Since I have trouble only where
the latest Win95 or Win98 is involved, I make the natural assumption that 
there are inconsistancies between *my* Win95 & those.  Some of the things I've
had crash on others were things I got from elsewhere & had no problem compiling.

I am doing all of this on a P-100.  I discovered early on that I had to compile
for a 386 with NO coprocessor to run on a 486SX.

Things are in turmoil here at the moment & I really don't know where your book
is but I will look for it later today & check out what you mention.  I *have*
noted that KEYGET doesn't work compiled, so I have been rewriting some things
so others running Win98 can run them.  CONTROL is a nasty experience for me
on Win98 - things like BUTTON of any kind don't even show up.  My drive logging
& searching apps have a resource *.dll w/ drive icons... *THESE* don't show up
on a Win98 computer, either.  They work fine down to a 386SX running Win3.1.

If I'm wrong, I'm wrong, but so far it seems I'm not.  I have to guess a lot
about a lot of things because I get few answers when asking help.
<G>
TomR.



At 10:23 AM 21/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Tom,
>
>>I've been unable to get anybody to commit themselves on this subject, BUT...
>>I'm finding that the last 2 or 3 issues of Win95 are more Win98 compliant
>>& will NOT run GFA_W or LibertyBasic programs from a Win3.1 or early Win95
>>computer & vice versa.  I don't know how else to interpret this than to say
>>that latter95 & 98 must not be backward compatable in some ways.  I've run
>>into this problem all over the U.S. & in Canada.  Compiled on 98, will not
>>run on 3.1/95.  Compiled on 1.3 or 95, won't run on 98.
>
>
>An executable has a MSDOS, Windows 16-bit or Windows 32-bit format. This
>format is defined by the OS. No language produces its own format, the exe must
>have this layout otherwise it cannot be run. All formats run under Win32. This
>is a fact. GFA is no exception, it produces a 16-bit format exe.
>
>>From what you say, it seems your message loop is incorrect. Please reread
>Chapter 3 of my book. Keep in mind that a properly written Windows program
>only operates in response of messages. You may add some initializing things
>before entering the main loop, but once you entered it, it is your task to
>create procedures that execute when a message is retrieved. No Keyget, Input
>and Print commands in release versions of a program.
>Tip: Use BASIS.GFW as a start for each GFA windows application.
>
>Sjouke
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:56:23 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zVxTt-00MM56C>; Wed, 21 Oct 1998 14:35:13 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 476ADD0EA; Wed, 21 Oct 1998 15:43:52 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362DE518.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id A4882670150; Wed, 21 Oct 1998 14:33:12 +0200
  (SMTPD32-4.06) id A4E9D3007C; Wed, 21 Oct 1998 14:34:49 +0200
Date: Wed, 21 Oct 1998 14:09:14 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: AW: SV: [GFA] FORMTEXT
X-UIDL: e28f9a8bdb326a2767d31842b8960455

* List: gfabasic@aachen.linux.de


>I don't want to appear to be argumentive, but I've encountered a bunch of
>problems... NOT with just GFA-W, but w/ LibertyBasic, too.  4 of us write
>*.dlls for LibertyBasic.  2 of us have no problem... we're writing 16-bit
>for 16-bit.  2, however, write in 2 different languages, both 32-bit, &
>most of the LibertyBasic community can NOT use *their* *.dlls.  I know that
>they are involving calls or functions that are unavailable.  One language
>I don't know for sure what it is, but the other is Oberon2.  These both
>claim they are NOT making calls that aren't legal, but one admitted finally
>that he has no idea what *.dlls are involved because he just uses functions
>that are in the language.
>
>I have sent various programs for test to a computer in Texas that is running
>the last version of Win95.  NOTHING in either GFA-W or LibertyBasic will run
>on that computer.  I've been writing in LibertyBasic since 1994.
>


Hmm. I don't doubt the problems. I doubt it has something to do with the GFA
Compiler. Anyway, maybe it is time to switch to C++...;-) I did :-o.

Sjouke


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:56:30 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zW2kN-00MKu5C>; Wed, 21 Oct 1998 20:12:35 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 64B7CD0E9; Wed, 21 Oct 1998 21:21:33 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362E343D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 21 Oct 1998 14:11:50 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Dialog Questions
X-UIDL: 9b9e1a2e63484e19dbec3d1062dd1bcd

* List: gfabasic@aachen.linux.de

Hello Michael,

Heres something I picked up on another newsgroup:

Just OR in the WS_CLIPCHILDREN style, and your problem goes away.

DIALOG #10,10,10,580,454,"Schoeller's Mystery Database",WS_CLIPCHILDREN |
WS_SYSMENU | WS_MODALFRAME,16,"Helv"

Good luck,

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:56:34 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zW37Y-00MPRzC>; Wed, 21 Oct 1998 20:36:32 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 73F6BD0EA; Wed, 21 Oct 1998 21:45:29 +0200 (CEST)
From: Peuapeu@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362E39D9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 21 Oct 1998 14:32:36 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] W98 compatibility
X-UIDL: c639f690003b92c284803b14087df2a0

* List: gfabasic@aachen.linux.de

Hi all,

There seems to be some question whether GFA programs compiled on W95 systems
will run on W98 systems.   I have concerns myself.  I have had several recent
customers contact me about problems with my software on W98 systems.  My
software is a 16 bit application compiled on a W95 system.  Each person has
had odd and different complaints (not crashes but things like some of the
graphics behaving strange).  I don't even see a way that the observed behavior
could occur.

In response, I created a W98 partition on my Compaq to test the program.  I
did a clean install of W98 into the partition.  So far I have not encountered
any problems whatsoever (so I haven't been able to fix the user complaints).
Both of the people contacted me installed W98 as an upgrade to W95 or W3.1.
Is it possible that what we are seeing is the same sort of problem some users
encounter if they upgrade to W95 from W3.1 rather than doing a clean install?
I've had a few complaints from customers in that instance too.  Or, should I
perhaps try compiling my application in my W98 partition and sending the
result to those W98 users that complain?

Perhaps with one more reason to dislike Microsoft ...

James

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 21 22:56:35 1998
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zW3Xp-00MPRpC>; Wed, 21 Oct 1998 21:03:41 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0681ED0EB; Wed, 21 Oct 1998 22:12:39 +0200 (CEST)
From: Peuapeu@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362E4037.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 21 Oct 1998 15:01:09 EDT
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0 for Windows 95 sub 18
Subject: [GFA] W98 compatibility?
X-UIDL: 0f8bcacf96c5cb098f40990712352150

* List: gfabasic@aachen.linux.de

Hi all,

There seems to be some question whether GFA programs compiled on W95 systems
will run on W98 systems.   I have concerns myself.  I have had several recent
customers contact me about problems with my software on W98 systems.  My
software is a 16 bit application compiled on a W95 system.  Each person has
had odd and different complaints (not crashes but things like some of the
graphics behaving strange).  I don't even see a way that the observed behavior
could occur.

In response, I created a W98 partition on my Compaq to test the program.  I
did a clean install of W98 into the partition.  So far I have not encountered
any problems whatsoever (so I haven't been able to fix the user complaints).
Both of the people contacted me installed W98 as an upgrade to W95 or W3.1.
Is it possible that what we are seeing is the same sort of problem some users
encounter if they upgrade to W95 from W3.1 rather than doing a clean install?
I've had a few complaints from customers in that instance too.  Or, should I
perhaps try compiling my application in my W98 partition and sending the
result to those W98 users that complain?

Perhaps with one more reason to dislike Microsoft ...

James

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 22 20:28:27 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zW7rJ-00MJ5lC>; Thu, 22 Oct 1998 01:40:05 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E23A1D0E9; Thu, 22 Oct 1998 02:49:00 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362E80FD.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981021233955.DDES1723@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 21 Oct 1998 23:39:55 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 21 Oct 1998 23:39:55 +0000
Subject: Re: [GFA] W98 compatibility
X-UIDL: 369f02d6e5f50e0cf2fba1781bbd4cf6

* List: gfabasic@aachen.linux.de

James
Please try compiling w/ W98 & let us know the reactions.  I'm willing to bet
that there is something different about it that does not allow full backward
compatability.
<G>
TomR.



At 02:32 PM 21/10/98 EDT, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi all,
>
>There seems to be some question whether GFA programs compiled on W95 systems
>will run on W98 systems.   I have concerns myself.  I have had several recent
>customers contact me about problems with my software on W98 systems.  My
>software is a 16 bit application compiled on a W95 system.  Each person has
>had odd and different complaints (not crashes but things like some of the
>graphics behaving strange).  I don't even see a way that the observed behavior
>could occur.
>
>In response, I created a W98 partition on my Compaq to test the program.  I
>did a clean install of W98 into the partition.  So far I have not encountered
>any problems whatsoever (so I haven't been able to fix the user complaints).
>Both of the people contacted me installed W98 as an upgrade to W95 or W3.1.
>Is it possible that what we are seeing is the same sort of problem some users
>encounter if they upgrade to W95 from W3.1 rather than doing a clean install?
>I've had a few complaints from customers in that instance too.  Or, should I
>perhaps try compiling my application in my W98 partition and sending the
>result to those W98 users that complain?
>
>Perhaps with one more reason to dislike Microsoft ...
>
>James
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 22 20:28:29 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zW7rZ-00ML0oC>; Thu, 22 Oct 1998 01:40:21 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 2267ED0EC; Thu, 22 Oct 1998 02:49:13 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362E8109.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981021233934.DCZF1723@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 21 Oct 1998 23:39:34 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 21 Oct 1998 23:39:34 +0000
Subject: Re: AW: SV: [GFA] FORMTEXT
X-UIDL: 4efe2cff9acfa6d3ca019cc25ac4da69

* List: gfabasic@aachen.linux.de

Have it.  Can't understand it.
Old cigarette ad depicted someone w/ a black bruise around an eye...
"Would rather fight than switch".  Am tired of switching, guess I'll
fight.  Have over $3,000US tied up in programming platforms or what
ever the hell they are called.  GFA-W is the 2nd one I got anywhere
with because I could get *some* help.  It is the 1st one I've been 
able to get as far as I have with it because if it's capabilities.

I'm sorry I lost track of your book - it is in good company because
I have lost track of a number of things that are important.  Wife
keeps yelling about wanting to clean this room... maybe I should let
her have her way.
TomR.


At 02:09 PM 21/10/98 +0200, you wrote:
>* List: gfabasic@aachen.linux.de
>
>
>>I don't want to appear to be argumentive, but I've encountered a bunch of
>>problems... NOT with just GFA-W, but w/ LibertyBasic, too.  4 of us write
>>*.dlls for LibertyBasic.  2 of us have no problem... we're writing 16-bit
>>for 16-bit.  2, however, write in 2 different languages, both 32-bit, &
>>most of the LibertyBasic community can NOT use *their* *.dlls.  I know that
>>they are involving calls or functions that are unavailable.  One language
>>I don't know for sure what it is, but the other is Oberon2.  These both
>>claim they are NOT making calls that aren't legal, but one admitted finally
>>that he has no idea what *.dlls are involved because he just uses functions
>>that are in the language.
>>
>>I have sent various programs for test to a computer in Texas that is running
>>the last version of Win95.  NOTHING in either GFA-W or LibertyBasic will run
>>on that computer.  I've been writing in LibertyBasic since 1994.
>>
>
>
>Hmm. I don't doubt the problems. I doubt it has something to do with the GFA
>Compiler. Anyway, maybe it is time to switch to C++...;-) I did :-o.
>
>Sjouke
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 22 20:28:30 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWDsr-00MM7QC>; Thu, 22 Oct 1998 08:06:05 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id CD263D06B; Thu, 22 Oct 1998 09:15:02 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362EDB77.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 22 Oct 1998 08:07:40 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Dialog Questions
X-UIDL: f6d121f301ac868b6668ad2f4fabc534

* List: gfabasic@aachen.linux.de

Sorry, found no change in behaviour (cursor, etc.), what should have
been changed ?

>----------
>Von: 	BDD[SMTP:BrentDeck@compuserve.com]
>Gesendet: 	Mittwoch, 21. Oktober 1998 19:11
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] Dialog Questions
>
>* List: gfabasic@aachen.linux.de
>
>Hello Michael,
>
>Heres something I picked up on another newsgroup:
>
>Just OR in the WS_CLIPCHILDREN style, and your problem goes away.
>
>DIALOG #10,10,10,580,454,"Schoeller's Mystery Database",WS_CLIPCHILDREN |
>WS_SYSMENU | WS_MODALFRAME,16,"Helv"
>
>Good luck,
>
>Brent
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 22 20:28:33 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWFOs-00MMhoC>; Thu, 22 Oct 1998 09:43:14 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 80838D0E7; Thu, 22 Oct 1998 10:52:12 +0200 (CEST)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362EF23C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 21 Oct 1998 16:37:51 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <362DE518.BeroList-2.5.8@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: AW: SV: [GFA] FORMTEXT
X-UIDL: 4d835d9e6f81ca3d00f7e4e476259db5

* List: gfabasic@aachen.linux.de

Hi Sjouke!

> Hmm. I don't doubt the problems. I doubt it has something to
> do with the GFA Compiler.

When can we aspect an new release?


> Anyway, maybe it is time to switch to C++...;-) I did :-o.

That sounds like a "Bill-Gates-Solution". It do not solve the problem.

In my opinion I have a right to get a "good" product for my money. I prefer
(and I like) to write programs in GFA-Basic and I do it since "Atari-Times".
And up to now nothing has change this.

But I can't accept opinions like this. If there are problems then they have
to be solved. It is not a solution to change the programming-language.

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 22 20:28:34 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWG6w-00MMiCC>; Thu, 22 Oct 1998 10:28:46 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5E4C9D06B; Thu, 22 Oct 1998 11:37:22 +0200 (CEST)
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362EFCD2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
  (SMTPD32-4.06) id AC4F6300130; Thu, 22 Oct 1998 10:26:55 +0200
  (SMTPD32-4.06) id AC9E3280266; Thu, 22 Oct 1998 10:28:14 +0200
Date: Thu, 22 Oct 1998 10:26:57 +0200
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Re: C++
X-UIDL: 78bb9e245bab3bd3e224791532cc5885

* List: gfabasic@aachen.linux.de


>> Hello Sjouke,

Has your productivity gone up or down since the switch.

I have found that an occcasional stumbling block in GFA could delay a
project longer if the whole thing hand been done in C.

I've resisted C++ up to now, but threaten daily to make the switch.

Best Regards. <<

Time to explain a few things.

About 1 1/2 year ago I got tired of GFA16, and then when the beta of GFA32
arrived which has moved a great deal towards VB, I realized I just didn't want
to do Basic anymore. For several reasons. GFA16 gave me a way to stick to the
OS closely, however VB and GFA32 use an additional 'blackbox' DLL with a lot
of COM wrappers. What's behind the wrappers is the company's secret. I started
with my second book, but I just didn't like to figure out what was under the
hood of all those new commands and functions.

Some moment I was doing a lot of VB stuff, just to get the hang of GFA32.
But... I didn't want to do VB!!! So, after a while I realized I actually got
tired of Basic in general and I needed another challenge. I needed a language
close to the OS, a language in which each code line compiled to a minimum of
code. Code I can review, code that is fast, and code that allows me to
optimize. But most of all code that generates stand-alone EXEs. Anyway, I was
somewhat familiar with C, so a year ago I started to learn C++. I did do some
minor things just to get the hang of it. (I tried to create code for GFABasic
commands and functions). After a while I found myself in lot of trouble,
because it was too much to comprehend. I left it for a few months and
restarted testing GFA32.

However, after a while I got tired again, I just didn't like Basic anymore. I
re-installed VC4.2 and tried to create a Basic interface to C++ (Strings,
Arrays, Graphic commands, Window functions, actually all of it). This was a
learning phase, and once I got C++ at my hands (last summer) I restarted the
project. At this point I have included about 80% of GFA functionality, and
about 50 new commands (Accel, LoadDib, SaveDib, LoadBmp, SaveBmp, _Pal()=, and
many more). These commands are mostly the ones I and many of us have missed in
GFA16. The Basic interface to C++ (I called it BasiCpp) takes away all the API
stuff as WinMain, RegisterClass, WndProc, etc. A simple BasiCpp program looks
like this:

void AppMain()
{
    OpenW(1);
    Print( _X,1); Print(_Y);    // second argument 1 = 1 space
    Do
        GetEvent();
        Switch (_Mess)
        Case WM_PAINT:
            Text( 10,10, "BasiCpp");
        EndSwitch
    LoopUntil (MENU(1) = 4)
    CloseW(1);
}

So, now I can come back to your question:

"Has your productivity gone up or down since the switch.
I have found that an occasional stumbling block in GFA could delay a
project longer if the whole thing hand been done in C. "

The answer is neither, I use BasiCpp.

Actually, it saves time. It supports resources by simple commands:

Menu(ID_MENURSRC);        // done
Accel(ID_ACCELRSRC);        // done
Dialog(1, ID_DLGRSRC);    // to be done

etc.

I don't need an additional RSC, its included in the VC IDE. BasiCpp functions
make it very easy to use them. Everything I always wanted, I now have...

If anyone is interested, I need some beta testers soon (you need VC though).

Sjouke
shamstra@gelrevision.nl





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 22 20:28:36 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWIiy-00ML0GC>; Thu, 22 Oct 1998 13:16:12 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 20409D06B; Thu, 22 Oct 1998 14:25:10 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362F2426.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 22 Oct 1998 07:10:52 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] Dialog Questions
X-UIDL: 95b4981d7e1f6ff9c98c5d8f88e8d56a

* List: gfabasic@aachen.linux.de


>>> Sorry, found no change in behaviour (cursor, etc.), what should have
been changed ? <<<

Using the style  WS_CLIPCHILDREN  in your Dialog  eliminates the flicker.

I ran your demo with and without the style change, and verified that it
works in Win 3.1.


Best ragards,BD

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 23 02:13:57 1998
Return-Path: <dave@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWQkV-00MM5OC>; Thu, 22 Oct 1998 21:50:19 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3C536D0E7; Thu, 22 Oct 1998 22:59:13 +0200 (CEST)
From: "Dave Williams" <dave@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362F9CA1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 21 Oct 1998 18:50:40 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] remove
X-UIDL: 8cf54c3a237a93df81693334c1d62178

* List: gfabasic@aachen.linux.de

Remove


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 23 02:14:00 1998
Return-Path: <dave@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWQm3-00MPTzC>; Thu, 22 Oct 1998 21:51:55 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id DB103D066; Thu, 22 Oct 1998 22:59:18 +0200 (CEST)
From: "Dave Williams" <dave@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362F9CA7.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 21 Oct 1998 18:50:40 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] remove
X-UIDL: 241317f26d44b87036de30f7361a4c95

* List: gfabasic@aachen.linux.de

Remove


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 24 15:24:56 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWX9o-00MPRhC>; Fri, 23 Oct 1998 04:40:52 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 274EBD0E9; Fri, 23 Oct 1998 05:49:52 +0200 (CEST)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <362FFCE0.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981023023948.GIN14812@LOCALNAME>;
          Fri, 23 Oct 1998 02:39:48 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 23 Oct 1998 02:39:48 +0000
Subject: [GFA] inconsistancies, Win95/98
X-UIDL: 3eb523fc5e695dc5231565f1a89df2fc

* List: gfabasic@aachen.linux.de

GURUs
It has come to mind that I *know* of one situation in the transition from
the 16-bit standards to the 32-bit standards that occured in the final
releases of Win95.

The addition of & change to FAT32... I have read something on the inability
of many programs to cope w/ FAT32, so.....  COULD THIS NOT BE THE PROBLEM
exhibited by GFA_W & LibertyBasic when compiled on an older version of
Win95/3.1+ then run on a Win98 computer and vice versa?

As all know, MS never issued a release w/ just one change, but I don't know
of any others personally.  THIS change was publicised.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 24 15:24:57 1998
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWY5D-00MKtWC>; Fri, 23 Oct 1998 05:40:11 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 48BDDD0EA; Fri, 23 Oct 1998 06:49:13 +0200 (CEST)
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36300AC9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 23 Oct 1998 11:39:27 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2110.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] inconsistancies, Win95/98
X-UIDL: 66f6a7b648510ff0c79accb3702d0764

* List: gfabasic@aachen.linux.de

Presumably someone is using GFA -W on Windows 98. How does the interpreter
perform? Are there problems there?

Mac Howard



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 24 15:25:01 1998
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWaHE-00MM3iC>; Fri, 23 Oct 1998 08:00:44 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 78330D0EB; Fri, 23 Oct 1998 09:09:45 +0200 (CEST)
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36302BB9.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 23 Oct 1998 15:33:00 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <36300AC9.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] inconsistancies, Win95/98
X-UIDL: e18245a9a8b65cea803b58a4e64df44d

* List: gfabasic@aachen.linux.de

Malcolm Jack Howard wrote:
> 
> * List: gfabasic@aachen.linux.de
> 
> Presumably someone is using GFA -W on Windows 98. How does the interpreter
> perform? Are there problems there?
> 
> Mac Howard
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

I've been using it on Win98 for a few months now and have not had any
problems whatsoever. Even the DLLs I compile seem to work on Win95 and
3.11.

---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 24 15:25:04 1998
Return-Path: <uw@lzh.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWaUt-00MM3mC>; Fri, 23 Oct 1998 08:14:51 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E8D90D0EC; Fri, 23 Oct 1998 09:23:49 +0200 (CEST)
From: "Willamowski, Uwe" <uw@lzh.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36302F06.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          id AA12004; Fri, 23 Oct 1998 07:04:57 +0100
Date: Fri, 23 Oct 1998 08:15:01 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.993.5
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] remove
X-UIDL: 905d161d5cedb1a7a39c2365654e41bd

* List: gfabasic@aachen.linux.de

>* List: gfabasic@aachen.linux.de
>
>bye...

Uwe


>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 24 15:25:07 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from smtp2.gelrevision.nl (195.86.77.3) with smtp
	  id <m0zWcks-00MM7gC>; Fri, 23 Oct 1998 10:39:30 +0200 (MEST)
Received: from mail.gelrevision.nl [195.86.58.10] by smtp2.gelrevision.nl
  (SMTPD32-4.06) id A064170144; Fri, 23 Oct 1998 10:37:56 +0200
Received: from shamstra [195.86.105.145] by mail.gelrevision.nl
  (SMTPD32-4.06) id A0BE4F0080; Fri, 23 Oct 1998 10:39:26 +0200
Message-ID: <002501bdfe60$807f8c00$916956c3@shamstra.gelrevision.nl>
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
To: "Roland Walter" <alibaba@zedat.fu-berlin.de>
Subject: Re: [GFA] Re: C++
Date: Fri, 23 Oct 1998 10:37:01 +0200
MIME-Version: 1.0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
X-UIDL: aaadbe9aa4230a1cfa2eac0cd0b3b9be

Hi Roland,

>I read Your message in GFA basic list about GFA32.
>I am GFA32 beta tester as You and my problems where very
>similar to Your problems...
>May be You know that I am not the most bad GFA Basic programmer...


I'm aware of that ;).

>
>I have downloaded the free LCC system for Windows and I think
>I also will swich to C (not C++ because of speed and size).
>

Don't, switch to C++ immediately. There is no difference in speed!. C++ does
come with all kinds of classes (MFC, ObjectWindows, iostream) that may make
programs less faster. C++ is simply an extension of C, the compiler treats
both variants equal. If you are interested buy C++ Programming Language Third
Edition by Bjarne Stroustrup, The Creator of C++. He states : " C++ is safer,
more expressive, and reduces the need to focus on low-level techniques"
Do an Internet search for Stroustrup and you'll find a wealth of very relevant
information. You might also consider to buy VC60. It comes with 2 CDs full of
SDK and KB info. There is little or nothing you can't find there.

>It was a good think of the GFA Basic that it was a language
>in the mid between Pascal, C and Basic, very near on system.
>I hate the VB syntax and I hate the background idea after VB.


Agree.

>On the other hand it is impossible to create small stand alone
>program files and it is impossible to create DLLs.
>O.K., GFA32 is much better then VB, but it's nothing for me.


Agree.

>I have written a relatively long Beta report to GFA, speaking about
>all my problems. I very hope for GFA they will re-think about all.
>If not I will write a good article about GFA32 wich recommends it
>for users who like VB but this will be eventually my last action.


Me too.

>
>Did GFA tell You somethink new?


No.

>
>Bye, Roland
>

>

Sjouke


From ???@??? Sat Oct 24 15:25:16 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWiu9-00MJVnC>; Fri, 23 Oct 1998 17:13:29 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id CF823D06B; Fri, 23 Oct 1998 18:22:24 +0200 (CEST)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3630AD44.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 23 Oct 1998 11:12:52 -0400
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Dialog Questions
X-UIDL: f9bded97daafcb83457fd0dba98ba11e

* List: gfabasic@aachen.linux.de

// Is it possible to do the anti-flickering procedure in an easier way
???

Did WM_CLIPCHILDREN work ?

BD

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 24 15:25:47 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWsWO-00MM5yC>; Sat, 24 Oct 1998 03:29:36 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BD698D06B; Sat, 24 Oct 1998 04:38:34 +0200 (CEST)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36313DAB.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Fri, 23 Oct 1998 18:22:51 -0700
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] NEW FILES
X-UIDL: 2bb188d125e2eb924c47a347135267a2

* List: gfabasic@aachen.linux.de

Two new files to download
METAMIN3.ZIP by Brent Deck
DATEINP.ZIP by Sven Kumlin

Source included.

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 24 15:25:49 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zWziw-00MM3mC>; Sat, 24 Oct 1998 11:11:02 +0200 (MEST)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8A288D06B; Sat, 24 Oct 1998 12:20:04 +0200 (CEST)
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3631A9D4.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 24 Oct 1998 11:13:00 +0200
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Dialog Questions
X-UIDL: 248407ba0feaa634b947f3b898ad8b12

* List: gfabasic@aachen.linux.de

Hi BD - 

Yes and no

if I use it, no clients are updated automatically. This means when I
"scroll" through the entries of the database, nothing is seen within the
text fields.
The flickering effect is nearly zero because of checking WM_PAINT, so I
can live with it. 
What's (a little bit) annoying, the cursor moves from the arrow to the
text form, because the edit field is still enabled. But also this is
just a tiny issue.

Thanks for helping, my program looks already much better than in the
starting phase (http://193.80.105.57/file/gfa/tool/cases.zip).

 -Michael 



PS.: If you are interested in the whole source, you can have it, but
maybe it is not easy do understand....
PSS.: My biggest actual problem is to solve the riddle how to save a 16
Mio color bitmap to optimized 256 colors bmp files

>----------
>Von: 	BDD[SMTP:BrentDeck@compuserve.com]
>Gesendet: 	Freitag, 23. Oktober 1998 16:12
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] Dialog Questions
>
>* List: gfabasic@aachen.linux.de
>
>// Is it possible to do the anti-flickering procedure in an easier way
>???
>
>Did WM_CLIPCHILDREN work ?
>
>BD
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 27 12:40:21 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zXScj-00MM5dC>; Sun, 25 Oct 1998 17:02:33 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 8F777D06B; Sun, 25 Oct 1998 18:11:30 +0100 (CET)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36335BC2.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sun, 25 Oct 1998 20:02:51 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] News Letters
X-UIDL: b26a73fe1637b82e633f5369f16252e5

* List: gfabasic@aachen.linux.de

The 'Not Affiliated With GFA News Letters' may be downloaded from the
GFAWHELP site. Currently available are
GFANL103
GFANL105
GFANL106
GFANL107
Choose Letters from the main page.
Dale

http://www.gfawhelp.gfa.net
webmaster.gfawhelp@gfa.net




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 27 12:40:24 1998
Return-Path: <schonema@post6.tele.dk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zXWL6-00MM77C>; Sun, 25 Oct 1998 21:00:36 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4DFB9D06B; Sun, 25 Oct 1998 22:09:38 +0100 (CET)
From: "Jan Schnemann" <schonema@post6.tele.dk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36339392.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v4.0 201-221) with ESMTP
          id <19981025200018.HTBJ3697.fep2@post6.tele.dk>
          for <gfabasic@linux.net.eu.org>; Sun, 25 Oct 1998 21:00:18 +0100
Date: Sun, 11 Oct 1998 21:17:18 +0200
X-Mailer: Mozilla 4.05 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Subject: [GFA] please can you remove me from this list
X-UIDL: a8ad7588c34d032e844d311a9eb52b49

* List: gfabasic@aachen.linux.de

please can you remove me from this list
> 
>      Yours electronically,
> 
Jan Schnemann 
> +--------------------------------------------------------+



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 27 12:40:29 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zXnCK-00MMiaC>; Mon, 26 Oct 1998 15:00:40 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 16AACD06B; Mon, 26 Oct 1998 15:31:10 +0100 (CET)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363487AE.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 26 Oct 1998 14:20:37 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] MS-Write
X-UIDL: 42da92f5087d648bb2189759d988f22f

* List: gfabasic@aachen.linux.de

Hi!

I know that my question is off topic, but does anyone know the different
options you can give to MS-Write while starting?

My problem is that I want to show the format-line direct after starting
Write.

Many thanks in advance
Yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 27 12:40:32 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zXq4N-00ML0HC>; Mon, 26 Oct 1998 18:04:39 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id BCF5BD06B; Mon, 26 Oct 1998 19:13:42 +0100 (CET)
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3634BBD6.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
          by mb07.swip.net (8.8.8/8.8.8) with ESMTP 
          id SAA12248 for <gfabasic@aachen.linux.de>; 
          Mon, 26 Oct 1998 18:04:34 +0100 (MET)
Date: Mon, 26 Oct 1998 17:58:18 +0100
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: [GFA] No resize window
X-UIDL: 6e67587e55a5ba0a2182f06d2dfce57f

* List: gfabasic@aachen.linux.de

Hi all, here is a silly question.

I have an ordinary window with horisontal and vertical scroll bars in
a program. It is necessary to keep the window in the same size all
the time, so it must be impossible to resize it. I have already
solved the problem with a rather complicated routine of my own (about
60 lines).

Please tell me if this 'no-resize window' can be done in a much
easier way.

Sven

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Oct 27 12:40:36 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zY1Li-00MM5cC>; Tue, 27 Oct 1998 06:07:18 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 55D0BD0E8; Tue, 27 Oct 1998 07:16:15 +0100 (CET)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36356533.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 27 Oct 1998 00:06:40 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] No resize window
X-UIDL: 00212be259182fd8a700bca39e9efa75

* List: gfabasic@aachen.linux.de

>>>>  Please tell me if this 'no-resize window' can be done in a much
easier way. <<<<<

Here's a sample program:
Good luck,
Brent


OPENW #1,0,0,_X / 2,_Y / 2,1 + 2 + 4 + 8 + 16 + 32      // do not include
resize box parameters
DO
  GETEVENT
LOOP UNTIL MENU(1) = 4
CLOSEW #1
END



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:27:46 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYA60-00MM5eC>; Tue, 27 Oct 1998 15:27:40 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 619CDD0EB; Tue, 27 Oct 1998 16:36:06 +0100 (CET)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3635E866.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 27 Oct 1998 15:04:08 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Closew ...
X-UIDL: 77d751ca0416e9dd63b8fc96f6bdafe7

* List: gfabasic@aachen.linux.de

Hi!

Does "Closedialog" and "Closewindow" do the same than "~DestroyWindow"? And
if not where are the differencies?

Thanks
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:27:47 1998
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYACa-00MNomC>; Tue, 27 Oct 1998 15:34:28 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 21645D0EC; Tue, 27 Oct 1998 16:43:31 +0100 (CET)
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3635EA23.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 28 Oct 1998 00:13:04 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Importance: Normal
Subject: [GFA] Re: ODBC
X-UIDL: 9b0ef228a12f26979e66ccb2f0dfa6e9

* List: gfabasic@aachen.linux.de

>>I try to handle a Access-Database from my GFA-Programm, and I think that the
only way to do this is to >>use ODBC.
>>Has anyone experiences in this method by using GFA?

Hi Thomas,

I have had some experience of handling Access Databases from GFA using DDE.
If you want to use ODBC I have some sample code written by Ophir Daniel, which
may be helpful.

If you (or others on this list) are interested in this code, please contact me
direct and I will e-mail it.

Regards
Dave Barton
bmcs@ozemail.com.au
Windoze 98 supports real multi-tasking - it can boot and crash simultaneously
!!!



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:27:49 1998
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYAEQ-00MOEgC>; Tue, 27 Oct 1998 15:36:22 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 91868D0ED; Tue, 27 Oct 1998 16:43:35 +0100 (CET)
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3635EA27.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 28 Oct 1998 00:13:01 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Importance: Normal
Subject: [GFA] Re: No Resize Window
X-UIDL: 4b76a272c13906a09f7a3d5b7aa32ec1

* List: gfabasic@aachen.linux.de


>>>>  Please tell me if this 'no-resize window' can be done in a much easier
way. <<<<<

Hi Sven,

The solution offered by Brent is the most effective way to create a 'no-resize
window'.
Personally I don't like the appearance of the window this produces. You might
like to try the following modification I have made to Brent's example.

I have only used this method in Win 32, so I am not 100% sure if it works in Win
16.

Regards
Dave Barton
bmcs@ozemail.com.au
Windoze 98 supports real multi-tasking - it can boot and crash simultaneously
!!!


// Store the window width & height, if based on the desktop _X & _Y
w& = _X / 2,h& = _Y / 2
// Open a normal style GFA window with zero width & height
OPENW #1,100,100,0,0,16 + 32     // do not include resize box parameters
// Change the window to extended style & add a non-sizeable border
~SetWindowLong(WIN(1),GWL_EXSTYLE,WS_EX_DLGMODALFRAME)
// The new extended style does not become effective
// until the whole window is redrawn
SIZEW #1,w&,h&                   // Now make it visible
DO
  GETEVENT
LOOP UNTIL MENU(1) = 4
CLOSEW #1
END



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:27:51 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYBXx-00MOEzC>; Tue, 27 Oct 1998 17:00:37 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id DC15CD06B; Tue, 27 Oct 1998 18:09:37 +0100 (CET)
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3635FE52.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb07.swip.net (8.8.8/8.8.8) with ESMTP 
          id RAA07837 for <gfabasic@linux.net.eu.org>; 
          Tue, 27 Oct 1998 17:00:15 +0100 (MET)
Date: Tue, 27 Oct 1998 16:54:58 +0100
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="----=_NextPart_000_01BE01CA.879BAA60"
Content-Transfer-Encoding: 7bit
Subject: SV: [GFA] No resize window
X-UIDL: 28c3016f39793cabc8db4300ec1b47f8

Hi Brent,
thank you for the tip about 'no resize windows'. It works good, if it
is enough with a thin window frame. But if you put +512 at the end of
the OPENW line, in order to get the nice thick frame, it doesn't work
at all.

Here I send my listing. Please test it to see what I mean. Is it
possible to simplify it?

Sven

----------
>>>>  Please tell me if this 'no-resize window' can be done in a much
easier way. <<<<<

Here's a sample program:
Good luck,
Brent

OPENW #1,0,0,_X / 2,_Y / 2,1 + 2 + 4 + 8 + 16 + 32      // do not
include
resize box parameters
DO
  GETEVENT
LOOP UNTIL MENU(1) = 4
CLOSEW #1
END

Attachment Converted: "c:\programme\eudora\attach\Noresize.lst"
From ???@??? Wed Oct 28 13:27:53 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYDbF-00ML0iC>; Tue, 27 Oct 1998 19:12:09 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id CB835D0E7; Tue, 27 Oct 1998 20:21:07 +0100 (CET)
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36361D24.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb05.swip.net (8.8.8/8.8.8) with ESMTP 
          id TAA29872 for <gfabasic@linux.net.eu.org>; 
          Tue, 27 Oct 1998 19:11:56 +0100 (MET)
Date: Tue, 27 Oct 1998 19:09:19 +0100
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Subject: SV: [GFA] Re: No Resize Window
X-UIDL: 5078081064e97377b76a8b257920ee2b

* List: gfabasic@aachen.linux.de

Hi Dave,
your method is the very best. And it works also when I complete it
whith scroll bars. Thank you very much!

You can see my complicated solution in my answer to Brent. Now I will
put it into the dust bin.

Sven

----------
> Frn: bmcs <bmcs@ozemail.com.au>
> Till: gfabasic@aachen.linux.de
> mne: [GFA] Re: No Resize Window
> Datum:  den 27 oktober 1998 14:13
> 
> * List: gfabasic@aachen.linux.de
> 
> 
> >>>>  Please tell me if this 'no-resize window' can be done in a
much easier
> way. <<<<<
> 
> Hi Sven,
> 
> The solution offered by Brent is the most effective way to create a
'no-resize
> window'.
> Personally I don't like the appearance of the window this produces.
You might
> like to try the following modification I have made to Brent's
example.
> 
> I have only used this method in Win 32, so I am not 100% sure if it
works in Win
> 16.
> 
> Regards
> Dave Barton
> bmcs@ozemail.com.au
> Windoze 98 supports real multi-tasking - it can boot and crash
simultaneously
> !!!
> 
> 
> // Store the window width & height, if based on the desktop _X & _Y
> w& = _X / 2,h& = _Y / 2
> // Open a normal style GFA window with zero width & height
> OPENW #1,100,100,0,0,16 + 32     // do not include resize box
parameters
> // Change the window to extended style & add a non-sizeable border
> ~SetWindowLong(WIN(1),GWL_EXSTYLE,WS_EX_DLGMODALFRAME)
> // The new extended style does not become effective
> // until the whole window is redrawn
> SIZEW #1,w&,h&                   // Now make it visible
> DO
>   GETEVENT
> LOOP UNTIL MENU(1) = 4
> CLOSEW #1
> END
> 
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:27:55 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYDsF-00ML0BC>; Tue, 27 Oct 1998 19:29:43 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id E0EA0D0E8; Tue, 27 Oct 1998 20:38:45 +0100 (CET)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36362146.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 27 Oct 1998 13:23:12 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Re: No Resize Window
X-UIDL: d1aa7cba07badf97b1b7b37016927d41

* List: gfabasic@aachen.linux.de

Hello Dave,

Your routine works fine in WIN3.1, but has problems when you add scrollbars
and minimizebox to it.

I wonder if these same problems occur WIN32?

Best Regards,

Brent.

// In WIN3.1, WS_EX_DLGMODALFRAME causes alignment problems with vert
/horztl scroll bars.
// also, RESTORE button does not work if style 64 is chosen (minimizebox)

w& = _X / 2,h& = _Y / 2
// Open a normal style GFA window with zero width & height
OPENW #1,100,100,0,0,1 + 2 +  4 + 8 + 16 + 32 + 64     // include scroll
bars,minimize/restore, but not maximize
// OPENW #1,100,100,0,0, 16 + 32
// Change the window to extended style & add a non-sizeable border
// ~SetWindowLong(WIN(1),GWL_EXSTYLE,WS_EX_DLGMODALFRAME) // buggy with
params 1,2,4,8,64
// The new extended style does not become effective
// until the whole window is redrawn
SIZEW #1,w&,h&                   // Now make it visible
DO
  GETEVENT
LOOP UNTIL MENU(1) = 4
CLOSEW #1
END


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:28:03 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYJzb-00MM5cC>; Wed, 28 Oct 1998 02:01:43 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A513BD0E8; Wed, 28 Oct 1998 03:10:39 +0100 (CET)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36367D1F.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981028010057.OXNL2040@LOCALNAME>;
          Wed, 28 Oct 1998 01:00:57 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 28 Oct 1998 01:00:57 +0000
Subject: [GFA] an interesting development   2710xx1-
X-UIDL: f79e42fca865bc80c509ba5c29b44b4d

* List: gfabasic@aachen.linux.de

27/10/98 06:37:24 PM   an interesting development   2710xx1-

I am receiving considerable static about my comments about 
incompatability between W3.1/W95 (early) & W98.  I've received a 
pretty fair explanation that leads me to quit worrying about just 
dreaming.

The problem hinges on whether or not W98 was installed to a clean hard 
drive or partition, or was installed as an upgrade over W95!

An upgrade moves a bunch of shared modules out of windows\system dir 
into another, then replaces them with it's own.  There is a monitor 
program that watches over this but is not made readily available to 
the user... quite a bit like sysedit, isn't it... there, but 
unannounced.

Apparently a NEW, FULL installation of W98 does NOT adversly effect 
LibertyBasic & GFA-W programs, whereas an upgrade is a disaster for 
both.

The ahha5 module from my HouseKeeper can find where the upgrade put 
them.

Gratitude to Steven Watson for his alertness & willingness to play 
with the situation.  I will also say "Sorry", but if he hadn't gone 
both routes this problem would still be floating high & dry.  Steven 
had the unique hands-on experience necessary to uncover the reason for 
the problem.

Thank you, Steve!
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:28:15 1998
Return-Path: <nembo@elettroneb.it>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYR04-00MMiOC>; Wed, 28 Oct 1998 09:30:40 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 2E1C2D0F3; Wed, 28 Oct 1998 10:39:35 +0100 (CET)
From: "Nebuloni Davide" <nembo@elettroneb.it>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3636E65B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 28 Oct 1998 09:26:27 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] End a program
X-UIDL: 99fdd8d8f356bd18a08781e78bdb123b

* List: gfabasic@aachen.linux.de

Hi I want to know how to terminate a program running in memory
from a compiled Gfa-program only knowing the name of the
application to end. (I see the name in the task-manager by
pressing "Ctrl + Alt + Del" in Windows)

Thanks



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:28:17 1998
Return-Path: <benny@zeb.be>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYRmu-00MM5yC>; Wed, 28 Oct 1998 10:21:08 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D90F5D0F4; Wed, 28 Oct 1998 11:30:10 +0100 (CET)
From: Benny Sels <benny@zeb.be>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3636F233.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.06) id A1FD1CA200AC; Wed, 28 Oct 1998 10:21:01 +03d0
X-Sender: benny@mail.zeb.be
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Wed, 28 Oct 1998 10:21:01 +0100
In-Reply-To: <3636E65B.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] End a program
X-UIDL: df6e134fac7fc0fac288bb2047b82de7

* List: gfabasic@aachen.linux.de




hw& = FindWindow(0,"Microsoft Access")
IF hw& > 0
  SENDMESSAGE hw&,WM_CLOSE,p&,p%
ENDIF


At 09:26 28/10/98 +0100, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi I want to know how to terminate a program running in memory
>from a compiled Gfa-program only knowing the name of the
>application to end. (I see the name in the task-manager by
>pressing "Ctrl + Alt + Del" in Windows)
>
>Thanks
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:28:18 1998
Return-Path: <nembo@elettroneb.it>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYSHK-00MLMqC>; Wed, 28 Oct 1998 10:52:34 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 5E887D0F5; Wed, 28 Oct 1998 12:01:25 +0100 (CET)
From: "Nebuloni Davide" <nembo@elettroneb.it>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3636F985.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 28 Oct 1998 10:50:05 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 8bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: R: [GFA] End a program
X-UIDL: 42185ee23b9fe8a2fe56745a2ef9a1ee

* List: gfabasic@aachen.linux.de

I have not to close a window but to terminate a Program running
in memory that has no output (window).
(i.e.= I have to terminate a program that put only a small icon near
 the "clock" on the task-bar in Win95)

Really Thanks
Ciao

-----Messaggio originale-----
Da: Benny Sels <benny@zeb.be>
A: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Data: mercoled 28 ottobre 1998 10.20
Oggetto: Re: [GFA] End a program


>* List: gfabasic@aachen.linux.de
>
>
>
>
>hw& = FindWindow(0,"Microsoft Access")
>IF hw& > 0
>  SENDMESSAGE hw&,WM_CLOSE,p&,p%
>ENDIF
>
>
>At 09:26 28/10/98 +0100, you wrote:
>>* List: gfabasic@aachen.linux.de
>>
>>Hi I want to know how to terminate a program running in memory
>>from a compiled Gfa-program only knowing the name of the
>>application to end. (I see the name in the task-manager by
>>pressing "Ctrl + Alt + Del" in Windows)
>>
>>Thanks
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Oct 28 13:28:20 1998
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYTa1-00MKu0C>; Wed, 28 Oct 1998 12:15:57 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 87AC8D0F6; Wed, 28 Oct 1998 13:23:43 +0100 (CET)
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36370CCF.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 28 Oct 1998 22:12:26 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Re: No Size Window
X-UIDL: 3d34e0cdb1494bb1a3c6d21c7fafcf01

* List: gfabasic@aachen.linux.de


>> Your routine works fine in WIN3.1,
but has problems when you add scrollbars and minimizebox to it.
I wonder if these same problems occur WIN32?<<

Hi Brent,

As I said in my message to Sven, "I am not 100% sure if it works in Win 16".

The routine has no problems with Win 32, regardless of the window parameters
used.

It seems that the only solution in Win 16 is to use CreateWindowEx() instead of
OPENW.

Best Regards
Dave Barton
bmcs@ozemail.com.au



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 29 17:22:07 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYblt-00MM5UC>; Wed, 28 Oct 1998 21:00:45 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id CA30DD0F1; Wed, 28 Oct 1998 22:09:33 +0100 (CET)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3637880E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 28 Oct 1998 14:59:14 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Re: No Size Window
X-UIDL: b007f559398b05e7eb7f5d60643e0fc6

* List: gfabasic@aachen.linux.de

Here's a quick and dirty method of  putting a single border on the window
using GFA window functions only.

w& = _X / 2,h& = _Y / 2
// Open a normal style GFA window with zero width & height
OPENW #1,100,100,0,0,1 + 2 +  4 + 8 + 16 + 32 + 64     // include minimize,
but not maximize
SIZEW #1,w&,h&                   // Now make it visible
DO
  GETEVENT
  IF MENU(1) = 21 THEN
    ~SetWindowOrg(_DC(1),0,0)
    CLS
    COLOR 0
    DEFLINE 0,3
    LINE 0,0,0,_Y
    ~SetWindowOrg(_DC(1),-3,0)  // offset the window origin to prevent
printing over border
    ? "hello"
    ?
    ? "this is some text."
  ENDIF

LOOP UNTIL MENU(1) = 4
CLOSEW #1
END

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 29 17:22:21 1998
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYlDX-00MM53C>; Thu, 29 Oct 1998 07:05:55 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B7B9FD0F7; Thu, 29 Oct 1998 08:14:53 +0100 (CET)
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363815F1.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 29 Oct 1998 07:03:27 +0100
X-Mailer: Mozilla 4.5 [en] (Win95; I)
X-Accept-Language: de,en
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 333200002801-0001@t-online.de
Subject: [GFA] Need Help for Dialog & WIN#1 
X-UIDL: 367f702be91553e04b040e511398a87f

* List: gfabasic@aachen.linux.de

Hi,
I need some help to eliminate an annoying behavior of one of my "basic" dialog
structures. The routine below is using a dialog box together with a window that
requests the use of a CB. It is derived from a proposal of Sven Hamstra for
a similar problem (Thanks, Sven !).

Question:
During the calculations (simulated by DELAY 1) the entier screen is occupied by
WINDOW #1 for the drawing. Has anyone an idea how to display the dialog box only
during the calculations ? (Compiled version should be compatible with W95/NT4.0)

I am grateful for comments. Juergen

--------
FULLW #1
SHOWW #1,SW_HIDE
DIALOG #1,0,0,500,120,"",WS_SYSMENU
  CB DLG(1),0 TO -1,DlgProc1()
  LTEXT "",             10,  20, 20, 100, 25
  PUSHBUTTON "EVALUATE", 1,  20, 60, 100, 25
  PUSHBUTTON "Picture",  2, 170, 60, 100, 25
  PUSHBUTTON "END",      3, 320, 60, 100, 25
  DLG FILL 1,RGB(192,192,192)
ENDDIALOG
SHOWDIALOG #1
'
Sel&=0
Exit!=FALSE
DO
  SLEEP
  IF MENU(14) = 1
    SELECT MENU(1)
    CASE 3, 4
      SHOWW #1,SW_HIDE
    CASE 21
      SELECT Sel&
      CASE 1
        SHOWW #1,SW_HIDE
        DELAY 1             // some time consuming calculations
        _WIN$(DLGITEM(1,10))=STR$(RANDOM(10))
      CASE 2
        PCIRCLE 100,100,50  // some graphics
      CASE 3
        Exit!=TRUE
      ENDSELECT
    ENDSELECT
  ENDIF
LOOP UNTIL Exit!
CloseDialog #1
CLOSEW #1
'
PROCEDURE DlgProc1(hWnd&,Mess&,wParam&,lParam%)
  SELECT Mess&
  CASE WM_CLOSE
    Exit!=TRUE
  CASE WM_COMMAND
    Sel&=wParam&
    SHOWW #1,SW_SHOW
    ~InvalidateRect(WIN(1),0,1)
  ENDSELECT
RETURN



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Oct 29 17:22:23 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYodW-00MMhrC>; Thu, 29 Oct 1998 10:44:58 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B5C56D0E7; Thu, 29 Oct 1998 11:53:57 +0100 (CET)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36384948.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981029094411.CLSI27910@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 29 Oct 1998 09:44:11 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 29 Oct 1998 09:44:11 +0000
Subject: re: [GFA] Need Help for Dialog & WIN#1 
X-UIDL: 783c0e2c7b5690742e47305f3241d655

* List: gfabasic@aachen.linux.de

From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Subject: [GFA] Need Help for Dialog & WIN#1 

Juergen

Rather than SHOW/HIDE, can you not OPENW #1 at -_X,0,_X,_Y,-1 and then use
MOVEW #1,0,0 ONLY when you want to see it?

Another (same) way:

FULLW #1
MOVEW #1,-_X,0
Then move it to 0,0 with MOVEW #1,0,0 when you want it visible?
<G>
TomR.






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 30 21:32:36 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zYx51-00MM7gC>; Thu, 29 Oct 1998 19:45:55 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 4CBC2D0EA; Thu, 29 Oct 1998 20:55:00 +0100 (CET)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3638C814.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 29 Oct 1998 13:45:17 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Need Help for Dialog & WIN#1
X-UIDL: c40b291e8c819c11bd0172399728de3b

* List: gfabasic@aachen.linux.de

Here's a modification that works.
Your program was interleaving handling of window events and dlg events.
I separated them and made the window repaintable, in case that is
desireable.

Regard,
Brent

OPENW #1
CB WIN(1),WM_ERASEBKGND,ppx1() // necessary for compiled programs
// FULLW #1

SHOWW #1,SW_HIDE
DIALOG #1,0,0,500,120,"",WS_SYSMENU
  CB DLG(1),0 TO -1,DlgProc1()
  ' LTEXT "",             10,  20, 20, 100, 25
  PUSHBUTTON "EVALUATE", 1,  20, 60, 100, 25
  PUSHBUTTON "Picture",  2, 170, 60, 100, 25
  PUSHBUTTON "END",      3, 320, 60, 100, 25
  DLG FILL 1,RGB(192,192,192)
ENDDIALOG
SHOWDIALOG #1
'
Sel& = 0
Exit! = FALSE
DO
  SLEEP

  IF MENU(14) = 1
    SELECT MENU(1)
    CASE 4
      //     CASE 3,4
      SHOWW #1,SW_HIDE
    CASE 21
      // use callback to erase background in compiled program
      // cls  // this will work only in interpreter
      PCIRCLE 100,100,50  // some graphics
    ENDSELECT
  ENDIF

  SELECT dlgSel&
  CASE 1
    SHOWW #1,SW_HIDE
    FOR x = 1 TO 20  // pick some large number
      PEEKEVENT  // allow DefWindowsProc() or GFA to process any pending
messages
    NEXT x

    DELAY 1       // some time consuming calculations
    _WIN$(DLGITEM(1,10)) = STR$(RANDOM(10))

  CASE 2
    SHOWW #1,SW_SHOW
    ~InvalidateRect(WIN(1),0,1)

  CASE 3
    Exit! = TRUE

  ENDSELECT
  dlgSel& = 0

LOOP UNTIL Exit!
CLOSEDIALOG #1
CLOSEW #1
'
PROCEDURE DlgProc1(hWnd&,Mess&,wParam&,lParam%)
  SELECT Mess&
  CASE WM_CLOSE
    Exit! = TRUE
  CASE WM_COMMAND
    dlgSel& = wParam&
  ENDSELECT
RETURN

PROCEDURE ppx1(hw&,m&,w&,l%)
  // erase background handler only
  WIN #1
  CLS
  RETVAL 0
RETURN





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Oct 30 21:32:50 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zZG2u-00MM7wC>; Fri, 30 Oct 1998 16:01:00 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 76EB5D0E7; Fri, 30 Oct 1998 17:09:48 +0100 (CET)
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3639E4CC.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 30 Oct 1998 07:00:09 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-Mimeole: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] letters
X-UIDL: 84b76229eed11e9e6d28ca15f4c30fe8

* List: gfabasic@aachen.linux.de

The 'Not Affiliated With GFA News Letters' are available for downloading on
the GFAWHELP web site. Select the Letters button from the main page.
Dale Bryant

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 31 13:50:21 1998
Return-Path: <lionel93@hotmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zZXGC-00MM5WC>; Sat, 31 Oct 1998 10:23:52 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0AA00D0E7; Sat, 31 Oct 1998 11:32:46 +0100 (CET)
From: "lalloue lionel" <lionel93@hotmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363AE751.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Originating-IP: [194.2.0.22]
Content-Type: text/plain
Date: Sat, 31 Oct 1998 01:23:19 PST
Subject: [GFA] mailling list
X-UIDL: c8894b6dd0f73d546596bc3e5d8ec2e9

* List: gfabasic@aachen.linux.de

Je n'ai encore rien reu depuis mon inscription?

I have not received since my inscription ?

______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Oct 31 19:04:32 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zZfNL-00MM3vC>; Sat, 31 Oct 1998 19:03:47 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id C67A2D0E7; Sat, 31 Oct 1998 20:12:42 +0100 (CET)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363B612D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Sat, 31 Oct 1998 18:37:48 -0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Playing of MP3 compressed sound files
X-UIDL: 1f324fafee334750739495ea0c7ecbd3

* List: gfabasic@aachen.linux.de

At my Homepage You will find an example for playing of MP3 encoded
sound files with GFA Basic (possible only under 32 Bit systems).

MPEG-3 is a high-end audio compression where a 1 MB file contains
1 minute music with full (!) stereo CD quality. But it is also possible
to get a much better compression with minor quality. The example file
MICROSFT.WAV wich is inserted is for example a 32KB low quality file
wich contains 32 sec. (!) sound... In other words: You can store
25 minutes sound on a floppy disk...

MP3 compressed files You can also store as resources inside EXE/DLL.

It is only necessary to install the Freeware L3CODECA.ACM encoder/decoder
extension wich is shipped with Windows 98 but also free available in Internet.
(You get it while downloading the GFA Basic example.)

Bye, Roland Walter
http://userpage.fu-berlin.de/~alibaba/gfabasic/

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 16:52:43 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zZlpc-00MM5WC>; Sun, 1 Nov 1998 01:57:24 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B363AD098; Sun,  1 Nov 1998 03:06:29 +0100 (CET)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363BC225.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 31 Oct 1998 19:56:03 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="a2935343-711a-11d2-a108-00805feaacd2"
Subject: [GFA] HANGUP Modem
X-UIDL: 4455c2af6a78632e7c9d1e62176cbc4d

Here's a sample of a little program to hangup a modem after a comms crash.

I found that:
   a) When creating a dialog, the default pushbutton must be the first
button declared.
   b) Also, when one pushbutton is selected, it becomes the new default
pushbutton.
   c) DS_MODALFRAME is required for 3d look when  using DLG 3D ON.

 Can someone answer these questions?
 1) How can a pushbutton other than the first one declared be set as the
default?
 2) How can pushbutton be set up to remain the default after another is
pushed?

Brent

Attachment Converted: "c:\programme\eudora\attach\HANGUP.LST"
From ???@??? Mon Nov 02 16:52:48 1998
Return-Path: <polliwog@cybertours.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0za45n-00MM5uC>; Sun, 1 Nov 1998 21:27:19 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9C20BD0AF; Sun,  1 Nov 1998 22:36:29 +0100 (CET)
From: "Polli Co." <polliwog@cybertours.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363CD45D.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 1 Nov 1998 15:23:21 -0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3007.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3007.0
Subject: [GFA] Fw: [Fwd: Fw: WARNING!!!!]
X-UIDL: 59af819ce412425614b43949f23fd7dd

* List: gfabasic@aachen.linux.de

Hello... Just received this warning....
Don't know if this is for real or not Folks, But Better Safe than Sorry.,
Paul

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX


>WARNING!
>>> >
>>> >If you receive an e-mail titled "Win A Holiday" DO NOT open it. It
>>> >will erase everything on your hard drive. Forward this letter out to
>
>>> >as many people as you can. This is a new, very malicious virus and
>>> >not many people know about it. This information was announced
>>> >Monday morning from Microsoft, please share it again pass this
>>> >along to everyone in your address book so that this may be stopped.

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 16:52:50 1998
Return-Path: <SYSOP@CCASTLE2.prometheus.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0za4dL-00MMi7C>; Sun, 1 Nov 1998 22:01:59 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 0A53AD0AF; Sun,  1 Nov 1998 23:11:12 +0100 (CET)
From: SYSOP@CCASTLE2.prometheus.de (Martin Brueckner)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363CDC80.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
>X-Dummy: YES
X-ZC-VIA: 19981101203055W+1@dame.de
X-ZC-POST: Buddestr. 16 / 33602 Bielefeld
X-ZC-TELEFON: Voice: 0521 179463 Fax: 179200 Modem: 179227 ISDN: 179200
X-Mailer: WinPoint V1.95 Beta by M.Brueckner SER:A0000016
X-ZC-PGP-KEY-AVAIL: wird bei Empfangsbestaetigung mitgeschickt
References: <363B612D.BeroList-2.5.8@aachen.linux.de>
Date: Sun,  1 Nov 1998 18:55:58 +0100
X-Gateway: ZCONNECT dame.de [UUWORLD RFC/ZC V2.2 SER#A4583577]
Content-Type: text
Sender: dame!CCASTLE2.prometheus.de!SYSOP@lynet4.lynet.de
Subject: Re: [GFA] Playing of MP3 compressed sound files
X-UIDL: 7181c93b3b98544709f54788fde5e386

* List: gfabasic@aachen.linux.de

Du schriebst am 31.10.1998 um 18:37:48 Uhr folgenden Text mit
dem Betreff "[GFA] Playing of MP3 compressed sound files":

> At my Homepage You will find an example for playing of MP3 encoded
> sound files with GFA Basic (possible only under 32 Bit systems).

Hast du auch eine Mglichkeit gefunden, um WAV Dateien mit MP3
zu komprimieren?

--
Mit freundlichen Gren,
Martin Brueckner

Voice: 0521/179463 Box Modem: 0521/179227 ISDN+FAX: 0521/179200
                      * Homepage: http://pmbs.home.ml.org *

Keiner ist unnuetz, er kann immer noch als schlechtes Beispiel dienen.
-- WINPOINT 1.95 Beta


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 16:52:51 1998
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0za4lh-00MM7gC>; Sun, 1 Nov 1998 22:10:37 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3AC92D0B0; Sun,  1 Nov 1998 23:19:37 +0100 (CET)
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363CDE7C.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 31 Oct 1998 21:57:26 +0100
X-Mailer: Mozilla 4.5 [en] (Win95; I)
X-Accept-Language: de,en
MIME-Version: 1.0
References: <36384948.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 333200002801-0001@t-online.de
Subject: Re: [GFA] Need Help for Dialog & WIN#1
X-UIDL: 3e6330e48e6c7e9957cf21182e7f7531

* List: gfabasic@aachen.linux.de

Hello,
Special thanks to Brent and Tom for their proposals.

I just combined HIDE / MOVEW #1,-_X,0   respectively   SHOW / MOVE #1 (0,0)
to make the background visible. HIDE/SHOWs  are still needed.
Also the dialog window is no more temporary destroyed.
So my problems are solved completely.

The proposal of Brent does work excellent and might be more elegant, but due to
the rigid
separation of the graphics and calculations, I cann't use it in my dialog
structure directly.

Thanks once more for your helps.
Regards Juergen

Tom Record wrote:

> Rather than SHOW/HIDE, can you not OPENW #1 at -_X,0,_X,_Y,-1 and then use
> MOVEW #1,0,0 ONLY when you want to see it?
>
> Another (same) way:
>
> FULLW #1
> MOVEW #1,-_X,0
> Then move it to 0,0 with MOVEW #1,0,0 when you want it visible


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 16:52:52 1998
Return-Path: <aarnouts@zeelandnet.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0za6V4-00MLMmC>; Mon, 2 Nov 1998 00:01:34 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 2BBEDD0AF; Mon,  2 Nov 1998 01:10:45 +0100 (CET)
From: "Sjaak Aarnoutse" <aarnouts@zeelandnet.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363CF888.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 2 Nov 1998 00:01:03 +0100
MIME-Version: 1.0
Content-type: text/plain; charset=ISO-8859-1

Priority: normal
In-reply-to: <363CDC80.BeroList-2.5.8@aachen.linux.de>
X-mailer: Pegasus Mail for Win32 (v3.01a)
Sender: aarnouts@mail.zeelandnet.nl
Subject: Re: [GFA] Playing of MP3 compressed sound files
X-UIDL: fc3a6b7a8150479822d4308730687f47

* List: gfabasic@aachen.linux.de

> Hast du auch eine Mglichkeit gefunden, um WAV Dateien mit MP3
> zu komprimieren?


To capture audio CD's en convert WAV's to MP3 try:

http://ftpsearch.ntnu.no/cgi-
bin/search?type=Exact+search&query=cdex100b4%2ezip



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 16:52:56 1998
Return-Path: <mark.leonard@lineone.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0za6mq-00MM7YC>; Mon, 2 Nov 1998 00:19:56 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 15BE1D0B0; Mon,  2 Nov 1998 01:29:06 +0100 (CET)
From: "MARK LEONARD" <mark.leonard@lineone.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363CFCD6.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 1 Nov 1998 23:15:42 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Resolution and color mode
X-UIDL: e740694c66a51f7f0efddbc7915a411e

* List: gfabasic@aachen.linux.de

Can anyone help me with these questions?

1. Is it possible to change the screen resolution in GFA Basic.

2. Is it possible to change the Windows colour mode(8-bit colour to 16-bit
colour etc).

/Mark


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 16:52:57 1998
Return-Path: <dave.williams@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0za7F3-00MMhwC>; Mon, 2 Nov 1998 00:49:05 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id DE9A2D0B0; Mon,  2 Nov 1998 01:58:18 +0100 (CET)
From: "Dave Williams" <dave.williams@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363D03AB.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 1 Nov 1998 23:47:59 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] REMOVE
X-UIDL: 1c3fcd41c12920fb2aadae1c2459cbb9

* List: gfabasic@aachen.linux.de

REMOVE


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 16:52:58 1998
Return-Path: <lionel93@hotmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaEJP-00MM7RC>; Mon, 2 Nov 1998 08:22:03 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3DE08D0AF; Mon,  2 Nov 1998 09:31:06 +0100 (CET)
From: "lalloue lionel" <lionel93@hotmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363D6DCE.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Originating-IP: [194.2.0.22]
Content-Type: text/plain
Date: Sun, 01 Nov 1998 23:21:23 PST
Subject: Re: [GFA] REMOVE
X-UIDL: 2aa548eab2deb6784537b5a66701facf

* List: gfabasic@aachen.linux.de


Is not REMOVE but UNUSCRIBE in the subject
>From dave.williams@gemworks.demon.co.uk Sun Nov  1 15:49:24 1998
>Received: from aachen.linux.de (unknown [127.0.0.1])
>	by www.aachen.linux.de (VMailer) with SMTP
>	id DE9A2D0B0; Mon,  2 Nov 1998 01:58:18 +0100 (CET)
>From: "Dave Williams" <dave.williams@gemworks.demon.co.uk>
>Reply-To: gfabasic@linux.net.eu.org
>Errors-To: gfabasic@aachen.linux.de
>To: gfabasic@aachen.linux.de
>Message-ID: <363D03AB.BeroList-2.5.8@aachen.linux.de>
>Delivered-To: gfabasic@aachen.linux.de
>Date: Sun, 1 Nov 1998 23:47:59 -0000
>MIME-Version: 1.0
>Content-Type: text/plain;
>Content-Transfer-Encoding: 7bit
>X-Priority: 3
>X-MSMail-Priority: Normal
>X-Mailer: Microsoft Outlook Express 4.72.2106.4
>X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
>Subject: [GFA] REMOVE
>
>* List: gfabasic@aachen.linux.de
>
>REMOVE
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 16:53:01 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaLwk-00MLMoC>; Mon, 2 Nov 1998 16:31:10 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 9675AD0AF; Mon,  2 Nov 1998 17:39:07 +0100 (CET)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363DE02B.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 2 Nov 1998 09:08:20 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] E-Mail-Adress
X-UIDL: 0321ed7de5ba1865560e069e979a2556

* List: gfabasic@aachen.linux.de

Hi!

Has anyone the E-Mail-Adress of Ophir?

Many thanks
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 22:36:21 1998
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaMNm-00ML0LC>; Mon, 2 Nov 1998 16:59:06 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id A365FD0B0; Mon,  2 Nov 1998 18:07:59 +0100 (CET)
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363DE6F3.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Mon, 02 Nov 1998 16:56:40 -0100
In-Reply-To: <363CDC80.BeroList-2.5.8@aachen.linux.de>
References: <363B612D.BeroList-2.5.8@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Content-Transfer-Encoding: 8bit
Subject: Re: [GFA] Playing of MP3 compressed sound files
X-UIDL: 1c5d35e955a216aeaaee7f29b8b5190c

* List: gfabasic@aachen.linux.de

At 18:55 01.11.1998 +0100, you wrote:

>> At my Homepage You will find an example for playing of MP3 encoded
>> sound files with GFA Basic (possible only under 32 Bit systems).
>
>Hast du auch eine Mglichkeit gefunden, um WAV Dateien mit MP3
>zu komprimieren?

Ja, das geht mit dem Ding auch ;-)

Tsch von Roland.
P.S. Willst Du einen 12KB groen 32-Bit-Textbetrachter fr winPoint haben,
der beliebig lange Texte darstellt?
Ich wrde ihn auch an WinPoint-Bedrfnisse anpassen - z.B. dateiname
mit Offset und Textlnge per Kommandozeile bergeben, Zitieren
farbig darstellen o...

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 22:36:24 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaMix-00MM5dC>; Mon, 2 Nov 1998 17:20:59 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 453D4D0B1; Mon,  2 Nov 1998 18:30:06 +0100 (CET)
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363DEC1E.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981102161953.FIUD9725@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 2 Nov 1998 16:19:53 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 2 Nov 1998 16:19:53 +0000
Subject: Re: [GFA] E-Mail-Adress
X-UIDL: 51e80068a08e25d01f2ee819e523ce1f

* List: gfabasic@aachen.linux.de

Email: ophir@compuserve.com


At 09:08 AM 02/11/98 +0100, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi!
>
>Has anyone the E-Mail-Adress of Ophir?
>
>Many thanks
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 22:36:30 1998
Return-Path: <afonsogustavo@abordo.com.br>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaQ3K-00MM5oC>; Mon, 2 Nov 1998 20:54:14 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 05E3FD0B1; Mon,  2 Nov 1998 22:03:19 +0100 (CET)
From: afonsogustavo <afonsogustavo@abordo.com.br>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363E1E17.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 02 Nov 1998 17:54:32 -0200
X-Mailer: Mozilla 4.5b2 [en] (Win98; I)
X-Accept-Language: pt-BR,en
MIME-Version: 1.0
Content-Type: multipart/mixed;
 boundary="------------95438FEB18364C5E39C0DC3C"
Subject: [GFA] [Fwd: Changes in my e-mail address]
X-UIDL: 194903145da2e110331dae364e0f881f


X-Mozilla-Status2: 00000000
Message-ID: <363E0DD4.F7629050@abordo.com.br>
Date: Mon, 02 Nov 1998 17:53:56 -0200
From: afonsogustavo <afonsogustavo@abordo.com.br>
X-Mailer: Mozilla 4.5b2 [en] (Win98; I)
X-Accept-Language: pt-BR,en
MIME-Version: 1.0
To: gfabasic@linux.net.eu.org
Subject: Changes in my e-mail address
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit

Hi,
Since Ill no more use services of brnet.com.br please unsubscribe
afonsogustavo@brnet.com.br and subscribe afonsogustavo@abordo.com.br
Thanks,
Afonso Gustavo B Martins
afonsogustavo@abordo.com.br


From ???@??? Mon Nov 02 22:36:31 1998
Return-Path: <afonsogustavo@abordo.com.br>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaQ4m-00MM5dC>; Mon, 2 Nov 1998 20:55:44 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id F1B3FD0B0; Mon,  2 Nov 1998 22:03:18 +0100 (CET)
From: afonsogustavo <afonsogustavo@abordo.com.br>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363E1E17.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 02 Nov 1998 17:53:56 -0200
X-Mailer: Mozilla 4.5b2 [en] (Win98; I)
X-Accept-Language: pt-BR,en
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Subject: [GFA] Changes in my e-mail address
X-UIDL: d2a43d0401489400eb35a6140956dcf2

* List: gfabasic@aachen.linux.de

Hi,
Since Ill no more use services of brnet.com.br please unsubscribe
afonsogustavo@brnet.com.br and subscribe afonsogustavo@abordo.com.br
Thanks,
Afonso Gustavo B Martins
afonsogustavo@abordo.com.br



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Nov 02 22:36:32 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaQzQ-00MM5HC>; Mon, 2 Nov 1998 21:54:16 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id B4688D0B4; Mon,  2 Nov 1998 23:03:25 +0100 (CET)
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363E2C31.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 2 Nov 1998 15:53:25 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="8274fa76-7295-11d2-afcf-00805fbe60fa"
Subject: [GFA] Problems with DIALOG styles
X-UIDL: 5577497738a1fdc9f2736e8b65bc917c

I'm having problems with some styles in a DIALOG statement using DLG 3D ON.

Attached is a simple program to hangup a modem after a comms crash.

DS_MODALFRAME is required for 3d look when  using DLG 3D ON. (in PROC
dlgsetup)

However: Using both DS_MODAL FRAME and WS_SYSMENU with DLG 3D ON causes
problems:
      a) The minimize button becomes flaky, sometimes works, sometimes not
      b) The system menu adds an unwanted maximimize option.
      c) When minimized, the RESTORE menu item does not work,
         and double click must be on the text under the icon, rather than
the
         icon in order to restore the dialog.
      d) Eliminating either of the 2 styles eliminates the major problems,
but some
         small bugs remain in painting the icon.

I'm using Win3.1, with CTL3D.DLL date 12/14/96 @ 19,568 bytes
    1) Does anyone know the cause or solution to this problem?
    2) Does it also occur under Win95, etc?

Thanks,

Brent


Attachment Converted: "c:\programme\eudora\attach\HANGUP2.LST"
From ???@??? Tue Nov 03 12:21:16 1998
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaZvh-00MM5rC>; Tue, 3 Nov 1998 07:27:01 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3EB9ED0B4; Tue,  3 Nov 1998 08:36:16 +0100 (CET)
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363EB270.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 02 Nov 1998 07:25:31 +0100
X-Mailer: Mozilla 4.5 [en] (Win95; I)
X-Accept-Language: de,en
MIME-Version: 1.0
References: <363E2C31.BeroList-2.5.8@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Sender: 333200002801-0001@t-online.de
Subject: Re: [GFA] Problems with DIALOG styles
X-UIDL: e88645e6bedd324b6c90f07628ea6098

* List: gfabasic@aachen.linux.de

Hello Brent,
here are some comments:

> I'm using Win3.1, with CTL3D.DLL date 12/14/96 @ 19,568 bytes

I am assuming you have overseen the "1" in the file name. Make sure
that both CTL3D1.DLL and CTL3D.DLL  are loacated in your system directory.
The MS - CTL3D1.DLL  10/21/93 @ 19,568 bytes is an old one from the early days
of Windows and is neccessary for a correct DLG 3D functionalty under Win 3.1.

>     1) Does anyone know the cause or solution to this problem?
>     2) Does it also occur under Win95, etc?

I have checked your dialog styles under Win95 and could not identify your problems
at the first glance, but the unwanted maximizebox occurs in the same way.

Juergen

PS:. You should quit your program with DLG 3D OFF.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Nov 03 12:21:17 1998
Return-Path: <lionel93@hotmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zabnG-00MM5uC>; Tue, 3 Nov 1998 09:26:26 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id 3CEF6D0B8; Tue,  3 Nov 1998 10:34:24 +0100 (CET)
From: "lalloue lionel" <lionel93@hotmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363ECE20.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-Originating-IP: [194.2.0.22]
MIME-Version: 1.0
Content-Type: text/plain
Date: Tue, 03 Nov 1998 00:25:03 PST
Subject: [GFA] gfawin.hlp
X-UIDL: be70c9e848490e4e3ff9e2b511ca91c2

* List: gfabasic@aachen.linux.de

I search this files . The help files version trial is very too little.

______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:54:43 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from www.aachen.linux.de (198.22.51.242) with smtp
	  id <m0zaimF-00MJm7C>; Tue, 3 Nov 1998 16:53:51 +0100 (MET)
Received: from aachen.linux.de (unknown [127.0.0.1])
	by www.aachen.linux.de (VMailer) with SMTP
	id D6930D0BD; Tue,  3 Nov 1998 18:02:23 +0100 (CET)
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363F3723.BeroList-2.5.8@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 3 Nov 1998 09:06:59 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <363DEC1E.BeroList-2.5.8@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] E-Mail-Adress
X-UIDL: ce7b6773dbcf9a4b00e834601427e9b9

* List: gfabasic@aachen.linux.de

Hi Tom!

> Email: ophir@compuserve.com

Many thanks!

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:54:48 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zany1-00MM5oC>; Tue, 3 Nov 1998 22:26:21 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id WAA13064;
	Tue, 3 Nov 1998 22:02:46 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363F8021.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981103210222.LZSR27142@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 3 Nov 1998 21:02:22 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 3 Nov 1998 21:02:22 +0000
Subject: Re: AW: [GFA] E-Mail-Adress
X-UIDL: 2ea4ac52c079660761b8ff5fd82c9f0f

Welcome!  That what friends are for.
<G>


At 09:06 AM 03/11/98 +0100, you wrote:
>* List: gfabasic@aachen.linux.de
>
>Hi Tom!
>
>> Email: ophir@compuserve.com
>
>Many thanks!
>
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:54:53 1998
Return-Path: <postmaster@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zaq2L-00MNYhC>; Wed, 4 Nov 1998 00:38:57 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id AAA14397;
	Wed, 4 Nov 1998 00:19:37 +0100
From: "Gemworks Direct" <postmaster@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <363F9FD5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 3 Nov 1998 23:19:47 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] REMOVE
X-UIDL: f60226a5107372f632b1da0b79b1b541




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:54:59 1998
Return-Path: <ujrf04@ibm.rhrz.uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zb2xb-00MOEGC>; Wed, 4 Nov 1998 14:26:55 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id OAA19126;
	Wed, 4 Nov 1998 14:01:18 +0100
From: ujrf04@ibm.rhrz.uni-bonn.de
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3640606C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Wed, 04 Nov 98 14:00:40 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Wed, 04 Nov 1998 13:54:46 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Modal Dialog
X-UIDL: 79358b9798b6eadbdb1c817b79e95ebf

Hi everybody, 

I'm trying to create a modal dialog-box. When I'm using the
"DIALOG"-Command it won't work: The dialog-box behaves just like any other
window: The window is still enabled, I can switch between the dialog-box,
the window and the other applications with [ALT]-[TAB]. If I disable the
window, I can't switch to that window any more, but it is still just the
dialog-box that appears when I switch with [ALT]-[TAB]. 

Anybody has an idea? This is the code I'm using:  

OPENW #1
DIALOG #1,70,5,300,200,"MyDialog" ,$4000002
  CONTROL "O.K.",IDOK,"button",$10010001,20,120,64,32
  CONTROL "Abbrechen",IDCANCEL,"button",$10010000,170,120,74,30
ENDDIALOG
  
f! = FALSE
DO
  SLEEP
  IF _Mess = WM_COMMAND AND (_wParam = IDOK OR _wParam = IDCANCEL)
    f! = TRUE
  ENDIF
  IF MENU(1) = 4 THEN
    f! = TRUE
  ENDIF
LOOP UNTIL f!
CLOSEDIALOG  #1
CLOSEW #1


Thank you,

Christian


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:55:01 1998
Return-Path: <EMMINT02@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zb3ZP-00MKtoC>; Wed, 4 Nov 1998 15:05:59 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id OAA19628;
	Wed, 4 Nov 1998 14:50:42 +0100
From: EMMINT02@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36406BE3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 4 Nov 1998 08:49:42 EST
Mime-Version: 1.0
Content-type: text/plain; charset=ISO-8859-1

X-Mailer: Windows AOL sub 66
Subject: Re: [GFA] Modal Dialog
X-UIDL: 4acf555d6d83ef4f23299b4148405be7

hello...
not jet having an idea, for Iam still ATARI-GFA-User, but next WINDOWS-GFA-
User.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:55:04 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zb8nr-00MNpHC>; Wed, 4 Nov 1998 20:41:15 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id UAA23930;
	Wed, 4 Nov 1998 20:20:07 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3640B947.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 4 Nov 1998 14:18:43 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Modal Dialog
X-UIDL: e3a3024353028fd5ae41b9c12d8728f8

I noticed your code did not include SHOWDIALOG# 1:

Hope this helps

Brent


OPENW #1
DIALOG #1,70,5,300,200,"MyDialog" ,$4000002
  CONTROL "O.K.",IDOK,"button",$10010001,20,120,64,32
  CONTROL "Abbrechen",IDCANCEL,"button",$10010000,170,120,74,30
ENDDIALOG
SHOWDIALOG# 1  // you need this statement
  

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Nov 05 18:17:16 1998
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zbHP4-00MM5MC>; Thu, 5 Nov 1998 05:52:14 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id FAA28000;
	Thu, 5 Nov 1998 05:40:52 +0100
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36413CBC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 5 Nov 1998 15:39:42 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <3640606C.BeroList-2.5.9@aachen.linux.de>
Subject: RE: [GFA] Modal Dialog
X-UIDL: 601f0d5aaddf9bb7375af0a28cd7838f
Status: U

Hi Christian,

I not completely sure what you believe to be the function of a 'Modal' dialog.

You appear to understand the use of DISABLEW and ENABLEW, so I assume you want
to prevent the use of ALT + TAB when your dialog is displayed. If this is
correct, then add the 2 lines shown to your code:-

OPENW #1
DIALOG #1,70,5,300,200,"MyDialog" ,$4000002
CONTROL "O.K.",IDOK,"button",$10010001,20,120,64,32
CONTROL "Abbrechen",IDCANCEL,"button",$10010000,170,120,74,30
ENDDIALOG
' --------> ADD THE NEXT 2 LINES AND YOU HAVE CONTROL OF THE SCREEN
SHOWDIALOG #1
~SetSysModalWindow(DLG(1))
' --------> NOTE: This remains effective until the dialog is destroyed,
' --------> or System Modal status is passed to another window.
f! = FALSE
DO
SLEEP
IF _Mess = WM_COMMAND AND (_wParam = IDOK OR _wParam = IDCANCEL)
f! = TRUE
ENDIF
IF MENU(1) = 4 THEN
f! = TRUE
ENDIF
LOOP UNTIL f!
CLOSEDIALOG  #1
CLOSEW #1

Best Regards,
Dave Barton
bmcs@ozemail.com.au



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Nov 05 18:17:19 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zbRoM-00MM7rC>; Thu, 5 Nov 1998 16:59:02 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id QAA00092;
	Thu, 5 Nov 1998 16:31:43 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3641D52B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 5 Nov 1998 15:39:27 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] last modifying-date of a file
X-UIDL: 2b4c27d35077be524cd8ad0ee6221467

Hi!

With the following fine listing which is running with a FAT32-Filesystem I
can read the last-modifying-time of a file but now I must also have the
date(!). How can I modify the listing to get it?

Many thanks
Thomas

--------------------------------------------------------------------------

FUNCTION get_file_time$(file$)
  LOCAL time&,sec$,min$,std$,time$
  ~FRE(0)
  '
  ~FSETDTA(_PSP + 128)
  IF FSFIRST(_OEM$(file$),%100111) => 0 THEN
    LET time& = WORD{_PSP + 150}
    LET sec$ = DEC$((time& AND %11111) * 2,2)
    LET mi$ = DEC$((time& >> 5) AND %111111,2)
    LET std$ = DEC$(s(time& >> 11) AND %11111,2)
    LET time$ = std$ + ":" + mi$ + ":" + sec$
  ELSE
    LET time$ = "???"
  ENDIF
  '
  RETURN time$
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:54:59 1998
Return-Path: <ujrf04@ibm.rhrz.uni-bonn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zb2xb-00MOEGC>; Wed, 4 Nov 1998 14:26:55 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id OAA19126;
	Wed, 4 Nov 1998 14:01:18 +0100
From: ujrf04@ibm.rhrz.uni-bonn.de
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3640606C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
   (IBM/VM SMTP V2R2) with TCP; Wed, 04 Nov 98 14:00:40 MEZ
X-Sender: ujrf04@ibm.rhrz.uni-bonn.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Wed, 04 Nov 1998 13:54:46 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Modal Dialog
X-UIDL: 79358b9798b6eadbdb1c817b79e95ebf

Hi everybody, 

I'm trying to create a modal dialog-box. When I'm using the
"DIALOG"-Command it won't work: The dialog-box behaves just like any other
window: The window is still enabled, I can switch between the dialog-box,
the window and the other applications with [ALT]-[TAB]. If I disable the
window, I can't switch to that window any more, but it is still just the
dialog-box that appears when I switch with [ALT]-[TAB]. 

Anybody has an idea? This is the code I'm using:  

OPENW #1
DIALOG #1,70,5,300,200,"MyDialog" ,$4000002
  CONTROL "O.K.",IDOK,"button",$10010001,20,120,64,32
  CONTROL "Abbrechen",IDCANCEL,"button",$10010000,170,120,74,30
ENDDIALOG
  
f! = FALSE
DO
  SLEEP
  IF _Mess = WM_COMMAND AND (_wParam = IDOK OR _wParam = IDCANCEL)
    f! = TRUE
  ENDIF
  IF MENU(1) = 4 THEN
    f! = TRUE
  ENDIF
LOOP UNTIL f!
CLOSEDIALOG  #1
CLOSEW #1


Thank you,

Christian


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:55:01 1998
Return-Path: <EMMINT02@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zb3ZP-00MKtoC>; Wed, 4 Nov 1998 15:05:59 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id OAA19628;
	Wed, 4 Nov 1998 14:50:42 +0100
From: EMMINT02@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36406BE3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 4 Nov 1998 08:49:42 EST
Mime-Version: 1.0
Content-type: text/plain; charset=ISO-8859-1

X-Mailer: Windows AOL sub 66
Subject: Re: [GFA] Modal Dialog
X-UIDL: 4acf555d6d83ef4f23299b4148405be7

hello...
not jet having an idea, for Iam still ATARI-GFA-User, but next WINDOWS-GFA-
User.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 04 21:55:04 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zb8nr-00MNpHC>; Wed, 4 Nov 1998 20:41:15 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id UAA23930;
	Wed, 4 Nov 1998 20:20:07 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3640B947.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 4 Nov 1998 14:18:43 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Modal Dialog
X-UIDL: e3a3024353028fd5ae41b9c12d8728f8

I noticed your code did not include SHOWDIALOG# 1:

Hope this helps

Brent


OPENW #1
DIALOG #1,70,5,300,200,"MyDialog" ,$4000002
  CONTROL "O.K.",IDOK,"button",$10010001,20,120,64,32
  CONTROL "Abbrechen",IDCANCEL,"button",$10010000,170,120,74,30
ENDDIALOG
SHOWDIALOG# 1  // you need this statement
  

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Nov 06 23:14:25 1998
Return-Path: <EMMINT02@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zbWvc-00MLMoC>; Thu, 5 Nov 1998 22:26:52 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id WAA04652;
	Thu, 5 Nov 1998 22:04:02 +0100
From: EMMINT02@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3642231D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 5 Nov 1998 16:02:36 EST
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: Windows AOL sub 66
Subject: Re: [GFA] last modifying-date of a file
X-UIDL: 3c8542bcc1b6622b50d808b529bc5a4a

In einer eMail vom 05.11.98 16:41:34 MEZ, schreiben Sie:

<< 
 From:	vph-bensberg@t-online.de (Thomas Gonschor) >>
hi
i try to give you an idea. Try to modify "get date$"  as a second line comand
or read out the special sector of the storrage media with special commands.
is it possible to enter in a supervisor-modus, like 68040 operation-
systems(digital)
permit?
The safest way is to find and read out the specific sector and cluster of a
storrage
media. Check your GFA to do this.
bye

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Nov 06 23:14:27 1998
Return-Path: <GertKorn@csi.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zbXms-00MM7xC>; Thu, 5 Nov 1998 23:21:54 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id XAA05703;
	Thu, 5 Nov 1998 23:07:18 +0100
From: "Gert Korn" <GertKorn@csi.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <364231E3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Sender: GertKorn@csi.com
Date: Thu, 5 Nov 1998 23:05:00 +0100
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] 32 Bit GFA Basic
X-UIDL: a900ae489bff113914da483d593ab763

------=_NextPart_000_0004_01BE0910.B7216B60
Content-Type: text/plain;
	charset="iso-8859-1"


Hallo  

From ???@??? Fri Nov 06 23:14:32 1998
Return-Path: <EMMINT02@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zbYoI-00MMhrC>; Fri, 6 Nov 1998 00:27:26 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id AAA06347;
	Fri, 6 Nov 1998 00:12:16 +0100
From: EMMINT02@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3642410D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 5 Nov 1998 18:11:34 EST
Mime-Version: 1.0
Content-type: text/plain; charset=ISO-8859-1

X-Mailer: Windows AOL sub 66
Subject: Re: [GFA] 32 Bit GFA Basic
X-UIDL: 3c38a296ea7c757bb8aaba3275a68779

hi
kenne die gfa-problematik.
versuchs mal bei prof. bruhns, TH Darmstadt, Bereich Mathematik.
Der hat immer seine eigenen gfa-erweiterungen gestrickt.
tsch...


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Nov 06 23:14:38 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zbsGM-00MM5wC>; Fri, 6 Nov 1998 21:13:42 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id UAA15555;
	Fri, 6 Nov 1998 20:24:09 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36435DBE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 6 Nov 1998 14:22:36 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] More CTL3D problems
X-UIDL: 57057650f64fda489fa374fe574c8258

// 11/6/98  B. Deck
// Here's another bug in DLG 3D
//
//  If you scroll down and then upward in the edit window, a line from the
top of
//  the window is blitted into the text area with each scroll.
//
// 1) Does this occur on all verions of WIN and CTL3D.DLL, CTL3D1.DLL?
// 2) Is there a solution?
// 3) Is there a way to set the initial scroll position?
//

DLG 3D ON

initdialog()                  // build dialog

~SetFocus(DLGITEM(1,103))    // activate edit window

DO
  SLEEP                      // wait for message
UNTIL MOUSEK & 2            // until left mouse key
CLOSEDIALOG #1               // remove dialog
DLG 3D OFF

PROCEDURE initdialog()        // build dialog
  LOCAL i%,a%
  DLGBASE PIXEL               // dialog measurements   in pixels
  DIALOG #1,10,100,600,360,"Demo Dialog",DS_MODALFRAME

    '   DLGBASE UNIT   // Rest in UNITS (1/4 character
    // wide, 1/8  character high)
    // Type          Titel/Contents  Id   x   y   w   h   style

    // Note ES_WANTRETURN =&h1000  uses  return key in edit field
    EDITTEXT      "", 103, 15, 15, 560, 300, &h1000 | ES_MULTILINE |
WS_VSCROLL
    
  ENDDIALOG


  // Init Text
  s% = WM_SETTEXT
  s$ = " This is a test "  + CHR$(13) + CHR$(10)

  FOR x = 1 TO 100
    t$ =  t$ + STR$(x) + s$
  NEXT x
  t$ = t$ + CHR$(0)

  ~SendMessage(DLGITEM(1,103),s%,0,V:t$)

  // ~SetScrollRange(DLGITEM(1,103),SB_VERT,0,200,1)
  //  ~SetScrollPos(DLGITEM(1,103),SB_VERT,100,1)

  SHOWDIALOG #1
RETURN



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Nov 06 23:14:40 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zbtCF-00MORUC>; Fri, 6 Nov 1998 22:13:31 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id VAA16321;
	Fri, 6 Nov 1998 21:44:06 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36436FDA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 6 Nov 1998 15:37:48 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] CTL3D.DLL problem solved
X-UIDL: 5e810e26037831333edbb7ac978e2d08

//  11/6/98  B. Deck
//  Here's the solution to the scrolling problem in DLG 3D
//
//  If you scroll down and then upward in a scrollable edit window with DLG
3D ON,
//  a line from the top of the window is blitted into the text area with
each scroll.
//
//  Setting the dialog style to WS_CLIPCHILDREN prevents the bug.
//
//

DLG 3D ON

initdialog()                  // build dialog

~SetFocus(DLGITEM(1,103))    // activate edit window

DO
  SLEEP                      // wait for message
UNTIL MOUSEK & 2            // until left mouse key
CLOSEDIALOG #1               // remove dialog
DLG 3D OFF

PROCEDURE initdialog()        // build dialog
  LOCAL i%,a%
  DLGBASE PIXEL               // dialog measurements   in pixels
  DIALOG #1,10,100,600,360,"Demo Dialog",DS_MODALFRAME | WS_CLIPCHILDREN

    '   DLGBASE UNIT   // Rest in UNITS (1/4 character
    // wide, 1/8  character high)
    // Type          Titel/Contents  Id   x   y   w   h   style
    // Note ES_WANTRETURN =&h1000

    EDITTEXT      "", 103, 15, 15, 560, 300, &h1000 | ES_MULTILINE |
WS_VSCROLL

    '    SCROLLBAR     "",             104,  1,152,335,  9, SBS_HORZ
    '   SCROLLBAR     "",             105,326,  2,  10,145, SBS_VERT
  ENDDIALOG


  // Init Scrollbars
  s% = WM_SETTEXT
  s$ = " This is a test "  + CHR$(13) + CHR$(10)

  FOR x = 1 TO 100
    t$ =  t$ + STR$(x) + s$
  NEXT x
  t$ = t$ + CHR$(0)

  ~SendMessage(DLGITEM(1,103),s%,0,V:t$)

  // ~SetScrollRange(DLGITEM(1,103),SB_VERT,0,200,1)
  //  ~SetScrollPos(DLGITEM(1,103),SB_VERT,100,1)

  SHOWDIALOG #1
RETURN



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Nov 10 00:01:48 1998
Return-Path: <jaln@sprintmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zcddv-00MM7UC>; Sun, 8 Nov 1998 23:49:11 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id XAA02720;
	Sun, 8 Nov 1998 23:18:32 +0100
From: jerry allen <jaln@sprintmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36462992.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 08 Nov 1998 14:16:50 -0800
X-Mailer: Mozilla 4.05 [en] (WinNT; U)
MIME-Version: 1.0
References: <3518209C.BeroList-2.5.6@linux.net.eu.org> <3519220E.BeroList-2.5.6@linux.net.eu.org>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] N/A
X-UIDL: b47cb2d7c37f665a05a041322714d55d

Was in this morning early for a couple of hours.
Left to run some errands and was going to go back but decided to work at home
instead.
Sent Sarkis the repair for his fuck up, but it didn't go thru because
flash.net limits his file size for attachments. He'll be calling Monday. I
don't know why I even bother sometimes.
I'll see you tomorrow.
-j


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Nov 10 00:01:53 1998
Return-Path: <dave.williams@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zcmpA-00MM3tC>; Mon, 9 Nov 1998 09:37:24 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id JAA05574;
	Mon, 9 Nov 1998 09:23:33 +0100
From: "Dave Williams" <dave.williams@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3646B6C6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 9 Nov 1998 08:22:20 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] REMOVE
X-UIDL: ae1b0bc83cde9f6dd3156d1080853c34

REMOVE


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Nov 10 00:01:54 1998
Return-Path: <dave.williams@gemworks.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zcmwp-00MM7AC>; Mon, 9 Nov 1998 09:45:19 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id JAA05573;
	Mon, 9 Nov 1998 09:23:33 +0100
From: "Dave Williams" <dave.williams@gemworks.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3646B6C6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 9 Nov 1998 08:21:28 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] N/A
X-UIDL: dcc193121a0846576d34451045b730a9

No need for these sort of messages on here !!!!!!


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Nov 10 00:01:55 1998
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zcnJC-00MM3PC>; Mon, 9 Nov 1998 10:08:26 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id JAA05862;
	Mon, 9 Nov 1998 09:53:37 +0100
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3646BDC0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
  (SMTPD32-4.06) id AC8A213A0226; Mon, 09 Nov 1998 09:49:14 +0200
Date: Mon, 9 Nov 1998 09:28:14 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] BasiCpp
X-UIDL: cd51e84dd11cdcf0b5151f1c6bf13f1c

To all interested in BasiCpp

I quickly created a homepage with some preliminary information

http://home.gelrevision.nl/~shamstra/index.htm

Sjouke Hamstra

Regards,
Sjouke Hamstra
GFA-related homepage: http://www.gfa.net/home/shamstra



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Nov 10 00:01:56 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zcoNH-00MM7NC>; Mon, 9 Nov 1998 11:16:43 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id KAA06347;
	Mon, 9 Nov 1998 10:58:33 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3646CD02.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 9 Nov 1998 09:06:31 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Preise ...

X-MIME-Autoconverted: from 8bit to quoted-printable by shodan.in-trier.de id KAA06347
X-UIDL: b5b36c54fb3ffc2aecf8d5de26f359de

Hallo Markus!

Die Geschichte mit dem Preis fr die 8 GB-Platte hat mir ja keine Ruhe
gelassen, daher nun folgendes (die Preise, die ich Dir hier nenne sind
allerdings nicht so reprsentativ, da sie sich auch wchentlich ndern,
allerings fllt eine 8 GB nicht innerhalb einer Woche um die Hlfte!):

- Eine 6,4 GB IDE-Platte von IBM kostet ca. 500,00 ist aber auch nicht so
toll.
- Eine 6,4 GB SCSI-Platte von Quantum kostet bereits ca. 850,00, ist aber
auch nicht so toll.
- Eine 4,3 GB IDE-Platte von Seagte kostet ca. 380,00 ist aber auch eine
sehr zuverlssige und unproblematische Platte.
- Eine 8,4 GB SCSI-Platte von Quantum kostet bereits ca. 1100,00 DM ist aber
leider von Quantum.
- Eine vergleichebare Platte von Seagate mit 9,1 GB kostet ca. 1500,00.

Ich denke daher, da DM 180,00 fr eine 2,2 GB SCSI-II Platte von Seagate
nicht zu teuer ist! Davon mal abgesehen kostet eine SCSI-Platte von dieser
Kapazitt neu immer noch ca. 350,00 - 400,00 DM, je nach Hersteller.

Was den Speicher angeht, so halte ich den Preis von DM 30,00 fr einen Chip
nicht fr einen Kracher, jedoch fr okay! Der Ladenpreis liegt derzeit bei
ca. 35 bis 40 DM, wobei die Preise derzeit wieder steigen!

Also - alles in allem hast Du recht gute Preise bekommen!

BTW: Heute morgen konnte ich mich nicht mehr bewegen. So wie es aussieht
habe ich mir den Rcken durchgebogen, den Brustkorb gestaucht, beide Bizeps
blau gehauen, Muskelkater in Armen, Beinen Rcken, Bauch, Schultern und am
Po, ich war also recht erfolgreich.

Melde Dich mal wieder,
Gre an Dich und Verena
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Nov 10 00:01:57 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zcodA-00MOF1C>; Mon, 9 Nov 1998 11:33:08 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id LAA06417;
	Mon, 9 Nov 1998 11:08:34 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3646CF4E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 9 Nov 1998 08:46:44 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36435DBE.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] More CTL3D problems
X-UIDL: 28f52549f5019104b49ef04404d1896c

Hi!

As far as  know it is recommended to use the CTRL3D1.DLL. The problem is,
that there are comming to many versions of CTL3D.DLL with other programs and
many of them do not work togehter with GFA. The best way is to use the DLL
which comes with GFA-Basic.

Thomas



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Nov 10 00:02:02 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zczRh-00MNoaC>; Mon, 9 Nov 1998 23:06:01 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id WAA13453;
	Mon, 9 Nov 1998 22:43:33 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36477254.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 9 Nov 1998 16:38:23 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] More CTL3D problems
X-UIDL: b89dc6c2daf668d342546844e85a2c91

>> As far as  know it is recommended to use the CTRL3D1.DLL. <<

I have the following DLLs with Microsoft copyright and version info
embedded :

CTL3D.DLL       File version 2.31
CTL3D1.DLL     File version 1.13
CTL3DV2.DLL   File version 2.31
( also CTL3D32.DLL )

Does anyone know the difference between these files?

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:14 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zd277-00MNp6C>; Tue, 10 Nov 1998 01:56:57 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id BAA14613;
	Tue, 10 Nov 1998 01:38:34 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36479BAC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981110003445.LPWR1351@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 10 Nov 1998 00:34:45 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 10 Nov 1998 00:34:45 +0000
Subject: Re: AW: [GFA] More CTL3D problems
X-UIDL: 66c8a45f5e61e5fa16c8e9223044cf2e

Brent
Each is the same, but different.  Make sense?  It's a progression that you
can see from the beginning (the original ctl3d.dll) through the end.  It
seems tho, that software written during the reign of each is limited to
making use of that one version.  None seems to be capable of using any of
the other versions.  I have 4 or 5 versions, but NOT ctl3d1.dll.  So far,
nothing refuses to run properly.  This series furnishes the 3D effects for
dialogs & controls.

I have a package from MS that has several different items in it including
a helpfile & a lib that can be included during compile to make it an
integral part of an *.exe.  I'll send if you want it.  It also contains
at least one *.exe that is run when you load your program, then run again 
unload it, giving your program on/off control.

I could obtain all the various versions & run a scan on them to see just what
the differences are, I suppose.  If a needed version is out of the ordinary, 
it is usually included in the install pkg with the software.
<G>
TomR.



At 04:38 PM 09/11/98 -0500, you wrote:
>>> As far as  know it is recommended to use the CTRL3D1.DLL. <<
>
>I have the following DLLs with Microsoft copyright and version info
>embedded :
>
>CTL3D.DLL       File version 2.31
>CTL3D1.DLL     File version 1.13
>CTL3DV2.DLL   File version 2.31
>( also CTL3D32.DLL )
>
>Does anyone know the difference between these files?
>
>Brent
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:19 1998
Return-Path: <wilkins@niagara.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zd3tb-00MNp6C>; Tue, 10 Nov 1998 03:51:07 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id DAA15298;
	Tue, 10 Nov 1998 03:43:40 +0100
From: Tom <wilkins@niagara.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3647B8D8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 09 Nov 1998 21:32:18 -0500
X-Mailer: Mozilla 4.07 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] Help needed with simple dialog boxes
X-UIDL: edc0d6c7ad5f359dfaef55ae49bbac93

I would really appreciate it if someone could help me with the following
dialog box.

I can type in an example program from the GFA manual, and make a dialog
box in the rcs editor with their specs and it works fine.

But I have been trying to make my own for a simple hockey game entry
program and I can't get sendmessage to fill in a combobox.

As far as I can see, I'm doing everything in the manual, but nothing
appears in the combo box. Also - no errors generated. Any help would be
appreciated. I'm using GFA for Windows 4.20.

Thanks for any help I can get and sorry if this is a dumb question. I've
been getting a real headache over this 

Here's my code:

make_dialog()
ON MENU MESSAGE GOSUB eval_message()
DO
  SLEEP
LOOP
PROCEDURE make_dialog()
  dlg_list()
  REM DLG BOX 0,"hockey.gfr" (for this example I .lst'ed the dialog box
below)
  DLG FILL 0,RGB(192,192,192)
  home_id&=DLGITEM(0,105)
  hometeamid&=DLGITEM(0,107)
  reporteam2&=DLGITEM(0,113)
  reporteam&=DLGITEM(0,112)
  button1&=DLGITEM(0,118)
  home1$="The Hawks"
  home2$="The Buns"
  answer$=_WIN$(DLGITEM(0,113))
  ~SendMessage(DLGITEM(0,105),CB_ADDSTRING,0,"The Hawks")
  ~SendMessage(DLGITEM(0,105),CB_ADDSTRING,0,"The Bulls")
  SHOWDIALOG #0
RETURN

PROCEDURE eval_message()
  SELECT MENU(6)
  CASE 119
    CLOSEDIALOG #0
    END
  CASE 118
    answer$=_WIN$(reporteam&)
    _WIN$(reporteam2&)=answer$
  ENDSELECT

RETURN

PROCEDURE dlg_list()
  //DLG BOX  0,"C:\WINDOWS\GFAWIN\HOCKEY.GFR"
  DIALOG #0,75,6,440,273,"GFA Basic",$10000000
    CONTROL "Minor Hockey Database",100,"static",$10000001,80,0,260,20
    CONTROL "",101,"edit",$10800000,285,25,50,20
    CONTROL "Date",102,"static",$10000002,245,25,35,15
    CONTROL "League",103,"static",$10000002,10,20,60,20
    CONTROL "",105,"combobox",$210102,85,50,245,20
    CONTROL "Home Team",106,"static",$1000000b,5,55,80,20
    CONTROL "",107,"combobox",$210102,85,80,245,25
    CONTROL "Score",108,"static",$1000000b,350,25,45,20
    CONTROL "Visitors",109,"static",$10000002,30,75,50,20
    CONTROL "",110,"edit",$10800000,350,50,40,25
    CONTROL "",111,"edit",$10800000,350,75,40,25
    CONTROL "",112,"edit",$10a00004,85,110,250,50
    CONTROL "",113,"edit",$10a00004,85,165,250,55
    CONTROL "Home",114,"static",$1000000b,40,110,40,20
    CONTROL "Comments",115,"static",$1000000b,15,130,64,20
    CONTROL "Frame",116,"static",$1000000b,35,165,45,15
    CONTROL "Comments",117,"static",$1000000b,5,180,70,20
    CONTROL "Add Game",118,"button",$10000001,345,160,80,25
    CONTROL "Cancel",119,"button",$10000000,345,190,80,25
    CONTROL "",120,"combobox",$2,75,20,160,25
  ENDDIALOG
  SHOWDIALOG #0
RETURN

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:21 1998
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zd7jj-00MM5FC>; Tue, 10 Nov 1998 07:57:11 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id HAA16427;
	Tue, 10 Nov 1998 07:43:35 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3647F0CE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 10 Nov 1998 07:42:27 +0100
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Help needed with simple dialog boxes
X-UIDL: 9cf3215e4a864796e24cea1e96d144e3

You did it - nearly - right 

change the height value, and you will see something...

>    CONTROL "",105,"combobox",$210102,85,50,245,80  /// !!!

by the way, you are dping SHOWDIALOG twice !

- Michael

>----------
>Von: 	Tom[SMTP:wilkins@niagara.com]
>Gesendet: 	Dienstag, 10. November 1998 03:32
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] Help needed with simple dialog boxes
>
>I would really appreciate it if someone could help me with the following
>dialog box.
>
>I can type in an example program from the GFA manual, and make a dialog
>box in the rcs editor with their specs and it works fine.
>
>But I have been trying to make my own for a simple hockey game entry
>program and I can't get sendmessage to fill in a combobox.
>
>As far as I can see, I'm doing everything in the manual, but nothing
>appears in the combo box. Also - no errors generated. Any help would be
>appreciated. I'm using GFA for Windows 4.20.
>
>Thanks for any help I can get and sorry if this is a dumb question. I've
>been getting a real headache over this 
>
>Here's my code:
>
>make_dialog()
>ON MENU MESSAGE GOSUB eval_message()
>DO
>  SLEEP
>LOOP
>PROCEDURE make_dialog()
>  dlg_list()
>  REM DLG BOX 0,"hockey.gfr" (for this example I .lst'ed the dialog box
>below)
>  DLG FILL 0,RGB(192,192,192)
>  home_id&=DLGITEM(0,105)
>  hometeamid&=DLGITEM(0,107)
>  reporteam2&=DLGITEM(0,113)
>  reporteam&=DLGITEM(0,112)
>  button1&=DLGITEM(0,118)
>  home1$="The Hawks"
>  home2$="The Buns"
>  answer$=_WIN$(DLGITEM(0,113))
>  ~SendMessage(DLGITEM(0,105),CB_ADDSTRING,0,"The Hawks")
>  ~SendMessage(DLGITEM(0,105),CB_ADDSTRING,0,"The Bulls")
>  SHOWDIALOG #0
>RETURN
>
>PROCEDURE eval_message()
>  SELECT MENU(6)
>  CASE 119
>    CLOSEDIALOG #0
>    END
>  CASE 118
>    answer$=_WIN$(reporteam&)
>    _WIN$(reporteam2&)=answer$
>  ENDSELECT
>
>RETURN
>
>PROCEDURE dlg_list()
>  //DLG BOX  0,"C:\WINDOWS\GFAWIN\HOCKEY.GFR"
>  DIALOG #0,75,6,440,273,"GFA Basic",$10000000
>    CONTROL "Minor Hockey Database",100,"static",$10000001,80,0,260,20
>    CONTROL "",101,"edit",$10800000,285,25,50,20
>    CONTROL "Date",102,"static",$10000002,245,25,35,15
>    CONTROL "League",103,"static",$10000002,10,20,60,20
>    CONTROL "",105,"combobox",$210102,85,50,245,20
>    CONTROL "Home Team",106,"static",$1000000b,5,55,80,20
>    CONTROL "",107,"combobox",$210102,85,80,245,25
>    CONTROL "Score",108,"static",$1000000b,350,25,45,20
>    CONTROL "Visitors",109,"static",$10000002,30,75,50,20
>    CONTROL "",110,"edit",$10800000,350,50,40,25
>    CONTROL "",111,"edit",$10800000,350,75,40,25
>    CONTROL "",112,"edit",$10a00004,85,110,250,50
>    CONTROL "",113,"edit",$10a00004,85,165,250,55
>    CONTROL "Home",114,"static",$1000000b,40,110,40,20
>    CONTROL "Comments",115,"static",$1000000b,15,130,64,20
>    CONTROL "Frame",116,"static",$1000000b,35,165,45,15
>    CONTROL "Comments",117,"static",$1000000b,5,180,70,20
>    CONTROL "Add Game",118,"button",$10000001,345,160,80,25
>    CONTROL "Cancel",119,"button",$10000000,345,190,80,25
>    CONTROL "",120,"combobox",$2,75,20,160,25
>  ENDDIALOG
>  SHOWDIALOG #0
>RETURN
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:24 1998
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdB6c-00MOfwC>; Tue, 10 Nov 1998 11:33:02 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id LAA17509;
	Tue, 10 Nov 1998 11:03:38 +0100
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36481FC8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 10 Nov 1998 20:59:47 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <36477254.BeroList-2.5.9@aachen.linux.de>
Subject: RE: [GFA] More CTL3D problems
X-UIDL: ad1302ec2fc245bb5fdfe9f01a3fa735

Hi Brent,

The differences are:-

CTL3D.DLL	The original 16 bit version
CTL3DV2.DLL	Bug fix for the original
(There is also CTL3DV25.DLL lurking around)
CTL3D32.DLL	The 32 bit version

Non of the above recognise GFA's DLG 3D ON/OF commands.

CTL3D1.DLL	This is GFA's version, which recognises DLG 3D ON/OF commands.

Hope this helps.

Regards,
Dave Barton
bmcs@ozemail.com.au



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:25 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdDzN-00MPUYC>; Tue, 10 Nov 1998 14:37:45 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id OAA18766;
	Tue, 10 Nov 1998 14:18:37 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36484D63.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981110131758.BISF3718@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 10 Nov 1998 13:17:58 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 10 Nov 1998 13:17:58 +0000
Subject: RE: [GFA] More CTL3D problems
X-UIDL: 652cdd4f6379e4280748209412726331

Dave...
DLG 3D ON/OFF works fine here, but a search for ctl3d1.dll results in a 
no-find... not on C:\ - boot drive or E:\ - GFA-W's drive.  Not to argue,
just to say I don't have it.

I have a ton of ctl3d goodies if you guys want them.  ms_ctl3d.zip (413K)
There's an includable lib, some *.exes, etc.
<G>
TomR.



At 08:59 PM 10/11/98 +1100, you wrote:
>Hi Brent,
>
>The differences are:-
>
>CTL3D.DLL	The original 16 bit version
>CTL3DV2.DLL	Bug fix for the original
>(There is also CTL3DV25.DLL lurking around)
>CTL3D32.DLL	The 32 bit version
>
>Non of the above recognise GFA's DLG 3D ON/OF commands.
>
>CTL3D1.DLL	This is GFA's version, which recognises DLG 3D ON/OF commands.
>
>Hope this helps.
>
>Regards,
>Dave Barton
>bmcs@ozemail.com.au
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:26 1998
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdG1N-00MPrlC>; Tue, 10 Nov 1998 16:47:57 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id QAA19650;
	Tue, 10 Nov 1998 16:18:41 +0100
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36486991.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
          by mb06.swip.net (8.8.8/8.8.8) with ESMTP 
          id QAA14895 for <gfabasic@aachen.linux.de>; 
          Tue, 10 Nov 1998 16:13:44 +0100 (MET)
Date: Tue, 10 Nov 1998 16:12:47 +0100
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Subject: [GFA] Vertical text
X-UIDL: 7e7a8e643e24a7e163837b1d0c773785

Hello all,
In GFA-Basic for Atari ST there was a command DEFTEXT. 
It could be used  to get vertical text on the screen.

Please tell me how to do the same in GFA-Basic for PC.

Sven Kumlin

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:27 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdJQU-00MQ6jC>; Tue, 10 Nov 1998 20:26:06 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id TAA21540;
	Tue, 10 Nov 1998 19:53:37 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36489BF4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 10 Nov 1998 08:42:42 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <3647B8D8.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Help needed with simple dialog boxes
X-UIDL: 181a0f02ec7c90acd9697e3e70149ec7

Hi Tom!

I' am not sure, but I believe that there are existing problems in using zero
for a dialog number ...

Kind regards
Thomas




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:29 1998
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdMcN-00MOfdC>; Tue, 10 Nov 1998 23:50:35 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id XAA24145;
	Tue, 10 Nov 1998 23:38:40 +0100
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3648D0CB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 11 Nov 1998 09:35:38 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <36484D63.BeroList-2.5.9@aachen.linux.de>
Subject: RE: [GFA] More CTL3D problems
X-UIDL: 2a522c22a3b8b04b8f862022294c208c

Hi Tom,

>> DLG 3D ON/OFF works fine here, but a search for ctl3d1.dll results in a
no-find... not on C:\ - boot drive or E:\ - GFA-W's drive.  Not to argue, just
to say I don't have it. <<
You must be running Win 32 (of one flavour, or another), which responds
correctly to DLG 3D ON/OFF system calls and does not require ctl3d1.dll. The
ctl3d1.dll was shipped as part of the GFW package from versions 4.31 to 4.38.
Running Win 16 the commands DLG 3D ON/OFF have no affect without this specific
DLL.
>> I have a ton of ctl3d goodies if you guys want them.  ms_ctl3d.zip (413K)
There's an includable lib, some *.exes, etc. <<

Yes please, I would be interested in the ctl3d goodies you are offering.

Best Regards,
Dave Barton
bmcs@ozemail.com.au


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:30 1998
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdMgA-00MPrhC>; Tue, 10 Nov 1998 23:54:30 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id XAA24151;
	Tue, 10 Nov 1998 23:39:29 +0100
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3648D0D0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 11 Nov 1998 09:35:42 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <36489BF4.BeroList-2.5.9@aachen.linux.de>
Subject: RE: [GFA] Help needed with simple dialog boxes
X-UIDL: 42658af42320c5bd986d60442f0df2a5

Hi Thomas,

>> I' am not sure, but I believe that there are existing problems in using zero
for a dialog number ... <<

I have used zero dialog number in many programs and never had any problems.
This is the first time I have heard anyone raise this as problem.

Best Regards,
Dave Barton
bmcs@ozemail.com.au



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:31 1998
Return-Path: <0592135705@nwn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdMhl-00MM5rC>; Tue, 10 Nov 1998 23:56:09 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id XAA24143;
	Tue, 10 Nov 1998 23:38:39 +0100
From: "Karl-Heinz Groene" <0592135705@nwn.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3648D0CB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 10 Nov 1998 23:34:25 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] need to know why
X-UIDL: 9171db6f08a686ac9649ab14319eee06

Hallo to all,
the following code is only to discribe what I found out during my
unsuccessfully tryings to
speed up different animation-subroutines in  my older programs.

//  only good to show what is going on
//  (by Kalle Groene) Nov. 98
'---------------------------------------------------------------------------
------------------------------------
w& = GetDesktopWindow()
d& = GetDC(w&)
dco& = _DC()
SETDC d&
GET 0,0,_X,_Y,bmp&   // catch the screen
~ReleaseDC(w&,d&)
SETDC dco&
FULLW #1
DO
  t=TIMER
  FOR i = 0 TO _X STEP 2
    STRETCH 0,0,bmp& ,i,i*.75
    PEEKEVENT
    IF MENU(1)=4
      FREEBMP bmp&
      CLOSEW #1
      END
    ENDIF
  NEXT i
  FOR i = _X TO 0 STEP -2
    STRETCH 0,0,bmp& ,i,i*.75
    PEEKEVENT
    IF MENU(1)=4
      FREEBMP bmp&
      CLOSEW #1
      END
    ENDIF
  NEXT i
  erg$="Time to switch : "+"  "+STR$(TIMER-t)+" "+" millisec"
  TITLEW #1,erg$
LOOP
END
'---------------------

When start this short routine ( GFA-Basic 4.32 / WIN 98/Pentium
400/800x600/32); it doesn't matter which resolution or colordepth; it's
rather slowly !!!
Then I start a small Programm called "Tunnel D3D-Example"
(Copyright(c)1995,1996 Microsoft Corp.).
And now the speed of the above 'screen-switching-code' is more then 20 times
faster !!!!!!!
When closing the tunnel programm the speed ist increasing to 25 X speed of
the origin
speed of this routine.  -

Who can explain me what is going on there????

And is there a way  to get this full speed direct in GFA-Basic ??

Regards,

 Kalle Groene    0592135705@NWN.de





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:51 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdR9t-00MPU7C>; Wed, 11 Nov 1998 04:41:29 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id EAA25829;
	Wed, 11 Nov 1998 04:33:41 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36491621.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.03 118 118 102) with SMTP
          id <19981111033109.CKRR9813@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 11 Nov 1998 03:31:09 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 11 Nov 1998 03:31:09 +0000
Subject: RE: [GFA] More CTL3D problems
X-UIDL: 1814f380339da7e514ad38c6c127308c

Suffered a HD crash recently, so maybe *had* it.  Am running W95 v 4.00.950.
Will send the 3d pkt directly to you... is 413K.
<G>
TomR.



At 09:35 AM 11/11/98 +1100, you wrote:
>Hi Tom,
>
>>> DLG 3D ON/OFF works fine here, but a search for ctl3d1.dll results in a
>no-find... not on C:\ - boot drive or E:\ - GFA-W's drive.  Not to argue, just
>to say I don't have it. <<
>You must be running Win 32 (of one flavour, or another), which responds
>correctly to DLG 3D ON/OFF system calls and does not require ctl3d1.dll. The
>ctl3d1.dll was shipped as part of the GFW package from versions 4.31 to 4.38.
>Running Win 16 the commands DLG 3D ON/OFF have no affect without this specific
>DLL.
>>> I have a ton of ctl3d goodies if you guys want them.  ms_ctl3d.zip (413K)
>There's an includable lib, some *.exes, etc. <<
>
>Yes please, I would be interested in the ctl3d goodies you are offering.
>
>Best Regards,
>Dave Barton
>bmcs@ozemail.com.au
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:06:58 1998
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zdXzs-00MQTgC>; Wed, 11 Nov 1998 11:59:36 +0100 (MET)
Received: from shodan.in-trier.de([198.22.51.3]) (1750 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <BrentDeck@compuserve.com>) 
	id <m0zdXzS-000CDyC@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Wed, 11 Nov 1998 11:59:10 +0100 (MET)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id LAA28038;
	Wed, 11 Nov 1998 11:23:44 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <364975F5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 11 Nov 1998 05:20:48 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Vertical text
X-UIDL: bfa2711e2af3d541a82c71b218c53674

You need to set escapement to 900 for 90 degree text.


  // More notes on FONT

  // if FONT is used more than once in a program, you should replace any
parameters
  // that might have been set. FONT apparently  defaults to the last values
used in any previous
  //  FONT statement. For reliability it is best to specify the exact font 
name$ 
  //  ("courier", "modern","system", etc) to avoid an accidental default to
another font.
  // Note than the syntax FONT name$ is undocumented.

// use all these lines to fill up the FONT data structure

  FONT "courier"
  FONT FAMILY 48,CHARSET 0
  FONT HEIGHT 20, WIDTH 14,WEIGHT 100,ESCAPEMENT 0,PITCH 1,ORIENTATION 0
  FONT QUALITY 0 ,CLIPPRECISION 0,  OUTPRECISION 0
  FONT ITALIC 0,STRIKEOUT 0,UNDERLINE 0
  FONT  TO fnt0&

  ~SendMessage(whandle&,WM_SETFONT,fnt0&,0)


// BD 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Nov 11 18:07:22 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from shodan.in-trier.de (198.22.51.3) with esmtp
	  id <m0zdatS-00MQHMC>; Wed, 11 Nov 1998 15:05:10 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by shodan.in-trier.de (8.8.8/8.8.8) with SMTP id OAA30161;
	Wed, 11 Nov 1998 14:28:44 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3649A152.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 11 Nov 1998 08:23:38 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <3648D0D0.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Help needed with simple dialog boxes
X-UIDL: d6b3ba844c95d9d06ac9556496d0ce2a

Hi Dave!

> I have used zero dialog number in many programs and never had
> any problems. This is the first time I have heard anyone raise this as
> problem.

I believe that there are problems in using the zero for windows and dialogs.
Ich have had problems in using the zero together with "real" windows, but I
have not used the zero for dialogs. Maybe I remembered something wrong ...

So if I've been wrong I'am sorry!

Regards
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Dec 05 01:04:47 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from proxy.in-trier.de (198.22.51.5) with esmtp
	  id <m0zliaL-00MqecC>; Fri, 4 Dec 1998 00:55:01 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by proxy.in-trier.de (8.8.8/8.8.8) with SMTP id AAA22963;
	Fri, 4 Dec 1998 00:52:57 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3667339D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 3 Dec 1998 13:10:07 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] thanks
X-UIDL: be93f6053f1964f96d19faa66d43b3cb

	I would  like to express my deep appreciation to  GFA Systemtechnik GmbH
for their assistance in making this file available in numerous places on the
World Wide Web. The GFAWHELP file now has its own web page on the GFA.NET
hosting service.  Without the cooperation of GFA  this file would never have
obtained the wide distribution that it has reached. Also, thanks to Sven
Thomas of GFA who has been helpful in so many ways. Especially for his help
in getting me started on GFA.NET.

Thanks GFA and Sven Thomas

 Dale Bryant


Routines Collected and Compiled By Dale Bryant
http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Dec 05 01:05:13 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from proxy.in-trier.de (198.22.51.5) with esmtp
	  id <m0zlyCi-00N4MRC>; Fri, 4 Dec 1998 17:35:40 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by proxy.in-trier.de (8.8.8/8.8.8) with SMTP id RAA23177;
	Fri, 4 Dec 1998 17:18:02 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36681A73.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 4 Dec 1998 11:11:24 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] MS Controls!!!
X-UIDL: 30eafef9ba1919fca77bc82bf84f6dab

Hi,

Has anyone managed to get the MS ToolBar control working?

The routine below should do the trick, but perhaps I've made an error. Or
two!

The code is a translation from an MS example. 

John

// No postfix for vars
DEFDBL "f"                      ' 64 bit, float
DEFINT "l"                      ' 32 bit, long
DEFWRD "h,n,w,x,y"              ' 16 bit, word
DEFBYT "ID"                     '  8 bit, byte
DEFSTR "z"                      '  8 bit, arrays [chars/strings]
DEFBIT "b"                      '  1 bit, bool

FUNCTION  MakeToolBar(hWndParent)

  ' DLL #2,"commctrl"
  '   DECL BOOL  InitCommonControls()
  ' ENDDLL
  ' ~^InitCommonControls()

  TYPE TBBUTTON:
  - WORD  iBitmap
  - WORD  idCommand
  - BYTE  fsState
  - BYTE  fsStyle
  - DWORD dwData
  - WORD  iString
  ENDTYPE

  lTBSTYLE_TOOLTIPS    = $00000100
  lCCS_ADJUSTABLE      = $00000020
  ID_TOOLBAR           = 7
  lTB_BUTTONSTRUCTSIZE = WM_USER + 30
  lTB_ADDBITMAP        = WM_USER + 19
  lTB_ADDSTRING        = WM_USER + 28
  lTB_ADDBUTTONS       = WM_USER + 20
  lTB_SETBITMAPSIZE    = WM_USER + 32
  lTB_AUTOSIZE         = WM_USER + 33
  lTBSTATE_ENABLED     = $04
  lTBSTYLE_BUTTON      = $00

  numButtons           = 7

  DIM iTBB(LEN(TBBUTTON:) * numButtons)

  // Create a toolbar that the user can customize and that has a
  // tooltip associated with it.

  lhWndToolBar = CreateWindowEx(0,"ToolbarWindow", NULL, WS_CHILD |
lTBSTYLE_TOOLTIPS | lCCS_ADJUSTABLE, 0, 0, 0, 0, hWndParent, ID_TOOLBAR,
_INSTANCE, NULL)

  // Send the TB_BUTTONSTRUCTSIZE message, which is required for
  // backward compatibility.

  ~SendMessage(lhWndToolBar, lTB_BUTTONSTRUCTSIZE, LEN(TBBUTTON:), 0)
  ~SendMessage(lhWndToolBar, lTB_SETBITMAPSIZE, 0, MAKELONG(24, 24))
  '
  ' A TBADDBITMAP structure that contains the identifier of a bitmap
resource
  ' and the handle to the module instance with the executable file or dll
that
  ' contains the bitmap resource.

  TYPE TBADDBITMAP:
  - WORD  hInst
  - WORD  nID
  ENDTYPE
  TBADDBITMAP: tbab.

  tbab.hInst = hInstDll // Instance handle that contains the BMP
  tbab.nID   = 1        // Resource number of BMP

  // Add the bitmap containing button images to the toolbar.
  ~SendMessage(lhWndToolBar, lTB_ADDBITMAP, numButtons, *tbab.)

  // Add the button strings to the toolbar.

  zBuf=STRING$(20, CHR$(0))

  ~LoadString(hInstDll, 1, V:zBuf, 7)
  nNew = SendMessage(lhWndToolBar, lTB_ADDSTRING, 0, V:zBuf)
  ~LoadString(hInstDll, 2, V:zBuf, 7)
  nOpen = SendMessage(lhWndToolBar, lTB_ADDSTRING, 0, V:zBuf)
  ~LoadString(hInstDll, 3, V:zBuf, 7)
  nSave = SendMessage(lhWndToolBar, lTB_ADDSTRING, 0, V:zBuf)
  ~LoadString(hInstDll, 4, V:zBuf, 7)
  nPrint = SendMessage(lhWndToolBar, lTB_ADDSTRING, 0, V:zBuf)
  ~LoadString(hInstDll, 5, V:zBuf, 7)
  nCut = SendMessage(lhWndToolBar, lTB_ADDSTRING, 0, V:zBuf)
  ~LoadString(hInstDll, 6, V:zBuf, 7)
  nCopy = SendMessage(lhWndToolBar, lTB_ADDSTRING, 0, V:zBuf)
  ~LoadString(hInstDll, 7, V:zBuf, 7)
  nPaste = SendMessage(lhWndToolBar, lTB_ADDSTRING, 0, V:zBuf)

  ~SendMessage(lhWndToolBar, lTB_AUTOSIZE, 0, 0)

  // Fill the TBBUTTON array with button information, and add the
  // buttons to the toolbar.

  iBMP_NEW = 0, iBMP_OPEN = 1, iBMP_SAVE = 2, iBMP_PRINT = 3
  iBMP_CUT = 4, iBMP_COPY = 5,  iBMP_PASTE = 6

  IDM_NEW = 20, IDM_OPEN  = 21, IDM_SAVE  = 22, IDM_PRINT = 23
  IDM_CUT = 24, IDM_COPY  = 25, IDM_PASTE  = 26

  lpiTBB = V:iTBB(0)
  {lpiTBB}.iBitmap   = iBMP_NEW
  {lpiTBB}.idCommand = IDM_NEW
  {lpiTBB}.fsState   = lTBSTATE_ENABLED
  {lpiTBB}.fsStyle   = lTBSTYLE_BUTTON
  {lpiTBB}.dwData    = 0
  {lpiTBB}.iString   = nNew

  lpiTBB = lpiTBB + LEN(TBBUTTON:)

  {lpiTBB}.iBitmap   = iBMP_OPEN
  {lpiTBB}.idCommand = IDM_OPEN
  {lpiTBB}.fsState   = lTBSTATE_ENABLED
  {lpiTBB}.fsStyle   = lTBSTYLE_BUTTON
  {lpiTBB}.dwData    = 0
  {lpiTBB}.iString   = nOpen

  lpiTBB = lpiTBB + LEN(TBBUTTON:)

  {lpiTBB}.iBitmap   = iBMP_SAVE
  {lpiTBB}.idCommand = IDM_SAVE
  {lpiTBB}.fsState   = lTBSTATE_ENABLED
  {lpiTBB}.fsStyle   = lTBSTYLE_BUTTON
  {lpiTBB}.dwData    = 0
  {lpiTBB}.iString   = nSave

  lpiTBB = lpiTBB + LEN(TBBUTTON:)

  {lpiTBB}.iBitmap   = iBMP_PRINT
  {lpiTBB}.idCommand = IDM_PRINT
  {lpiTBB}.fsState   = lTBSTATE_ENABLED
  {lpiTBB}.fsStyle   = lTBSTYLE_BUTTON
  {lpiTBB}.dwData    = 0
  {lpiTBB}.iString   = nPrint

  lpiTBB = lpiTBB + LEN(TBBUTTON:)

  {lpiTBB}.iBitmap   = iBMP_CUT
  {lpiTBB}.idCommand = IDM_CUT
  {lpiTBB}.fsState   = lTBSTATE_ENABLED
  {lpiTBB}.fsStyle   = lTBSTYLE_BUTTON
  {lpiTBB}.dwData    = 0
  {lpiTBB}.iString   = nCut

  lpiTBB = lpiTBB + LEN(TBBUTTON:)

  {lpiTBB}.iBitmap   = iBMP_COPY
  {lpiTBB}.idCommand = IDM_COPY
  {lpiTBB}.fsState   = lTBSTATE_ENABLED
  {lpiTBB}.fsStyle   = lTBSTYLE_BUTTON
  {lpiTBB}.dwData    = 0
  {lpiTBB}.iString   = nCopy

  lpiTBB = lpiTBB + LEN(TBBUTTON:)

  {lpiTBB}.iBitmap   = iBMP_PASTE
  {lpiTBB}.idCommand = IDM_PASTE
  {lpiTBB}.fsState   = lTBSTATE_ENABLED
  {lpiTBB}.fsStyle   = lTBSTYLE_BUTTON
  {lpiTBB}.dwData    = 0
  {lpiTBB}.iString   = nPaste

  ~SendMessage(lhWndToolBar, lTB_ADDBUTTONS, numButtons, V:iTBB(0))

  ~ShowWindow(lhWndToolBar, SW_SHOW)
  RETURN lhWndToolBar

ENDFUNC

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 06 14:17:06 1998
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from proxy.in-trier.de (198.22.51.5) with esmtp
	  id <m0zmOqe-00Mv9ZC>; Sat, 5 Dec 1998 22:02:40 +0100 (MET)
Received: from aachen.linux.de (nobody@microsoft.sucks.eu.org [198.22.51.242])
	by proxy.in-trier.de (8.8.8/8.8.8) with SMTP id VAA23611;
	Sat, 5 Dec 1998 21:33:09 +0100
From: Eberhard Funck <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3669A7D4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 5 Dec 1998 21:25:11 +0100
Return-Receipt-To: <funck@hildesheim.sgh-net.de>
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] MS Controls!!
X-UIDL: 35a82daefbaffa5f5c0a6c7b5784ed60

Hi

You have done some errors.
You work with the 16 bit commctrl.dll.
TB_ADDBUTTON, TB_ADDBITMAP are only messages,
you can append buttons with bitmaps at a existing toolbar.
TB_BUTTONSTRUCTSIZE is a message for comctl32.dll.
With this *.dll your source code is ok.
But we work unfortunately with GFA Basic.
You must create a toolbar with the CreateToolBar()-function.
Than you can append some buttons with their bitmaps to this toolbar.
The tbbutton structure in your source code is for comctl32.dll.
You must let go - DWORD dwData, than it's ok.

Eberhard

<Has anyone managed to get the MS ToolBar control working?

The routine below should do the trick, but perhaps I've made an error. Or
two!

The code is a translation from an MS example. 

John>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Dec 12 13:10:06 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zoc9H-00Mu7lC>; Sat, 12 Dec 1998 00:39:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA19470; Sat, 12 Dec 1998 00:13:08 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3671B8BA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 11 Dec 1998 15:09:49 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] FORMTEXT
X-UIDL: 50da05efc6079a2f8abedfc4a45a6ecc

If you haven't downloaded FORMTEXT by Roland Walter you are missing a really
great utility.
Get it at:
http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Dec 12 13:10:07 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zoebS-00MkAgC>; Sat, 12 Dec 1998 03:16:18 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA23644; Sat, 12 Dec 1998 02:57:51 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3671DE3A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981212015632.JRDL4946@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 12 Dec 1998 01:56:32 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 12 Dec 1998 01:56:32 +0000
Subject: [GFA] *.bmp help, please
X-UIDL: 5e545803d42dcc5c4f476f042eafd4d2

Has anybody worked out HOW TO SAVE AN 8-BIT *.BMP PROPERLY with GFA-W code?

This is desired WITHOUT COMPRESSION, of course.

All of my attempts run into trouble with a conflict between GFA-W & Windows
over the pallet.  All shades of gray are converted to shades of gold.  All
other colors seem to come out OK.

Please don't refer me to S.Hamstra's book & *.dll - I have them & they suffer
the same problems.  I have spent weeks trying to use these, also.

I simply want an uncompressed 8-bit *.bmp save without resorting to a *.dll
for it.  I don't know how to watch the save & re-convert the gold back to
gray.  It *shouldn't* be necessary.  A 16-bit save is good, but most of the
image editors I have or am familiar with will NOT accept them because they 
do NOT conform with standard *.bmp rules.  For some reason, paint & draw
programs will accept files that image editors will not.  I work with the
image editors, not paint & draw programs.

Thank you
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 13 13:21:20 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zp60F-00MuNFC>; Sun, 13 Dec 1998 08:31:43 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA17238; Sun, 13 Dec 1998 07:58:02 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <367377AF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981213065351.FMLH490@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 13 Dec 1998 06:53:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 13 Dec 1998 06:53:51 +0000
Subject: [GFA] listbox selections - help, please
X-UIDL: 0ca8b992435aef1663f9159270fdfd9c

Having trouble getting a list of all entries in a listbox out to a file by
attempting to modify multilst.lst.  I'd like to "select all".  What I am
getting is the correct number of items, but only the first one... listed 
repeatedly... shows up.

I am trying to avoid having to manually select all or to resort to printing
to the file each time an item is added.  The manual seems to indicate that
what I am trying to do is possible, but....

I would also like to avoid building an array to hold the entries as they are
put into the listbox but this seems to be the only way _I_ can do this.

Help & suggestions welcomed.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 13 13:21:21 1998
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zp97t-00N3q4C>; Sun, 13 Dec 1998 11:51:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA19786; Sun, 13 Dec 1998 11:32:52 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3673A8C0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 13 Dec 1998 10:32:35 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <367377AF.BeroList-2.5.9@aachen.linux.de>
Subject: AW: [GFA] listbox selections - help, please
X-UIDL: a7e6ebfde0ff9459903e7da21c438b1e

I sent you, as personal mail, a listing that handles multiple selected
entries. Just cut what you need.

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 13 23:03:36 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zpAgc-00NIjxC>; Sun, 13 Dec 1998 13:31:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA20913; Sun, 13 Dec 1998 13:12:51 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3673C028.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981213121010.INZR17685@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 13 Dec 1998 12:10:10 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 13 Dec 1998 12:10:10 +0000
Subject: Re: AW: [GFA] listbox selections - help, please
X-UIDL: ebdceceb9702afc291ba14315ea5c0a0

Thnak you, kind sir.
<G>
TomR.


At 10:32 AM 13/12/98 +0100, you wrote:
>I sent you, as personal mail, a listing that handles multiple selected
>entries. Just cut what you need.
>
>Bye, Joe
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 13 23:04:04 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zpJAH-00NJjaC>; Sun, 13 Dec 1998 22:34:57 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA27179; Sun, 13 Dec 1998 22:12:49 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36743EFC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981213211237.MHRZ490@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 13 Dec 1998 21:12:37 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 13 Dec 1998 21:12:37 +0000
Subject: [GFA] title help, please
X-UIDL: 5573ea54f455f6ec1f4409bc3ca15059

_WIN$(DLG(1)) = doesn't change the title of the dialog.  Am I chasing a ghost?

I'd like to place the date & time in the caption bar of a dialog just as I can
in a window.  Left at this, I can... but so far, I cannot get the time to
change as I can with a window caption bar.  Help!  Help!

Thanks
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:52:50 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.cs.tu-berlin.de (130.149.17.13) with esmtp
	  id <m0zpUNg-00NJlFC>; Mon, 14 Dec 1998 10:33:32 +0100 (MET)
Received: from linux01.novocomp.de (root@linux01.novocomp.de [194.120.166.67])
	by mail.cs.tu-berlin.de (8.9.1/8.9.1) with ESMTP id KAA13653
	for <alibaba@zedat.fu-berlin.de>; Mon, 14 Dec 1998 10:30:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA32163; Mon, 14 Dec 1998 05:22:51 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3674A47D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981214041754.EKRH16456@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 14 Dec 1998 04:17:54 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 14 Dec 1998 04:17:54 +0000
Subject: [GFA] bitmaph()
X-UIDL: c71eb387b03afe824157092a362a72cf

Dale... wanna include, you may.
All... am open to improvements.

7 lines are wrapped in the PRINT section by Eudora - sorry.
--------------------------------
'  bmpeftr5.lst  bitmaph()  TomR.
'  Considerable help from Eberhard Funck 'way back when' got me onto
'  the right track w/ this one.  Many thanks, EF!

cx& = GETDEVCAPS(HORZRES)
cy& = GETDEVCAPS(VERTRES)
dv&  = _DRIVE
dr$ = DIR$(0)

TYPE BITMAPFILEHEADER:  /* bmfh */
- WORD    bfType
- DWORD   bfSize
- WORD    bfReserved1
- WORD    bfReserved2
- DWORD   bfOffBits
ENDTYPE
DIM BITMAPFILEHEADER: bmfh.

TYPE BITMAPINFOHEADER:   /* bmih */
- DWORD  biSize
- LONG   biWidth
- LONG   biHeight
- WORD   biPlanes
- WORD   biBitCount
- DWORD  biCompression
- DWORD  biSizeImage
- LONG   biXPelsPerMeter
- LONG   biYPelsPerMeter
- DWORD  biClrUsed
- DWORD  biClrImportant
ENDTYPE
DIM BITMAPINFOHEADER: bmih.

FILESELECT #"Bitmap","*.bmp","",file$
TITLEW #1, "bitmaph(), bitmap file info retrieval."
OPENW #1, 0,0,cx&,cy&,16

OPEN "i", #1, file$
BGET #1, *bmfh., LEN (bmfh.)
BGET #1, *bmih., LEN (bmih.)
CLOSE #1

CHDRIVE dv&
CHDIR dr$

PRINT "  File: ";file$
PRINT "  BitmapFileHeader..."
PRINT "  Bitmap Type: ";MKI$(bmfh.bfType)
PRINT "  Disk File Size: ";bmfh.bfSize;" bytes, or ";
PRINT USING "######.##",bmfh.bfSize / 1024;
PRINT " K"
PRINT "  Offset (bmfh. + bmih.): ";bmfh.bfOffBits;" bytes"
PRINT
PRINT "  BitmapInfoHeader...    Size: ";bmih.biSize;" bytes"
PRINT "  Image Width: ";bmih.biWidth;" pixels"
PRINT "  Image Height: ";bmih.biHeight;" pixels"
PRINT "  Planes: ";bmih.biPlanes
PRINT "  Colordepth: ";bmih.biBitCount;
PRINT "-bit or ";
PRINT USING "###,###,###",2 ^ bmih.biBitCount;
PRINT " colors (the only reliable colors indicator)"
PRINT "  Compression (often set to 0 or not even incoded): ";bmih.biCompression
PRINT "  'bmih.biSizeImage + (bmfh.bfOffBits - bmfh.bfSize) = ...' appears
to be a better indicator !"
PRINT "  If = '0', it's compressed.  If <> '0', it's NOT compressed.  In
*this* case, it's ";
PRINT bmih.biSizeImage + bmfh.bfOffBits - bmfh.bfSize;", so..."
IF bmih.biSizeImage + bmfh.bfOffBits - bmfh.bfSize = 0 THEN
  comp$ = "  This file IS compressed, but by how much?  Rules are still
unclear to me !"
ELSE
  comp$ = "  This file is NOT compressed (perhaps <G> maybe... aw, hell, who
really knows?)."
ENDIF
PRINT comp$
PRINT "  Image Data Size: ";bmih.biSizeImage;" bytes, or ";
PRINT USING "######.##",bmih.biSizeImage / 1024;
PRINT " K"
PRINT "  Horz resolution  (often arbitrarily set to 75 or not even incoded):
";INT(bmih.biXPelsPerMeter / 39.36);" dpi"
PRINT "  Vert resolution  (often arbitrarily set to 75 or not even incoded):
";INT(bmih.biYPelsPerMeter / 39.36);" dpi"
PRINT "  Number of colors  (valid only at 8-bit or less... pallet
dependant): ";bmih.biClrUsed
PRINT "  Important colors  (valid only at 8-bit or less... pallet
dependant): ";bmih.biClrImportant
PRINT
PRINT "  Press <Enter> to close"
PRINT INPUT$(1)
CLOSEW #1
END


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:05 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zpiz8-00MiaRC>; Tue, 15 Dec 1998 02:09:10 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA04152; Tue, 15 Dec 1998 01:47:54 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3675C249.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 14 Dec 1998 16:43:06 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] WHY NOT?
X-UIDL: 8dd69fb7d67ebc642dc5013975568e22

The 'Not Affiliated With GFA News Letters' are all available from the url
below.

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:06 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zpj32-00MYkbC>; Tue, 15 Dec 1998 02:13:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA04185; Tue, 15 Dec 1998 01:57:52 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3675C487.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 14 Dec 1998 16:45:44 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] WHY NOT?
X-UIDL: 7e0675438f15d7549f0a73038e5b34f0

Have you downloaded FORMTEXT.ZIP from the GFAWHELP web site? GFA source is
included in all downloads from this site.

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:06 1998
Return-Path: <Frank.Schuetze@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zprLO-00N3ehC>; Tue, 15 Dec 1998 11:04:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA05285; Tue, 15 Dec 1998 10:42:54 +0100
From: Frank.Schuetze@t-online.de (Frank Schtze)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36763FA9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 15 Dec 1998 10:39:01 +0100
X-Mailer: Mozilla 4.05 [de]C-NECCK  (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
X-Sender: 05108927608-0001@t-online.de
Subject: [GFA] Scannen mit Gfa

X-UIDL: 543cdc45bf203afb0d350f7961fa9f58

Hallo,
weis jemand wie ich eine Twain Schnittstelle fr Scanner aus GFA-Basic
aufrufe?
Danke

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:10 1998
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zpuN7-00NJjDC>; Tue, 15 Dec 1998 14:18:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA05676; Tue, 15 Dec 1998 13:57:54 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36766D54.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 15 Dec 1998 13:47:06 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: [GFA] Bitmap Help Please 

X-UIDL: 7d470452c9174d09fd04e9b3f024d537

Ich habe eine groe Bitmap die ich mit 
BMP& = LOADBMP("weltkart.bmp")lade,
und Teilausschnitte auf dem Bildschirm anzeige.

Nun mchte ich mehrere kleinere Bitmaps in diese Bitmap einfgen. 
(berschreiben).Da diese Bitmap aber grer ist als der darstellbare Bereich, 
kann ich es nicht direkt auf den Bildschirm machen und per GET wieder einladen.

Wer hat hierzu eine Idee.
(sollte eingentlich irgentwie mit BITBLT gehen , ich habe aber schon fast alles 
versucht.)

M.f.G.
Wilhelm Bckmann
Email Bueckmann.W@T-Online.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:14 1998
Return-Path: <MALERST@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zpyl2-00NJigC>; Tue, 15 Dec 1998 18:59:40 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA06217; Tue, 15 Dec 1998 18:42:54 +0100
From: MALERST@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3676B029.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 15 Dec 1998 12:32:15 EST
Mime-Version: 1.0
Content-type: text/plain; charset=ISO-8859-1

X-Mailer: Windows AOL sub 21
Subject:  [GFA] "Zeitlose hintergrundschleife"
X-UIDL: 7b8df1fe2c941d351e7ff5a613f946aa

ich bentige fr eine Bestimmte Anwendung ein Programm das im Hintergrund auf
das erscheinen einer Datei auf laufwerk C wartet und dann entsprechen
reagiert. Natrlich soll es im Hintergrund so wenig wie mglich an Zeit
verbrauchen.

Do
peekevent
exit if exist("datei.xx"
loop

nimmt sich zuviel Rechnerzeit

getevent sollte 0,5 Sekunden warten und dann weitermachen.
im Hintergrund wartet getevent aber ewig-

wer hat mir einen tip?


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:17 1998
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zq0zB-00NJleC>; Tue, 15 Dec 1998 21:22:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA06513; Tue, 15 Dec 1998 21:02:50 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3676D0ED.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 15 Dec 1998 20:03:27 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <3676B029.BeroList-2.5.9@aachen.linux.de>
Subject: AW: [GFA] "Zeitlose hintergrundschleife"

X-UIDL: 77ce4d6a3f5667ca093b3c0e05dde41d

> wer hat mir einen tip?
Nimm ein Fenster, das per Timer-Event jede Sekunde prft, ob die Datei da
ist.

Gre, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:18 1998
Return-Path: <rsharma@post.cis.smu.edu>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zq17c-00MvKhC>; Tue, 15 Dec 1998 21:31:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA06541; Tue, 15 Dec 1998 21:12:54 +0100
From: "Roshan L. Sharma" <rsharma@post.cis.smu.edu>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3676D389.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Comments: Authenticated sender is <rsharma@post.cis.smu.edu>
Organization: SMU
Date: Tue, 15 Dec 1998 14:04:45 +0000
MIME-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7BIT
Priority: normal
X-mailer: Pegasus Mail for Windows (v2.53/R1)
Sender: rsharma@post.cis.smu.edu
Subject: [GFA] New Version of GBasic
X-UIDL: 87832ee1958cd166cb7305319a9c7612

Dear GBasic Folks:
Is there any one out there who knows when the next version of GBasic 
Compiler is scheduled to be commercially available? There are some 
versions of Windows NT that don't like the compiled version of my
network design application called EcoNets. I have been very happy 
with the older version since 1994 when I began teaching a nationwide 
SMU course. 
Also I haven't recieved any correspondence from the GBasic Users Club 
for 30 days or so. I never requested a cancellation of my membership. 
Thanks. 

Roshan L. Sharma, Adjunct Professor, EE Dept. SMU, Dallas
Roshan L. Sharma <rsharma@mail.smu.edu>
214-691-6790 <voice>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:19 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zq2Lq-00NKTkC>; Tue, 15 Dec 1998 22:49:54 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA06718; Tue, 15 Dec 1998 22:32:54 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3676E614.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981215212942.WBEE8937@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 15 Dec 1998 21:29:42 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 15 Dec 1998 21:29:42 +0000
Subject: Re: [GFA] New Version of GBasic
X-UIDL: c6149f0a3adaa5206f8c1aceafe9a633

Roshan
Compiler v1.07 (I think) 14 Nov 1996 (may not like NT, either)
The list server suffered a crash recently - you must re-subscribe.
<G>
TomR.
tiger.genealogical.rescue@worldnet.att.net

At 02:04 PM 15/12/98 +0000, you wrote:
>Dear GBasic Folks:
>Is there any one out there who knows when the next version of GBasic 
>Compiler is scheduled to be commercially available? There are some 
>versions of Windows NT that don't like the compiled version of my
>network design application called EcoNets. I have been very happy 
>with the older version since 1994 when I began teaching a nationwide 
>SMU course. 
>Also I haven't recieved any correspondence from the GBasic Users Club 
>for 30 days or so. I never requested a cancellation of my membership. 
>Thanks. 
>
>Roshan L. Sharma, Adjunct Professor, EE Dept. SMU, Dallas
>Roshan L. Sharma <rsharma@mail.smu.edu>
>214-691-6790 <voice>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:32 1998
Return-Path: <rlaporte@rz-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zqMT8-00MiaRC>; Wed, 16 Dec 1998 20:18:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA09251; Wed, 16 Dec 1998 19:57:50 +0100
From: Ralf La Porte <rlaporte@rz-online.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36781347.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 16 Dec 1998 19:54:52 +0100
X-Mailer: Ralf La Porte's registered AK-Mail 3.0b sppb1 [ger]
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1

Subject: [GFA] Probleme bei der GFA-Mailingliste
X-UIDL: bda1cd7480c1fe087ee5064e0b0fa3d7

Hallo,

nach dem 11.11.98 habe ich keine einzige Mail ueber die GFA-Mailingliste bekommen. Gibt es technische Probleme?

Gruesse

Ralf La Porte

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 09:53:39 1998
Return-Path: <Hans.Meier@unibw-muenchen.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.chemie.fu-berlin.de (160.45.24.23) with esmtp
	  id <m0zqZB9-00MvKaC>; Thu, 17 Dec 1998 09:53:03 +0100 (MET)
Received: from linux01.novocomp.de([194.120.166.67]) (1361 bytes) by mail.chemie.fu-berlin.de
	via smail with P:esmtp/R:bind_hosts/T:inet_zone_bind_smtp
	(sender: <Hans.Meier@unibw-muenchen.de>) 
	id <m0zqYm0-000G2TC@mail.chemie.fu-berlin.de>
	for <alibaba@zedat.fu-berlin.de>; Thu, 17 Dec 1998 09:27:04 +0100 (MET)
	(Smail-3.2.0.101 1997-Dec-17 #4 built DST-Jun-26)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA10989; Thu, 17 Dec 1998 08:57:51 +0100
From: Hans meier <Hans.Meier@unibw-muenchen.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3678C9FA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 17 Dec 1998 08:56:39 +0100
X-Mailer: Mozilla 4.05 [de] (Win95; I)
MIME-Version: 1.0
References: <36781347.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Probleme bei der GFA-Mailingliste
X-UIDL: 0b27a8f025b21444ca04772b4aeb6b6b

Hallo Ralf,
hatte mit dem gleichen Problem zu tun, hab mich erneut in die Mailing-List eingetragen!

MfG
Hans


Ralf La Porte schrieb:

> Hallo,
>
> nach dem 11.11.98 habe ich keine einzige Mail ueber die GFA-Mailingliste bekommen. Gibt es technische Probleme?
>
> Gruesse
>
> Ralf La Porte
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 18:14:39 1998
Return-Path: <gina.martin@bms.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zqZfL-00NIo2C>; Thu, 17 Dec 1998 10:24:15 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA11142; Thu, 17 Dec 1998 10:07:51 +0100
From: Gina Martin <gina.martin@bms.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3678DA5E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Disposition-notification-to: gina.martin@bms.com
 by monju.bms.com (PMDF V5.2-29 #28009)
 with ESMTP id <0F4300F3NP4H80@monju.bms.com> for gfabasic@linux.net.eu.org;
 Thu, 17 Dec 1998 03:33:54 -0500 (EST)
 by nsukmsg01.net.bms.com (Netscape Messaging Server 3.6)
  with ESMTP id AAA42DD; Thu, 17 Dec 1998 08:33:52 +0000
Date: Thu, 17 Dec 1998 09:33:50 +0100
Cc: gfabasic@aachen.linux.de
Organization: Bristol-Myers Squibb
MIME-version: 1.0
X-Mailer: Mozilla 4.5 [en]C-BMY  (WinNT; I)
Content-type: text/plain; charset=iso-8859-1
X-Accept-Language: en
References: <36781347.BeroList-2.5.9@aachen.linux.de>
 <3678C9FA.BeroList-2.5.9@aachen.linux.de>
Subject: Re: [GFA] Probleme bei der GFA-Mailingliste

X-UIDL: 897bb5e705f21f712249153ce1533fe0

Hi Ihr beiden,

tut mir leid, wenn ich so planlos frage: bin ich auf einer
Chatliste gelandet?
D. h. meine Vorgngerin auf meinem Arbeitsplatz hat sich wohl
irgendwo eintragen lassen.
Ist ja auch nicht schlecht. Geht es bei euch um ein bestimmte
Themen wenn Ihr euch schreibt, oder wie funktioniert das so
richtig?

G.


Hans meier wrote:
> 
> Hallo Ralf,
> hatte mit dem gleichen Problem zu tun, hab mich erneut in die Mailing-List eingetragen!
> 
> MfG
> Hans
> 
> Ralf La Porte schrieb:
> 
> > Hallo,
> >
> > nach dem 11.11.98 habe ich keine einzige Mail ueber die GFA-Mailingliste bekommen. Gibt es technische Probleme?
> >
> > Gruesse
> >
> > Ralf La Porte
> >
> > ---
> > This mailing list is currently running BeroList v2.5.6
> > Report problems to bero@bero-online.ml.org
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 18:14:40 1998
Return-Path: <gina.martin@bms.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zqa2g-00NJivC>; Thu, 17 Dec 1998 10:48:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA11177; Thu, 17 Dec 1998 10:17:55 +0100
From: Gina Martin <gina.martin@bms.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3678DCAE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Disposition-notification-to: gina.martin@bms.com
 by monju.bms.com (PMDF V5.2-29 #28009)
 with ESMTP id <0F4300DOEP4HNT@monju.bms.com> for gfabasic@aachen.linux.de;
 Thu, 17 Dec 1998 03:33:54 -0500 (EST)
 by nsukmsg01.net.bms.com (Netscape Messaging Server 3.6)
  with ESMTP id AAA42DD; Thu, 17 Dec 1998 08:33:52 +0000
Date: Thu, 17 Dec 1998 09:33:50 +0100
Cc: gfabasic@aachen.linux.de
Organization: Bristol-Myers Squibb
MIME-version: 1.0
X-Mailer: Mozilla 4.5 [en]C-BMY  (WinNT; I)
Content-type: text/plain; charset=iso-8859-1
X-Accept-Language: en
References: <36781347.BeroList-2.5.9@aachen.linux.de>
 <3678C9FA.BeroList-2.5.9@aachen.linux.de>
Subject: Re: [GFA] Probleme bei der GFA-Mailingliste

X-UIDL: 9e78e5dab03a5a6c41d56ab78f762f7e

Hi Ihr beiden,

tut mir leid, wenn ich so planlos frage: bin ich auf einer
Chatliste gelandet?
D. h. meine Vorgngerin auf meinem Arbeitsplatz hat sich wohl
irgendwo eintragen lassen.
Ist ja auch nicht schlecht. Geht es bei euch um ein bestimmte
Themen wenn Ihr euch schreibt, oder wie funktioniert das so
richtig?

G.


Hans meier wrote:
> 
> Hallo Ralf,
> hatte mit dem gleichen Problem zu tun, hab mich erneut in die Mailing-List eingetragen!
> 
> MfG
> Hans
> 
> Ralf La Porte schrieb:
> 
> > Hallo,
> >
> > nach dem 11.11.98 habe ich keine einzige Mail ueber die GFA-Mailingliste bekommen. Gibt es technische Probleme?
> >
> > Gruesse
> >
> > Ralf La Porte
> >
> > ---
> > This mailing list is currently running BeroList v2.5.6
> > Report problems to bero@bero-online.ml.org
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 17 18:14:44 1998
Return-Path: <jhorikx@stads.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zqfg2-00NIoFC>; Thu, 17 Dec 1998 16:49:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA11879; Thu, 17 Dec 1998 16:27:52 +0100
From: Jos Horikx <jhorikx@stads.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36793376.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: jhorikx@mail.stads.net
X-Mailer: Windows Eudora Light Version 1.5.4 (32)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 17 Dec 1998 16:21:42 +0100
Subject: Re: [GFA] Probleme bei der GFA-Mailingliste
X-UIDL: a782f20c9d22856464c9df6c2a5cbd91

At 19:54 16/12/98 +0100, Ralf La Porte wrote o.a.:

> nach dem 11.11.98 habe ich keine einzige Mail ueber die 
> GFA-Mailingliste bekommen. Gibt es technische Probleme?

Ich habe mir (mich?) dem 11. genau versucht zu "subscriben"
Ich bekam ein Fehlermeldung (sehe bitte unten an diesem post).
Aber ich habe seit dem 11. etwa 15 bis 20 Mails bekommen...


Gruesse

JH
Rotterdam
Nederland



copy of part of message of "undelivered mail"  follows (quote):

---------------------------------------------------------------------------

This is the VMailer program at host www.aachen.linux.de.

I'm sorry to have to inform you that the message returned
below could not be delivered to one or more destinations.

For further assistance, please contact <postmaster@www.aachen.linux.de>

If you do so, please include this problem report. You can
delete your own text from the message returned below.

			The VMailer program

	--- Delivery error report follows ---

<gfabasic@linux.net.eu.org>: Command died with status 1: "/usr/sbin/list
    gfabasic". Command output: BeroList-2.5.9 ready...  Sending... Can't
    connect to server proxy.in-trier.de.

	--- Undelivered message follows ---

..etc... [rest skipped] 

:Ende quote ---------------------------------------------------------------------


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Dec 18 19:05:13 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zquIG-00N0iYC>; Fri, 18 Dec 1998 08:25:48 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA13693; Fri, 18 Dec 1998 07:29:26 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <367A0E42.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981218062604.VYJV18214@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 18 Dec 1998 06:26:04 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Fri, 18 Dec 1998 06:26:04 +0000
Subject: [GFA] dlg_cap3.lst ... adding time & date to a dialog's caption.
X-UIDL: cc8dc464951fe00df75eb3e39b5acfe0

' dlg_cap3.lst ... adding time & date to a dialog's caption.
' In response to a list posting requesting aid in changing the
' caption of a dialog, specifically adding the date & current
' time, Wilhelm Bckmann, Email: Bueckmann.W@T-Online.de gave
' me the the basis for the following.  Wilhelm, many thanks!  I
' have modified it a little by adding centering & switching to
' the <Esc> key to close it.  I place it in the Public Domain.
' Dale... add, if you wish.
' TomR.  email: Tiger.Genealogical.Rescue@worldnet.att.net

ON BREAK GOSUB end
DLG 3D ON
dt$ = SPACE$(26)
cx& = GETDEVCAPS(HORZRES)  //  Get screen _X
cy& = GETDEVCAPS(VERTRES)  //  Get screen _Y
cxx& = INT(GETDEVCAPS(HORZRES) - 226) / 2  //  Center Horz'ly
cyy& = INT(GETDEVCAPS(VERTRES) - 15) / 2  //  Center Vert'ly
DIALOG #1,cxx&,cyy&,226,15,"",16
  /* don't need anything
ENDDIALOG
SHOWDIALOG #1
DO
  PEEKEVENT
  IF _Mess = WM_COMMAND
    SELECT _wParam
    CASE 2  //ESC-key (this is Windows default)
      @end
    ENDSELECT
  ENDIF
  t$ = TIME$  //  When time changes, caption changes.
  IF t$ <> at$
    at$ = t$
    MID$(dt$,18,8) = t$
    d$ = DATE$
    IF d$ <> ad$
      ad$ = d$
      MID$(dt$,1,10) = d$
    ENDIF
    _WIN$(DLG(1)) = "<Esc>     " + dt$
  ENDIF
LOOP
@ end


PROCEDURE end
  CLOSEDIALOG #1
  DLG 3D OFF
  END
RETURN



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 24 21:41:38 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zt7En-00NKT8C>; Thu, 24 Dec 1998 10:39:21 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA28719; Thu, 24 Dec 1998 10:06:37 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368216D1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 24 Dec 1998 04:03:50 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Seasonal Greetings
X-UIDL: 5ffe2437f8c3998392a778b4b143b6a1

Merry Christmas Everyone.


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 24 21:41:39 1998
Return-Path: <Martin.Betz@kkl.ch>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zt8OO-00NKZ3C>; Thu, 24 Dec 1998 11:53:20 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA28899; Thu, 24 Dec 1998 11:31:48 +0100
From: "BZB (Betz Martin )" <Martin.Betz@kkl.ch>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368228F3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
 (Content Technologies SMTPRS 2.0.15) with ESMTP id <B0000006846@mailrelay.kkl.ch> for <gfabasic@linux.net.eu.org>;
 Do, 24 Dez 1998 11:01:40 +0100
Date: Thu, 24 Dec 1998 11:01:14 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.1960.3)
Content-Type: text/plain
Subject: [GFA] 
X-UIDL: 6a9fa44b27b4f094aff206fbf3c8e73e


**********************************************************************
This email and any files transmitted with it are confidential and 
intended solely for the use of the individual or entity to whom they   
are addressed. If you have received this email in error please notify 
the system manager.

This footnote also confirms that this email message has been swept by 
MIMEsweeper for the presence of computer viruses.
**********************************************************************

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Dec 24 21:41:43 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0ztGCq-00MglvC>; Thu, 24 Dec 1998 20:13:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA29706; Thu, 24 Dec 1998 19:56:37 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36829EFB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 24 Dec 1998 10:48:32 -0800
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] RITEADLL
X-UIDL: 194fb06823db5bef272d2b5c165a73c9

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML><HEAD>
<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type>
<STYLE></STYLE></x-htm  

From ???@??? Fri Dec 25 09:06:23 1998
Return-Path: <Martin.Betz@kkl.ch>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0ztOly-00NJj6C>; Fri, 25 Dec 1998 05:22:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA30571; Fri, 25 Dec 1998 04:56:34 +0100
From: "BZB (Betz Martin )" <Martin.Betz@kkl.ch>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36831D90.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
 (Content Technologies SMTPRS 2.0.15) with ESMTP id <B0000006872@mailrelay.kkl.ch> for <gfabasic@linux.net.eu.org>;
 Fr, 25 Dez 1998 04:55:21 +0100
Date: Fri, 25 Dec 1998 04:54:48 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.1960.3)
Content-Type: text/plain;

Subject: [GFA] Info
X-UIDL: 2b52f1fc2c174f3dac1177003a58b420



Mit freundlichen Grssen


Betz Martin BW1

**********************************************************************
This email and any files transmitted with it are confidential and 
intended solely for the use of the individual or entity to whom they   
are addressed. If you have received this email in error please notify 
the system manager.

This footnote also confirms that this email message has been swept by 
MIMEsweeper for the presence of computer viruses.
**********************************************************************

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 27 22:40:52 1998
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0ztTh4-00NJigC>; Fri, 25 Dec 1998 10:38:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA31162; Fri, 25 Dec 1998 10:16:35 +0100
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3683688F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 25 Dec 1998 04:12:26 -0500
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Importance: Normal
Subject: [GFA] Seasons greetings!
X-UIDL: c9a737844ec16e808477de6c162a8af0

Merry Christmas All!

                             -->Bev<--


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 27 22:40:53 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zta2n-00NKSfC>; Fri, 25 Dec 1998 17:24:53 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA31827; Fri, 25 Dec 1998 17:06:37 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3683C8AE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 25 Dec 1998 07:58:28 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] Wishes
X-UIDL: 0999677dfb9055b9e6f02c61c74244e9

Happy Holidays to everyone!!!


Frhliche Feiertage
http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 27 22:41:28 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0ztnla-00N0jHC>; Sat, 26 Dec 1998 08:04:02 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA00557; Sat, 26 Dec 1998 07:46:36 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368496E0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981226064417.ISZQ28439@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 26 Dec 1998 06:44:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 26 Dec 1998 06:44:17 +0000
Subject: [GFA] seek platform version help   2612xx1-
X-UIDL: f477730a8fb2b4f834abb8f94d7026cb

26/12/98 12:29:08 AM   seek help   2612xx1-

I am running early Win95 (4.00.950).  There are problems with controls 
when compiled on this platform, then run on something later.  It has 
been established that an OEM install of Win98 has no problems, but 
somewhere in the upgrading process, some substitutuions occur that 
block normal operations for programs compiled on 4.00.950.

I would like to find users that have upgraded to both later versions 
of Win95... 4.00.950a & 4.00.950b.  I'd like to send something of mine 
to see if it will run properly on one or both of the later platforms.  
I am given to understand that at least 4.00.950b will behave just as 
does the upgrade from Win95 to Win98 does... that is, some controls 
will not show onscreen.

In the case of an upgrade that causes disfunction, I would like to 
learn where the changed-out files were put & what they are.  I also 
understand that they can be put back into use without ill effects.  
These files are placed into a hidden directory (probably in the 
windows/system dir).

If we can get the replaced files identified (date, version, etc.), 
perhaps we can devise a way to test for & overcome the disparity.

Thank you.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 27 22:41:30 1998
Return-Path: <jtdon@earthlink.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zttgi-00NIpMC>; Sat, 26 Dec 1998 14:23:24 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA01169; Sat, 26 Dec 1998 14:06:38 +0100
From: James Donovan <jtdon@earthlink.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3684F00B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 26 Dec 1998 08:04:30 -0500
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <368496E0.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=x-user-defined
Subject: Re: [GFA] seek platform version help   2612xx1-

X-UIDL: 023381acd44222d0de578c299e283d44

Hi,
I'm am running Win95 ver. 4.00.950 B, if I can be of any help
let me know.
 Jim Donovan


Tom Record wrote:

> 26/12/98 12:29:08 AM seek help 2612xx1-
>
> I am running early Win95 (4.00.950). There are problems with controls
> when compiled on this platform, then run on something later. It has
> been established that an OEM install of Win98 has no problems, but
> somewhere in the upgrading process, some substitutuions occur that
> block normal operations for programs compiled on 4.00.950.
>
> I would like to find users that have upgraded to both later versions
> of Win95... 4.00.950a & 4.00.950b. I'd like to send something of mine
> to see if it will run properly on one or both of the later platforms.
> I am given to understand that at least 4.00.950b will behave just as
> does the upgrade from Win95 to Win98 does... that is, some controls
> will not show onscreen.
>
> In the case of an upgrade that causes disfunction, I would like to
> learn where the changed-out files were put & what they are. I also
> understand that they can be put back into use without ill effects.
> These files are placed into a hidden directory (probably in the
> windows/system dir).
>
> If we can get the replaced files identified (date, version, etc.),
> perhaps we can devise a way to test for & overcome the disparity.
>
> Thank you.
> <G>
> TomR.
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Dec 27 22:41:31 1998
Return-Path: <jtdon@earthlink.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zttgZ-00N0jHC>; Sat, 26 Dec 1998 14:23:15 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA01170; Sat, 26 Dec 1998 14:06:39 +0100
From: James Donovan <jtdon@earthlink.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3684F00B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 26 Dec 1998 08:04:30 -0500
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <368496E0.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=x-user-defined
Subject: Re: [GFA] seek platform version help   2612xx1-

X-UIDL: 1f9b6fcbd51b71b57da5bfdd62bd8e31

Hi,
I'm am running Win95 ver. 4.00.950 B, if I can be of any help
let me know.
 Jim Donovan


Tom Record wrote:

> 26/12/98 12:29:08 AM seek help 2612xx1-
>
> I am running early Win95 (4.00.950). There are problems with controls
> when compiled on this platform, then run on something later. It has
> been established that an OEM install of Win98 has no problems, but
> somewhere in the upgrading process, some substitutuions occur that
> block normal operations for programs compiled on 4.00.950.
>
> I would like to find users that have upgraded to both later versions
> of Win95... 4.00.950a & 4.00.950b. I'd like to send something of mine
> to see if it will run properly on one or both of the later platforms.
> I am given to understand that at least 4.00.950b will behave just as
> does the upgrade from Win95 to Win98 does... that is, some controls
> will not show onscreen.
>
> In the case of an upgrade that causes disfunction, I would like to
> learn where the changed-out files were put & what they are. I also
> understand that they can be put back into use without ill effects.
> These files are placed into a hidden directory (probably in the
> windows/system dir).
>
> If we can get the replaced files identified (date, version, etc.),
> perhaps we can devise a way to test for & overcome the disparity.
>
> Thank you.
> <G>
> TomR.
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Dec 29 09:23:22 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zulI3-00NJlXC>; Mon, 28 Dec 1998 23:37:31 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA06695; Mon, 28 Dec 1998 23:16:34 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368813F3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981228221609.JKBT6215@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 28 Dec 1998 22:16:09 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 28 Dec 1998 22:16:09 +0000
Subject: [GFA] save *.bmp, 8-bit
X-UIDL: d7cab3ee3acfba30966ce43ba4612179

Discovery...

Setting the display to 256 colors means GFA-W will save 8-bit *.bmps
just fine.  However... 24-bit saves look nasty this way.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Dec 29 09:23:23 1998
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zun35-00NImtC>; Tue, 29 Dec 1998 01:30:11 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA06900; Tue, 29 Dec 1998 01:06:37 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36882E75.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 28 Dec 1998 16:00:32 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] save *.bmp, 8-bit
X-UIDL: 42186bc22cf5a666e4abcd3344d1ed8e

deMO???

----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Monday, December 28, 1998 2:16 PM
Subject: [GFA] save *.bmp, 8-bit


>Discovery...
>
>Setting the display to 256 colors means GFA-W will save 8-bit *.bmps
>just fine.  However... 24-bit saves look nasty this way.
>
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Dec 29 09:23:24 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zuni6-00MrnWC>; Tue, 29 Dec 1998 02:12:34 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA06998; Tue, 29 Dec 1998 01:56:37 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3688394E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19981229005403.DGPT1373@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 29 Dec 1998 00:54:03 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 29 Dec 1998 00:54:03 +0000
Subject: Re: [GFA] save *.bmp, 8-bit
X-UIDL: 14a65a79997a4273d9c7b1669850226f

No "demo", just a revelation.  Utilizing "somebody's" savebmp.lst (found
where ever GFA-W samples/examples are located), *MOST* saves were bombing
my computer & an 8-bit, uncompressed, was lousy.  All was OK but for any
shade of gray, which was converted to a shade of gold.  On screen, the
image looked OK, but the save had a shade of gold replacing all shades of
gray.

Savebmp.lst GPFed up a storm.  Hamstra's routines didn't GPF, but they
are all at 24-bit.  I had my display set to 16-bit HiColor for other reasons
I didn't really get around to checking if that was the problem until last
night when I discovered that Netscape Communicator v4.5 saved wallpaper as
16-bit, compressed.  I shut down & switched the display to 256 colors &
got 8-bit, compressed wallpaper.  The only problem to this is that anything
that is 16-bit or greater looks very nasty, now.

I spent many weeks of frustration on this problem but nobody mentioned the
fact that GFA-W's 8-bit save depended on the display colordepth!  Hamstra
has a make-a-pallet routine, but I've never got it to work w/ a save.

This means that any user of my programs that wants to save 8-bit *.bmps must
have one that uses a 3rd-party *.dll for it or have their display set to 256
colors when running my programs.  This sort of ties a knot in my tail... I
am working on making new logo screens, wallpaper & screensavers.  I can't
produce a GFA-W program to do it all withour making it a requirement that
the user switch his/her display colordepth to 256 colors.  Of all the fine
image editors I have, only one will load a compressed *.bmp!  Logos must be
8-bit, & _NOT_ compressed - they're keyed to filesize!  Wallpaper & scrnsvers
don't have this limitation.

Just a fact of life to be faced & accepted, I guess.  I haven't the money
to upgrade to 32-bit, or the patience to attempt to learn it.  *.ocx, *.vxd,
etc., don't seem possible w/ the 16-bit GFA-W altho tons of them *are* 16-bit.

Upgrade?  Learn?  I'm not getting very far with what I have now!

I could never get a *.gif save to work properly.  Using a $20 (US$) *.ocx, the
highly desired *.gif animation display is possible (but not, apparently, in
16-bit GFA-W).

Got off the subject - sorry.
<G>
TomR.


At 04:00 PM 28/12/98 -0800, you wrote:
>deMO???
>
>----- Original Message -----
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>To: <gfabasic@aachen.linux.de>
>Sent: Monday, December 28, 1998 2:16 PM
>Subject: [GFA] save *.bmp, 8-bit
>
>
>>Discovery...
>>
>>Setting the display to 256 colors means GFA-W will save 8-bit *.bmps
>>just fine.  However... 24-bit saves look nasty this way.
>>
>><G>
>>TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Dec 29 09:23:26 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zuuN0-00MrnWC>; Tue, 29 Dec 1998 09:19:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA07788; Tue, 29 Dec 1998 09:01:35 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36889CF2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 29 Dec 1998 02:56:30 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] save *.bmp, 8-bit
X-UIDL: 788de2f0c999072819adf8549707ee19

Tom,

RE: 8-bit vs. 24-bit/32-bit

To be able to save an 8-bit bitmap, the bitmap has to be 8-bits. This could
be tricky if you are starting with a 24 or 32 bit display.

Don't know of an easy way but imaging that you first need to Create an
8-bit bitmap using API, then by scanning the original 24/32 bit bmp create
a colour palette based on the most used colours and finally make the 8-bit
bmp yourself by POKEing the bits into a mem array and then use
SetBitmapBits().

It's suppressing how quickly one can scan through the bits;


// Pick an Image that will fit half your display
// This routine will only work for 24/32 bit bmps
// It works about five/six times faster when Compiled

DEFDBL "f"                      // 64 bit/float
DEFINT "l"                      // 32 bit/long
DEFWRD "h,n,w"                  // 16 bit/word
DEFBYT "ID"                     // 8 bit/byte
DEFSTR "z"                      // 8 bit array of chars/strings
DEFBIT "b"                      // 1 bit/bool

TYPE BITMAP:
- WORD Type
- WORD Width
- WORD Height
- WORD WidthBytes
- BYTE Planes
- BYTE BitsPixel
- LONG Bits
ENDTYPE
BITMAP: bm.

TITLEW #1," BitMap RGB Lighten Demo"
OPENW #1, 2, 0, _X - 10, _Y - 10, ~15
'
hBmp = LOADBMP("d:\image12.bmp")
PUT 0, 20, hBmp
'
~GetObject(hBmp, LEN(bm.), *bm.)
PRINT "Colour Depth of display is ";GetDeviceCaps(_DC(1), BITSPIXEL)
'
lpMem = MALLOC(bm.WidthBytes * bm.Height)
'
lt = TIMER
~GetBitmapBits(hBmp, bm.WidthBytes * bm.Height, lpMem)
@Lighten(10, lpMem)
~SetBitmapBits(hBmp, bm.WidthBytes * bm.Height, lpMem)
PUT bm.Width + 1, 20, hBmp
PRINT "Size of BitMap  ";bm.WidthBytes * bm.Height,(TIMER - lt)/1000;"
seconds to lighten the RGB values"

DO
  GETEVENT
  EXIT IF GetAsyncKeyState(VK_ESCAPE)
UNTIL MENU(1) = 4

~MFREE(lpMem)
FREEBMP hBmp
CLOSEW #1
EDIT
PROCEDURE Lighten(iPercent, lpBits)
  LOCAL nHeight = bm.Height
  LOCAL nWidth  = bm.WidthBytes
  LOCAL n, nADD, nx, ny

  nADD = 255 / 100 * iPercent

  FOR ny = 0 TO nHeight - 1
    FOR nx = 0 TO nWidth -1
      n = BYTE{_Huge(lpBits, nx + ny * nWidth)}
      n += nADD
      ' Using MIN or MAX is not as fast as an IF statement
      ' n = MIN(255, n)
      IF n > 255 THEN n = 255
      BYTE{_Huge(lpBits, nx + ny * nWidth)} = n
    NEXT nx
  NEXT ny

RETURN

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Dec 29 23:04:19 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zv16J-00MrnWC>; Tue, 29 Dec 1998 16:30:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA08480; Tue, 29 Dec 1998 16:11:34 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368901CA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 29 Dec 1998 10:09:34 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] BITMAPS
X-UIDL: f2f9191e2ce91fa4ff3fcf7a191842b9

Hi All,

Today I tried to save a BMP with one of Sjoukes routines, it wouldn't load
into PaintShopPro, strange!

So I've written another loader; still the image will not load into PSP,
however these images will load into MS Word and AmiPro, both word
processors.  The code I used is from the SDK.

Does anyone know what the difference is, why PSP differs from MS Word. Any
thoughts welcome??


Regards,

John Findlay

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Dec 29 23:04:20 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zv1AU-00MrnWC>; Tue, 29 Dec 1998 16:34:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA08504; Tue, 29 Dec 1998 16:16:35 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368902D8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19981229151403.KKFQ1373@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 29 Dec 1998 15:14:03 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 29 Dec 1998 15:14:03 +0000
Subject: Re: [GFA] save *.bmp, 8-bit
X-UIDL: 4722044ac10991d1cc6bdcfeba25de33

At 02:56 AM 29/12/98 -0500, you wrote:
>Tom,
>
>RE: 8-bit vs. 24-bit/32-bit
>
>To be able to save an 8-bit bitmap, the bitmap has to be 8-bits. This could
>be tricky if you are starting with a 24 or 32 bit display.

John

I certainly appreciate your taking time to speak up on this.  Thank you!

I'll devote some time to working thru this example.  It is, in essence,
what I thought would be required.  It puts "in black & white" what I
had been trying to formulate without success.

It's very disgusting to be unable to do a miriad of things others do so
easily in other languages!  I was beginning to think about resorting to
conversion to *.gif by *.dll - the dithering is there, by necessity.

I'm sorta stuck w/ this mess... the images are 24-bit *.jpg & the display
is 16-bit (much kinder to 24-bit images!).  Now (perhaps), I can get away
from having to force myself or any potential users to go to a 256-color
display for one appl.

Much obliged!
May the season mean improvements in all directions for you!!
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Dec 29 23:04:22 1998
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zv1OT-00NKSlC>; Tue, 29 Dec 1998 16:49:13 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA08548; Tue, 29 Dec 1998 16:31:36 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36890668.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 29 Dec 1998 10:25:41 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] My Spelling Mistakes
X-UIDL: f8e93d539089749d7c651258db0da36f

Sorry, two spelling mistakes; 

First to Tom;

"It's suppressing how"

Should have been; It's surprising how;


Second was to All in the message about BITMAPS;

"So I've written another loader"

Should have been; So I've written another saver;


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Dec 30 23:52:50 1998
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvORL-00NKYtC>; Wed, 30 Dec 1998 17:25:43 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA11078; Wed, 30 Dec 1998 16:41:36 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368A5A68.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 30 Dec 1998 16:36:54 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Pictures in Dialogs ...
X-UIDL: 571420e424578ac71293f90f14a83791

Hi!

I'm looking for a method to put a picture (bmp) into my Dialog, but it has
not to be static, I must have a posibillity to change it. And - it must not
be a button.

Has anyone an idea?

Many thanks in advance
Yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Dec 30 23:52:53 1998
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvOjy-00NJlGC>; Wed, 30 Dec 1998 17:44:58 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA11164; Wed, 30 Dec 1998 17:21:33 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368A639E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 30 Dec 1998 17:18:39 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
In-Reply-To: <368901CA.BeroList-2.5.9@aachen.linux.de>
Subject: AW: [GFA] BITMAPS
X-UIDL: 45adfecd76f568288bb5b4ac03005c84

> Does anyone know what the difference is, why PSP differs from MS Word. Any
> thoughts welcome??
BMP is not a single format, as far as I know it exists with two types:
Bitmap Windows and Bitmap OS/2. Perhaps PSP expects the OS/2 version? Or a
less/more color-resol.? Or a special packing-algor.? Or a complete
color-table?

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Dec 30 23:52:54 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvRWZ-00NIpMC>; Wed, 30 Dec 1998 20:43:19 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA11489; Wed, 30 Dec 1998 20:26:32 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368A8EF9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19981230192415.CKHE314@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 30 Dec 1998 19:24:15 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 30 Dec 1998 19:24:15 +0000
Subject: Re: [GFA] Pictures in Dialogs ...
X-UIDL: d58ce999f8c04b170d33020653e2e41c

At 04:36 PM 30/12/98 +0100, you wrote:
>Hi!
>
>I'm looking for a method to put a picture (bmp) into my Dialog, but it has
>not to be static, I must have a posibillity to change it. And - it must not
>be a button.
>
>Has anyone an idea?
>
>Many thanks in advance
>Yours
>
>Thomas
>
  hbitmap_dialog21& = LOADBMP(a$)


  style% = WS_VISIBLE | WS_CHILD | BS_OWNERDRAW | WS_BORDER
  DLGBASE PIXEL
    BUTTON DEC$(hbitmap_dialog21&), 150, 50, 75, 320, 200, BS_OWNERDRAW |
WS_BORDER

Sorry, Boss - only way I know.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Dec 30 23:52:55 1998
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvRfO-00NIpMC>; Wed, 30 Dec 1998 20:52:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA11517; Wed, 30 Dec 1998 20:36:34 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368A9154.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19981230193302.CMPY314@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 30 Dec 1998 19:33:02 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 30 Dec 1998 19:33:02 +0000
Subject: Re: AW: [GFA] BITMAPS
X-UIDL: db85769b9160dc3593d05ef164163f01

At 05:18 PM 30/12/98 +0100, you wrote:
>> Does anyone know what the difference is, why PSP differs from MS Word. Any
>> thoughts welcome??
>BMP is not a single format, as far as I know it exists with two types:
>Bitmap Windows and Bitmap OS/2. Perhaps PSP expects the OS/2 version? Or a
>less/more color-resol.? Or a special packing-algor.? Or a complete
>color-table?
>
>Bye, Joe
>
>
+++
PSP expects Windows 3.0 bitmaps, but... I don't know if it will load compressed
or 16-bit.  Can't play, because I dumped v4.14 because I couldn't stop it from
reclaiming ALL formats it can handle.  I have other editors I want associated
w/ certain formats... PSP takes too long to load, then is too complicated for
a weak mind such as mine to do simple things to the images.  Run the darned
thing
just one time & all formats associated w/ other editors are re-associated w/
PSP.

Many image editors will not tolerate compression or 16-bit color.  Both are
ruled
invalid but practically any paint or draw program can handle either.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:17 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zve8s-00NKTLC>; Thu, 31 Dec 1998 10:11:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA12889; Thu, 31 Dec 1998 09:56:31 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368B4CCF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 31 Dec 1998 03:52:10 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] BITMAPS
X-UIDL: 081e605f747fa8f455220b6159f62c03

Joe,

>BMP is not a single format, as far as I know it exists with two types:
Bitmap Windows and Bitmap OS/2. Perhaps PSP expects the OS/2 version? Or a
less/more color-resol.? Or a special packing-algor.? Or a complete
color-table?<

Thanks for those ideas.


John


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:18 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zve9D-00NIpJC>; Thu, 31 Dec 1998 10:12:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA12890; Thu, 31 Dec 1998 09:56:31 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368B4CCF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 31 Dec 1998 03:52:12 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Pictures in Dialogs ...
X-UIDL: 0ed028ab4f24468a20bd4c979bbe0fe5

Thomas,

>I'm looking for a method to put a picture (bmp) into my Dialog, but it has
not to be static, I must have a posibillity to change it. And - it must not
be a button.<

Why can't you use a static or a button window? You could move it/resize it!

The other thing you could do is use an ordinary window, put some controls
on it, fill in the background and make it Modal;

API Call  ~SetSysModalWindow(hwnd)

When you have finished with it just close it.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:19 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvg6O-00NJlsC>; Thu, 31 Dec 1998 12:17:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA13129; Thu, 31 Dec 1998 12:01:33 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368B6A26.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981231105736.JDGE17761@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 31 Dec 1998 10:57:36 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 31 Dec 1998 10:57:36 +0000
Subject: [GFA] getting into controlpanel & the display settings
X-UIDL: 9892128b5532e9c913c87a9ab1eaf2df

Has anyone knowledge about how to get into the display settings from within
a GFA-W program?  I don't find the module that needs to be addressed among
MSVC's include files.  Of main interest at the moment is to activate the
wallpaper & perhaps the Win95 desktop layout.  After making/installing
wallpaper images, I'd like to be able to "set" the display's wallpaper to it.

Thanks
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:40 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvk0Y-00NKUMC>; Thu, 31 Dec 1998 16:27:30 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA13544; Thu, 31 Dec 1998 16:11:32 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368BA4C6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 31 Dec 1998 10:07:26 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] getting into controlpanel & the display settings
X-UIDL: 592fe25fa4c5ef3417804c144b2af1c7

Tom,

Below is a listing that changes the wallpaper. SPIF_UPDATEINIFILE% makes it
system wide, that is, it's still there the next time you boot. If you set
that value to NULL it's not system wide.

John

OPENW #1
DLL #2,"kernel"
  ' -----------------------------------------------------------------------
  ' Declare WOW functions from the 16-bit kernel
  ' -----------------------------------------------------------------------
  DECL DWORD LoadLibraryEx32W(L,L,L)
  DECL BOOL  FreeLibrary32W(L)
  DECL DWORD GetProcAddress32W(L,L)
ENDDLL
lpf32%  = GetProcAddress(GetModuleHandle("kernel"),"CallProc32W")
user32% = ^LoadLibraryEx32W ("user32.dll", 0, 0)

SPI_SETDESKWALLPAPER% = 20
SPIF_UPDATEINIFILE%   = $0001
wall$ = "f:\s\Tolkien4.bmp" + CHR$(0)

~@SystemParametersInfo32(SPI_SETDESKWALLPAPER%, 0, V:wall$,
SPIF_UPDATEINIFILE%)

~^FreeLibrary32W(user32%)
KEYGET a%
FREEDLL 2
CLOSEW #1
EDIT
FUNCTION  SystemParametersInfo32(uiAction%, uiParam%, pvParam%, fWinIni%)
  adr% = ^GetProcAddress32W(user32%, "SystemParametersInfoA")
  RETURN P:(lpf32%) (L:uiAction%, L:uiParam%, L:pvParam%, L:fWinIni%,
L:adr%, L:%0010, L:4)
ENDFUNC

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:42 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvpZc-00NKUXC>; Thu, 31 Dec 1998 22:24:04 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA14122; Thu, 31 Dec 1998 22:06:31 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368BF80A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19981231210427.FOLY24807@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 31 Dec 1998 21:04:27 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 31 Dec 1998 21:04:27 +0000
Subject: Re: [GFA] getting into controlpanel & the display settings
X-UIDL: 57c5b636ff52b13e5abcfa701af584b5

Merci, M'seu
<G>
TomR.


At 10:07 AM 31/12/98 -0500, you wrote:
>Tom,
>
>Below is a listing that changes the wallpaper. SPIF_UPDATEINIFILE% makes it


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:44 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvtD0-00NJlGC>; Fri, 1 Jan 1999 02:16:58 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA14722; Fri, 1 Jan 1999 02:01:33 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368C2F08.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 31 Dec 1998 16:57:44 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] address
X-UIDL: 6d08c1178de61976030772165ac6f66f

Does anyone have a current email address for Sven Kumlin?

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:47 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvtwE-00NKT4C>; Fri, 1 Jan 1999 03:03:42 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA14812; Fri, 1 Jan 1999 02:46:30 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368C3982.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990101014342.INNX24807@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 1 Jan 1999 01:43:42 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 1 Jan 1999 01:43:42 +0000
Subject: Re: [GFA] address
X-UIDL: 771d14e97b67e24a8a87576291fd8aaa

At 04:57 PM 31/12/98 -0800, you wrote:
>Does anyone have a current email address for Sven Kumlin?
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net
>
"Sven Kumlin" <sven.kumlin@swipnet.se>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:48 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zvutW-00NKUIC>; Fri, 1 Jan 1999 04:04:58 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA14912; Fri, 1 Jan 1999 03:36:32 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368C4540.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 31 Dec 1998 18:29:37 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] address
X-UIDL: dcf52909b0ca8c0dc9ad533ab43739e0

Thanks Tom,
That's what I have for Sven but I got a message back so I thought maybe I
had the incorrect address.

----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Thursday, December 31, 1998 5:43 PM
Subject: Re: [GFA] address


>At 04:57 PM 31/12/98 -0800, you wrote:
>>Does anyone have a current email address for Sven Kumlin?
>>
>>http://gfa.net/adbryant
>>http://gfawhelp.gfa.net
>>
>"Sven Kumlin" <sven.kumlin@swipnet.se>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:50 1999
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zw3p9-00NKZcC>; Fri, 1 Jan 1999 13:37:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA15916; Fri, 1 Jan 1999 13:21:32 +0100
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368CCE66.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb05.swip.net (8.8.8/8.8.8) with SMTP 
          id NAA11666 for <gfabasic@linux.net.eu.org>; 
          Fri, 1 Jan 1999 13:17:20 +0100 (MET)
Date: Fri, 1 Jan 1999 13:17:24 +0100
MIME-Version: 1.0
Content-Type: text/plain;

X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: SV: [GFA] address
X-UIDL: 8e5931303d0a037535caec4f30069bee

I have a lot of trouble with my e-mail now. I will be back here again in a few days with a new e-mail address.

Sven Kumlin

-----Ursprungligt meddelande-----
Frn: Dale Bryant <adbryant@email.msn.com>
Till: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Datum: den 1 januari 1999 02:03
mne: [GFA] address


>Does anyone have a current email address for Sven Kumlin?
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:52 1999
Return-Path: <sven.kumlin@swipnet.se>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zw43t-00NKYsC>; Fri, 1 Jan 1999 13:52:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA15950; Fri, 1 Jan 1999 13:36:34 +0100
From: "Sven Kumlin" <sven.kumlin@swipnet.se>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368CD1EB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by mb05.swip.net (8.8.8/8.8.8) with SMTP 
          id NAA20775 for <gfabasic@linux.net.eu.org>; 
          Fri, 1 Jan 1999 13:34:32 +0100 (MET)
Date: Fri, 1 Jan 1999 13:34:35 +0100
MIME-Version: 1.0
Content-Type: text/plain;

X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: SV: [GFA] address
X-UIDL: 12f2c19b17f8e430f2314e04f263c643


I have a lot of trouble with my e-mail now. I will be back here again in a few days with a new e-mail address.

Sven Kumlin

-----Ursprungligt meddelande-----
Frn: Dale Bryant <adbryant@email.msn.com>
Till: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Datum: den 1 januari 1999 02:03
mne: [GFA] address


>Does anyone have a current email address for Sven Kumlin?
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:53 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zw54D-00NKTdC>; Fri, 1 Jan 1999 14:56:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA16084; Fri, 1 Jan 1999 14:41:34 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368CE121.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 1 Jan 1999 10:13:34 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <368A8EF9.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Pictures in Dialogs ...
X-UIDL: 8784eb18da8cc3dfa31d29ba2769124a

Hi Tom!

Many thanks for your listing! I will test it as soon as possible ...

Kind regards
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:54 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zw54D-00NKYsC>; Fri, 1 Jan 1999 14:56:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA16085; Fri, 1 Jan 1999 14:41:34 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368CE122.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 1 Jan 1999 10:21:23 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <368B4CCF.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Pictures in Dialogs ...
X-UIDL: 0bce0c9624ea05602ce0fdb4b7de4a84

Hi John!

>Why can't you use a static or a button window? You could move it/resize it!

I don't know how to do it. And I do not want to have a "control" for
interaction but only for viewing. I do not know if it is possible to do that
with an "button"?!

Kind regards
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:55 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zw7t9-00NKZaC>; Fri, 1 Jan 1999 17:57:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA16407; Fri, 1 Jan 1999 17:41:33 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368D0B62.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 1 Jan 1999 08:36:06 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] address
X-UIDL: 2431ff8a9febdd2533bb9a68de28c64e

Thanks Sven. Looking foreword to it.
Dale

----- Original Message -----
From: Sven Kumlin <sven.kumlin@swipnet.se>
To: <gfabasic@aachen.linux.de>
Sent: Friday, January 01, 1999 4:17 AM
Subject: SV: [GFA] address


I have a lot of trouble with my e-mail now. I will be back here again in a
few days with a new e-mail address.

Sven Kumlin

-----Ursprungligt meddelande-----
Frn: Dale Bryant <adbryant@email.msn.com>
Till: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Datum: den 1 januari 1999 02:03
mne: [GFA] address


>Does anyone have a current email address for Sven Kumlin?
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:56 1999
Return-Path: <c0028901@nwn.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zw91L-00NKh7C>; Fri, 1 Jan 1999 19:09:59 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA16522; Fri, 1 Jan 1999 18:41:32 +0100
From: Fietkau <c0028901@nwn.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368D1963.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 01 Jan 1999 18:41:15 +0100
Organization: Nordhorn
X-Mailer: Mozilla 3.01 [de] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Subject: [GFA] Rausgeflogen ?

X-UIDL: 9721bd56c7aedd5ce19365c345e6ff11

Ich habe die letzten mails vor ca. 4 Wochen erhalten.
Ist die mailing-list geplatzt oder bin ich irgendwie rausgeflogen ?
Gru
Manfred Fietkau

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:58 1999
Return-Path: <info@vez.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zw9qm-00NKhEC>; Fri, 1 Jan 1999 20:03:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA16626; Fri, 1 Jan 1999 19:31:34 +0100
From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368D2521.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 1 Jan 1999 19:27:46 +0100
Organization: Verlagsservice Eydt & Zimmerhansl GbR
X-Mailer: Microsoft Internet E-Mail/MAPI - 8.0.0.4211
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] Mit GFA-Basic ins Internet?
X-UIDL: 854e81ec9b26731acbc6587981b34269

Hallo,

hat jemand eine Ahnung, wie man mit GFA-Basic ins Internet kommt? Bei 
bestehender Netzverbindung sollte man doch Webseiten genauso laden knnen 
wie von einem beliebigen Netzwerkrechner!? Oder irre ich mich da?

Waere nett, wenn mir jemand weiterhelfen koennte.

Eberhardt



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:05:59 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwCfv-00NKZiC>; Fri, 1 Jan 1999 23:04:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA16946; Fri, 1 Jan 1999 22:46:30 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368D52F1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 1 Jan 1999 13:42:10 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Mit GFA-Basic ins Internet?
X-UIDL: 4eabee2ff5ad55d483ce820433731205

Machen Sie, Sie meinen das Verbinden zum internet von einem GFA Programm.
Wenn so,
laden Sie WEBIT.ZIP von nach
http://gfa.net/adbryant/files.htm
----- Original Message -----
From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
To: <gfabasic@aachen.linux.de>
Sent: Friday, January 01, 1999 10:27 AM
Subject: [GFA] Mit GFA-Basic ins Internet?


Hallo,

hat jemand eine Ahnung, wie man mit GFA-Basic ins Internet kommt? Bei
bestehender Netzverbindung sollte man doch Webseiten genauso laden knnen
wie von einem beliebigen Netzwerkrechner!? Oder irre ich mich da?

Waere nett, wenn mir jemand weiterhelfen koennte.

Eberhardt



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:06:00 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwDW0-00NKhNC>; Fri, 1 Jan 1999 23:57:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA17053; Fri, 1 Jan 1999 23:41:31 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368D5FB9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 1 Jan 1999 14:36:11 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Rausgeflogen ?
X-UIDL: be9f2a9abf060953660c063a891c7940

Manfred,
Sie mssen die Postversand-Liste wieder abonnieren.
Dale

----- Original Message -----
From: Fietkau <c0028901@nwn.de>
To: <gfabasic@aachen.linux.de>
Sent: Friday, January 01, 1999 9:41 AM
Subject: [GFA] Rausgeflogen ?


>Ich habe die letzten mails vor ca. 4 Wochen erhalten.
>Ist die mailing-list geplatzt oder bin ich irgendwie rausgeflogen ?
>Gru
>Manfred Fietkau
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 01:06:01 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwEDJ-00NJlSC>; Sat, 2 Jan 1999 00:42:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA17150; Sat, 2 Jan 1999 00:26:32 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368D6A4D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 1 Jan 1999 15:19:34 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] New Download
X-UIDL: d8d8e05554ede562841b34958e65e595

Bev Brown originated it, Dale Bryant revised it some and Tom Record finished
it.  Shows how to change bitmaps in a dialog while the dialog is still
displayed. You'll love it.
Grab it from the URL below
Happy New Year to ALL!!

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 15:35:02 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwGKc-00NKhAC>; Sat, 2 Jan 1999 02:58:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA17386; Sat, 2 Jan 1999 02:41:31 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368D89F0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990102013929.IPKG13187@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 2 Jan 1999 01:39:29 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Sat, 2 Jan 1999 01:39:29 +0000
Subject: Re: [GFA] Mit GFA-Basic ins Internet?
X-UIDL: 4c85d576ab14906e753b4fed7fc4a910

Guardati, sei si commencianno ad parlare Tedesco sul' la lista, ci faccio
io una rebutto in Italiana.

Buon' Anno Nuove
<G>
TomR.


At 01:42 PM 01/01/99 -0800, you wrote:
>Machen Sie, Sie meinen das Verbinden zum internet von einem GFA Programm.
>Wenn so,
>laden Sie WEBIT.ZIP von nach
>http://gfa.net/adbryant/files.htm
>----- Original Message -----
>From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
>To: <gfabasic@aachen.linux.de>
>Sent: Friday, January 01, 1999 10:27 AM
>Subject: [GFA] Mit GFA-Basic ins Internet?
>
>
>Hallo,
>
>hat jemand eine Ahnung, wie man mit GFA-Basic ins Internet kommt? Bei
>bestehender Netzverbindung sollte man doch Webseiten genauso laden knnen
>wie von einem beliebigen Netzwerkrechner!? Oder irre ich mich da?
>
>Waere nett, wenn mir jemand weiterhelfen koennte.
>
>Eberhardt
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 15:35:03 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwGUE-00NKZIC>; Sat, 2 Jan 1999 03:08:18 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA17415; Sat, 2 Jan 1999 02:51:34 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368D8C3F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 1 Jan 1999 17:44:42 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Mit GFA-Basic ins Internet?
X-UIDL: 880a81a3c460343a9931c28fda642ad0

Non seppi che Lei parl l'italiano!
----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Friday, January 01, 1999 5:39 PM
Subject: Re: [GFA] Mit GFA-Basic ins Internet?


Guardati, sei si commencianno ad parlare Tedesco sul' la lista, ci faccio
io una rebutto in Italiana.

Buon' Anno Nuove
<G>
TomR.


At 01:42 PM 01/01/99 -0800, you wrote:
>Machen Sie, Sie meinen das Verbinden zum internet von einem GFA Programm.
>Wenn so,
>laden Sie WEBIT.ZIP von nach
>http://gfa.net/adbryant/files.htm
>----- Original Message -----
>From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
>To: <gfabasic@aachen.linux.de>
>Sent: Friday, January 01, 1999 10:27 AM
>Subject: [GFA] Mit GFA-Basic ins Internet?
>
>
>Hallo,
>
>hat jemand eine Ahnung, wie man mit GFA-Basic ins Internet kommt? Bei
>bestehender Netzverbindung sollte man doch Webseiten genauso laden knnen
>wie von einem beliebigen Netzwerkrechner!? Oder irre ich mich da?
>
>Waere nett, wenn mir jemand weiterhelfen koennte.
>
>Eberhardt
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 15:35:05 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwKui-00NKhIC>; Sat, 2 Jan 1999 07:51:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA17968; Sat, 2 Jan 1999 07:36:30 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368DCF09.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990102063346.FDFD15946@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 2 Jan 1999 06:33:46 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 2 Jan 1999 06:33:46 +0000
Subject: [GFA] colors, 8-bit, F.Y.I.
X-UIDL: 901decccebb5df21b5501015f23123cd

02/01/99 12:31:42 AM   F.Y.I.   0201xx1-

Saving *.bmp w/ GFA-W.  Results depends upon the color depth you have
your display set to!

@savebmp("BI_RLE4.bmp",        BI_RLE4,bmp&) //compressed, 4-bit
@savebmp("BI_RLE8.bmp",        BI_RLE8,bmp&) //compressed, 4-bit

The above formats cause havoc - peak/poke/... error in 16- & 24-bit
display modes.  All where you see N/A in the compression column, it
means Not Applicable.

It has come to light that MS Paint (comes w/ Win85) suffers the same
quirk of delving into the gold region to replace grays when saving an
8-bit *.bmp if the display is in 16-bit or higher mode!

More info a bit later, as the saga unfolds.  <G>  TomR.

@savebmp("BI_RGB.bmp",         BI_RGB,bmp&) //uncompressed - not, 4-bit
@savebmp("BI_RLE4.bmp",        BI_RLE4,bmp&) //compressed, 4-bit
@savebmp("BI_RLE8.bmp",        BI_RLE8,bmp&) //compressed, 4-bit
@savebmp("8BI_RLE8.bmp",$800 | BI_RLE8,bmp&) //compressed, 8-bit
@savebmp("8BI_RLE4.bmp",$800 | BI_RLE4,bmp&) //compressed, 8-bit
@savebmp("4BI_RLE4.bmp",$400 | BI_RLE4,bmp&) //compressed, 8-bit
@savebmp("1BI_RGB.bmp", $100 | BI_RGB,bmp&)  //monochrome, not, 1-bit
@savebmp("18BI_RGB.bmp",$1800 | BI_RGB,bmp&) //True Color, not, 24-bit
@savebmp("10BI_RGB.bmp",$1000 | BI_RGB,bmp&) //HiColor, 16-bit
@savebmp("0fBI_RGB.bmp",$0f00 | BI_RGB,bmp&) //Direct Color, 15-bit

format     displ   comp   colors

0fBI_RGB   4-bit   38%    15-bit
 1BI_RGB   4-bit   -7%     1-bit
10BI_RGB   4-bit   34%    16-bit
18BI_RGB   4-bit    0%    24-bit
 4BI_RLE4  4-bit   48%     4-bit
 8BI_RLE4  4-bit   70%     8-bit
 8BI_RLE8  4-bit   62%     8-bit
  BI_RGB   4-bit   -1%     4-bit
  BI_RLE4  4-bit   48%     4-bit
  BI_RLE8  4-bit   32%     4-bit

format     displ   comp   colors

0fBI_RGB   8-bit   N/A
 1BI_RGB   8-bit   N/A
10BI_RGB   8-bit   34%    16-bit
18BI_RGB   8-bit    0%    24-bit
 4BI_RLE4  8-bit   56%     4-bit
 8BI_RLE4  8-bit   74%     8-bit
 8BI_RLE8  8-bit   68%     8-bit
  BI_RGB   8-bit   -4%     4-bit
  BI_RLE4  8-bit   74%     4-bit
  BI_RLE8  8-bit   68%     4-bit

format     displ   comp   colors

0fBI_RGB  16-bit   N/A
 1BI_RGB  16-bit   -7%     1-bit
10BI_RGB  16-bit   34%    16-bit
18BI_RGB  16-bit    0%    24-bit
 4BI_RLE4 16-bit   57%     4-bit
 8BI_RLE4 16-bit   75%     8-bit
 8BI_RLE8 16-bit   69%     8-bit
  BI_RGB  16-bit    0%     4-bit
  BI_RLE4 16-bit   N/A
  BI_RLE8 16-bit   N/A

format     displ   comp   colors

0fBI_RGB  24-bit   N/A
 1BI_RGB  24-bit   -7%    
10BI_RGB  24-bit   34%    16-bit
18BI_RGB  24-bit    0%    24-bit
 4BI_RLE4 24-bit   56%     4-bit
 8BI_RLE4 24-bit   74%     8-bit
 8BI_RLE8 24-bit   68%     8-bit
  BI_RGB  24-bit   34%     4-bit
  BI_RLE4 24-bit   N/A
  BI_RLE8 24-bit   N/A



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 15:35:07 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwL8N-00Mu7lC>; Sat, 2 Jan 1999 08:06:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA18003; Sat, 2 Jan 1999 07:51:30 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368DD279.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990102065013.FEZX15946@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 2 Jan 1999 06:50:13 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Sat, 2 Jan 1999 06:50:13 +0000
Subject: Re: [GFA] Mit GFA-Basic ins Internet?
X-UIDL: 4ce52cb13014fc75d62c367db9551239

La moglia vienni da Pescara (l'Abruzzo).  La figlia mia fu nata a Ortona, su uno
sasso sovra l'Adriatica.  Leggo, scrivo, lo sai?  E Lei... da quando in mai?
Qui, siamo tutti moltilinguistica.  Le cosatini sopra quache letere non me ne
fregga una "caspita" (solo per farmi pulito <G>).

Quanto voglia scomettere che qualc'uno sta dicendo le parollaci a noi?

Felice Pasqua, etc., etc., etc.
<G>
TomR.


At 05:44 PM 01/01/99 -0800, you wrote:
>Non seppi che Lei parl l'italiano!
>----- Original Message -----
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>To: <gfabasic@aachen.linux.de>
>Sent: Friday, January 01, 1999 5:39 PM
>Subject: Re: [GFA] Mit GFA-Basic ins Internet?
>
>
>Guardati, sei si commencianno ad parlare Tedesco sul' la lista, ci faccio
>io una rebutto in Italiana.
>
>Buon' Anno Nuove
><G>
>TomR.
>
>
>At 01:42 PM 01/01/99 -0800, you wrote:
>>Machen Sie, Sie meinen das Verbinden zum internet von einem GFA Programm.
>>Wenn so,
>>laden Sie WEBIT.ZIP von nach
>>http://gfa.net/adbryant/files.htm
>>----- Original Message -----
>>From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
>>To: <gfabasic@aachen.linux.de>
>>Sent: Friday, January 01, 1999 10:27 AM
>>Subject: [GFA] Mit GFA-Basic ins Internet?
>>
>>
>>Hallo,
>>
>>hat jemand eine Ahnung, wie man mit GFA-Basic ins Internet kommt? Bei
>>bestehender Netzverbindung sollte man doch Webseiten genauso laden knnen
>>wie von einem beliebigen Netzwerkrechner!? Oder irre ich mich da?
>>
>>Waere nett, wenn mir jemand weiterhelfen koennte.
>>
>>Eberhardt
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 15:35:11 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwLRt-00NJlSC>; Sat, 2 Jan 1999 08:26:13 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA18056; Sat, 2 Jan 1999 08:11:32 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368DD732.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 2 Jan 1999 02:09:46 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] Pictures in Dialogs ...
X-UIDL: 5a2e1596a46aa83b5cb0f5cc2cb7fa31

Hi Thomas,

>I don't know how to do it. And I do not want to have a "control" for
interaction but only for viewing. I do not know if it is possible to do
that
with an "button"?!<

You can use an BS_OWNERDRAW button and put an image in it. Or use a static
control. Dales message about 'New Download' should interest you.

Here is a way to move/resize a control; Controls don't need to be
interactive though.

DLGBASE PIXEL
style% = WS_TABSTOP
DIALOG #1,10,10,190,190,"Click Button",WS_SYSMENU | DS_MODALFRAME,-10,"MS
SANS SERIF"
  CONTROL "But", 100, "button", style%, 4, 4, 80, 23
ENDDIALOG
SHOWDIALOG #1
DO
  GETEVENT
  IF MENU(1) = 30 && MENU(6) = 100
    handle& = GetDlgItem(DLG(1), 100)
    ~MoveWindow(handle&, 16, 16, 120, 40, TRUE)
    _WIN$(handle&) = "Moved/Resized"
  ENDIF
UNTIL MENU(1) = 4
CLOSEDIALOG #1

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 20:12:28 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwSdW-00NKhcC>; Sat, 2 Jan 1999 16:06:42 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA18802; Sat, 2 Jan 1999 15:51:31 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368E4306.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Sat, 02 Jan 1999 15:37:25 -0100
In-Reply-To: <368D1963.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Subject: Re: [GFA] Rausgeflogen ?

X-UIDL: d3cfc09af2afbbe15686f5e9cba4d212

At 18:41 01.01.1999 +0100, you wrote:
>Ich habe die letzten mails vor ca. 4 Wochen erhalten.
>Ist die mailing-list geplatzt oder bin ich irgendwie rausgeflogen ?

ie Mailing-Liste war leider abgestrzt und dabei sind offenbar
smtliche SUBSCRIBEs verlorengegangen.
Vielleicht sollten wir mal darber nachdenken, ob wir Bernhard
Rosenkrnzer nicht etwas mit Hardware untersttzen knnen ;-)

Tsch von Roland


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 20:12:29 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwSxQ-00NKhUC>; Sat, 2 Jan 1999 16:27:16 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA18860; Sat, 2 Jan 1999 16:11:33 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368E47C6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 14:53:25(GMT) on January 02, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 02 Jan 1999 16:02:24 +0100
In-Reply-To: <368DD732.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] Redraw errors with Borland controls
X-UIDL: a335b9596d873e038eb4acd02443fa46

Hi!

I am using the BWCC.DLL to place some controls of the type Borshade in a
dialog box. Everything seemed to work fine. But today I opened the dialog
box over a window from my Hauppauge TV card. All controls dissapeared!

Can I fix the problem?


BTW: I've been off the list for quite a while... Is the 32 bit version of
GFA Basic out now?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 20:12:30 1999
Return-Path: <info@vez.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwTPn-00NKhXC>; Sat, 2 Jan 1999 16:56:35 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA18930; Sat, 2 Jan 1999 16:41:31 +0100
From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368E4ECD.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 2 Jan 1999 14:31:29 +0100
Organization: Verlagsservice Eydt & Zimmerhansl GbR
X-Mailer: Microsoft Internet E-Mail/MAPI - 8.0.0.4211
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: AW: [GFA] Mit GFA-Basic ins Internet?
X-UIDL: 6523787a3ee70083d861dc3e808c01e3

Vielen Dank fr den Tip! Werde ich gleich mal ausprobieren.

Eberhardt

-----Ursprngliche Nachricht-----
Von:	Dale Bryant [SMTP:adbryant@email.msn.com]
Gesendet am:	Freitag, 1. Januar 1999 22:42
An:	gfabasic@aachen.linux.de
Betreff:	Re: [GFA] Mit GFA-Basic ins Internet?

Machen Sie, Sie meinen das Verbinden zum internet von einem GFA Programm.
Wenn so,
laden Sie WEBIT.ZIP von nach
http://gfa.net/adbryant/files.htm
----- Original Message -----
From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
To: <gfabasic@aachen.linux.de>
Sent: Friday, January 01, 1999 10:27 AM
Subject: [GFA] Mit GFA-Basic ins Internet?


Hallo,

hat jemand eine Ahnung, wie man mit GFA-Basic ins Internet kommt? Bei
bestehender Netzverbindung sollte man doch Webseiten genauso laden knnen
wie von einem beliebigen Netzwerkrechner!? Oder irre ich mich da?

Waere nett, wenn mir jemand weiterhelfen koennte.

Eberhardt



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 20:12:32 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwUla-00NKhbC>; Sat, 2 Jan 1999 18:23:10 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA19087; Sat, 2 Jan 1999 18:06:32 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368E62C5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 2 Jan 1999 09:01:25 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Redraw errors with Borland controls
X-UIDL: 03f96d5ceceb3d7ff40301c707ee5db4

GFA32 is not out yet. We are all still eagerly awaiting it.

----- Original Message -----
From: Michael Weigand <michael@bonbit.org>
To: <gfabasic@aachen.linux.de>
Sent: Saturday, January 02, 1999 7:02 AM
Subject: [GFA] Redraw errors with Borland controls


>Hi!
>
>I am using the BWCC.DLL to place some controls of the type Borshade in a
>dialog box. Everything seemed to work fine. But today I opened the dialog
>box over a window from my Hauppauge TV card. All controls dissapeared!
>
>Can I fix the problem?
>
>
>BTW: I've been off the list for quite a while... Is the 32 bit version of
>GFA Basic out now?
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 20:12:33 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwUzY-00NKhdC>; Sat, 2 Jan 1999 18:37:36 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA19123; Sat, 2 Jan 1999 18:21:34 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368E663E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 2 Jan 1999 09:14:41 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] Special Thanks
X-UIDL: 754c4154d1259d8dbe30365146794ef1

A Special List Of Special People
Sjaak Aarnoutse, Patrik Battig, Paul Bonner, Bev Brown, Ingmar Brunken,
Ophir Daniel, Thomas Engel, Mark Feaver, John Findlay, Sjouke Hamstra,
Joachim Hurst, Greg Irwin, Jon Jacobi, Michael Kroege, John Musselman, Ron
Parker, Keith Pickup, Craig Randall, Tom Record, George Redford, Eckhard
Rennner, Friedrich Rode, James Schumacher, Sven Thomas, Roland Walter,
Robert Wolf, Michael Vogel.


All of the above have copntributed routines to teh GFAWHELP file. What a
group!!

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 02 20:12:34 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwV6A-00NKhoC>; Sat, 2 Jan 1999 18:44:26 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA19154; Sat, 2 Jan 1999 18:26:34 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368E6761.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 2 Jan 1999 09:17:31 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] All
X-UIDL: 5a7dfb2dff56bac413fd21abab50447d


The GFAWHELP Windows help file was started a few years ago as a programming
help for myself. It has grown considerably over the years as many GFA
programmers have contributed routines to the file. Recently a new Windows
Message section has been added and also hundreds of examples on calling the
Windows API functions from GFA Basic.GFAWHELP has always been freeware and I
intend to keep it freeware. In my opinion nothing is more frustrating in
learning a new programming language than the extreme lack of examples. This
is somewhat understandable as writing a new programming language is a very
difficult task and writing hundreds of examples is not economically
feasible..Many great GFA programmers have contributed to the GFAWHELP file
over the last few years. If you decide to download the file please check out
the CREDITS link in the GFAWHELP file or the Special link from the home
page. If you find a file that is useful to you send the contributor an Email
Thank you. Their email address is shown in the download description.
GFAWHELP has operable links to all the great Gfa Basic web pages known to
me. If you are a Gfa Basic programmer don't miss the Home Pages of Eckhard
Renner and Joe Hurst. They supply many source files to download.See the
Links page to visit these sites.

Access from the links below.
http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 03 16:27:30 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwegG-00NKhbC>; Sun, 3 Jan 1999 04:58:20 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA20166; Sun, 3 Jan 1999 04:41:33 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368EF7A0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990103034041.EOGP20818@LOCALNAME>;
          Sun, 3 Jan 1999 03:40:41 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Cc: awatson@lombardi.wctc.net
Date: Sun, 3 Jan 1999 03:40:41 +0000
Subject: [GFA] Woe is me!
X-UIDL: 8ea3cafc6578bb407ab1fc4a8fd72ede

I have just about worn out my imagination with this project - making &
changing the Win95 logo screens.  The requirements are fairly simple...

320x400, 8-bit *.bmp, filesize _MUST_BE_ 129K

They can be made from any image with the following ratios:

W/H=1.333, H/W=0.75, or... W*0.75=H, or H*1.333=W

These proportions allow Windows to stretch the image to fullscreen, 
regardless of the actual screen resolution/mode being used.

The original image is re-dimensioned to 320x400, converted to 8-bit
*.bmp, _IS_ _NOT_ _COMPRESSED_, resulting in a filesize of 129K!  It 
is then given a new extension of *.sys.

Compress it = ignored, not displayed!
Filesize <> 129K = ignored, not displayed!
Extension <> *.sys = ignored, not displayed!
Color depth <> 8-bit = ignored, not displayed!
Dimensions not 320x400 = ignored, not displayed!
!!!!! Windows is very strict about these images!!!!

I thought I had a stroke of genius for getting around the 8-bit save
while set up for 16-bit or higher display mode... I thought I'd first
convert the *.jpg to *.gif, type 87a (by definition, 8-bit regardless
of the display mode), then convert'em to *.bmp.

HA!  The *.gif are beautiful & faithful reproductions.  The *.bmp are
anything _BUT_ desireable!  MS has got to me again!

Conclusion: another monsterous but promising project left teetering
on the edge of the trashcan by limitations imposed on 8-bit *.bmp
saves.  At least, other languages exhibit problems with it besides
GFA-W.  I have several very good image editors - all seem to have a
serious problem in this area.

The lion roars no more... the mouse returns to his hole in the wall.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 03 16:27:33 1999
Return-Path: <tdm@radixgmbh.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwkzJ-00NKt9C>; Sun, 3 Jan 1999 11:42:25 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA20900; Sun, 3 Jan 1999 11:26:30 +0100
From: Thomas Mller <tdm@radixgmbh.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368F5677.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 3 Jan 1999 11:26:37 +0100
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] GFA and Videograbber
X-UIDL: d6b3540441b52e34fc03166e9ec98887

Hello to all

I have to detect color aberrations in a video-stream,
and I am now checking the fundamentals to realise
this task with a GFA-Basic program.

Is it possible to get pictures direct (not via file) 
from a video-grabber-card?
Which videocard should I prefer?
How to "speak" with the videocard?

Has anyone an Idea?


Thank you in advance

Thomas Mller
Germany

 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 03 16:27:34 1999
Return-Path: <info@vez.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwlAh-00NKt4C>; Sun, 3 Jan 1999 11:54:11 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA20927; Sun, 3 Jan 1999 11:36:33 +0100
From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368F58D2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 3 Jan 1999 11:31:34 +0100
Organization: Verlagsservice Eydt & Zimmerhansl GbR
X-Mailer: Microsoft Internet E-Mail/MAPI - 8.0.0.4211
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: [GFA] GFA-Basic and Internet?
X-UIDL: 92a1268ec7d2692bd9fa7dc64970d200

WEBIT doesn't correspond to my ideas.

I look for a Sourcecode with the following functions:

1) connect with internet (without Browser)
2) Go to search engine "X"
3) Search for "X"
4) Read all search results and go to the found web sides
5) Saving this side without pictures on harddisk if the web side contains the search string

Many thanks for your help.

Eberhardt

This text was translated by PT plus.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 03 22:25:59 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwpp2-00NKthC>; Sun, 3 Jan 1999 16:52:08 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA21426; Sun, 3 Jan 1999 16:36:31 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368F9F23.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990103153550.EHNV25106@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 3 Jan 1999 15:35:50 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 3 Jan 1999 15:35:50 +0000
Subject: [GFA] Help - confused!   0301xx1-
X-UIDL: 75fa8681524915b2b046547d93d04351

03/01/99 09:33:13 AM   Help - confused!   0301xx1-

From: Petzold's Windows Programming Course with GFABASIC.......

I don't have the book, just the routines that can be downloaded
from 2 or 3 sites.

I can change the checked item OK.  It moves w/ the selection OK.

I DON'T understand it all... the colors are 37 thru 41 if run thru
PBOX/PRBOX + DEFFILL X, not 31 thru 35.

This is no real problem except... I can NOT get it to default on
lt gray (32, or is it 38?), altho I can locate the check on it & it
still moves w/ selection.  I've tried changing the "31" in all 
instances without avail.

Any guidance greatly appreciated!
<G>
TomR.

' 10.2             MENUS PROG2
'
' A popup menu is generated which opens upon a right button mouse click. The
' popup menu is created by API functions.
'
'======================================================================
'  POPMENU  -  Popup menu demonstration
'=======================================================================

PROCEDURE M_MENU '-----------------------------( menu handler )
  SWITCH MENU(0) 'contains the menu id (as _wParam)
  CASE 31 TO 35
    ~CheckMenuItem(hMenu&,isel&,MF_UNCHECKED) 'manage checkmarks
    isel& = _wParam
    ~CheckMenuItem(hMenu&,isel&,MF_CHECKED)
    ~SelectObject(_DC(1),GetStockObject((isel&) - 31)) 'select stockbrush
    PBOX -1,-1,_X,_Y 'CLS with brush
RETURN


PROCEDURE M_MENUCREATE '-----------------( create popup menu )
  hMenu& = CreatePopupMenu() 'main popup menu
  h& = CreateMenu()
  ~AppendMenu(h&,MF_STRING | MF_CHECKED,31,"&White")
  isel& = 31
  ~AppendMenu(h&,MF_STRING,32,"&Lt Gray")
  ~AppendMenu(h&,MF_STRING,33,"&Gray")
  ~AppendMenu(h&,MF_STRING,34,"&Dk Gray")
  ~AppendMenu(h&,MF_STRING,35,"&Black")
  ~AppendMenu(hMenu&,MF_STRING | MF_POPUP,h&,"&Background")
RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:08 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zwvSd-00NKwDC>; Sun, 3 Jan 1999 22:53:23 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA22005; Sun, 3 Jan 1999 22:36:33 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <368FF394.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Sun, 03 Jan 1999 16:48:27 -0100
In-Reply-To: <368F5677.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] GFA and Videograbber
X-UIDL: f17d031e826d8bc5098fea3d5be8c5e1

At 11:26 03.01.1999 +0100, you wrote:

>Is it possible to get [video stream] pictures direct (not via file) 
>from a video-grabber-card?

The functions exported by AVIFILE.DLL (Video for Windows 1.1+ or
Windows 95) should do this work:
AVIStreamGetFrame()
AVIStreamGetFrameClose()
AVIStreamGetFrameOpen()
May be You must use also/or functions exported by MSVIDEO.DLL

>Which videocard should I prefer?
I use Hauppauge WinTV/PCI but other cards should work also
I think...

>How to "speak" with the videocard?

Direct by video functions as above or more simple if possible
by MCI capture commands - but for MCI I do'nt know if the can
return what You need...

Bye, Roland

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:10 1999
Return-Path: <eeadie@iul-ccs.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zx0rI-00NKtjC>; Mon, 4 Jan 1999 04:39:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA00203; Mon, 4 Jan 1999 04:21:29 +0100
From: ELDON EADIE <eeadie@iul-ccs.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3690445C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 03 Jan 1999 20:21:38 -0700
Organization: MUSTANG CORP.
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: [GFA] GFW
X-UIDL: c0423827a8dfe42e11fa272c0d3a51d7

I just purchased the GFW system and the interpreter is in German.  Is
there a way to switch it to English.  If not, it is completely useless
to me, as I don't speek the language.

Eldon Eadie


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:11 1999
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zx1Xh-00NKUYC>; Mon, 4 Jan 1999 05:23:01 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA00292; Mon, 4 Jan 1999 05:01:30 +0100
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36904DBF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 04 Jan 1999 13:29:51 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <3690445C.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] GFW
X-UIDL: 6dc968690c86958978e54b292f32281b

ELDON EADIE wrote:
> 
> I just purchased the GFW system and the interpreter is in German.  Is
> there a way to switch it to English.  If not, it is completely useless
> to me, as I don't speek the language.
> 
> Eldon Eadie
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

On the bottom row are several buttons. Click on the CONFIG button to pop
up the configuration window. Then click on the fourth option down "Menu
Deutsch" to remove the tick. Click on "Speichern" (Save) to close the
window, then exit the interpreter/editor. When you go back in, it should
be in English.

---------------------------------------------------------------------------
Dean Hodgson
The Book Mark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8262-7751  fax 0011-61-8-8262-8130
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:15 1999
Return-Path: <tdm@radixgmbh.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zx8PF-00NKZiC>; Mon, 4 Jan 1999 12:42:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA01084; Mon, 4 Jan 1999 12:26:27 +0100
From: Thomas Mller <tdm@radixgmbh.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3690B602.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 4 Jan 1999 12:24:04 +0100
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: [GFA] TSKBICON Question
X-UIDL: ed542311d1aac879d762719718e9c599

Hello

I have played with the GFA-Proggi tskbicon.gfw,
as seen on http://www.gfa.net/adbryant/files.htm.
It is great, but it is not really perfect.

How to prevent the title information of the running 
program with WIN(1) in the status (task) bar ?

Has anyone an idea?


Thomas Mller
Germany 



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:18 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zx9dg-00NJiuC>; Mon, 4 Jan 1999 14:01:44 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA01224; Mon, 4 Jan 1999 13:41:28 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3690C795.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 4 Jan 1999 13:39:23 +0100
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: AW: [GFA] Mit GFA-Basic ins Internet?
X-UIDL: 1ed07eb52475cd5b8aed76244e96b1cf

ma perch dici "italiana" - la parola  "italiano", non  ?

ich habe mich auch gewundert, warum das Forum pltzlich multilingual
wird...

So, let's switch back to english (or esperanto) !
- Michael

PS.: Maybe to late to get the file:  www.vo.schooeller.at/file/snow.scr

>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Samstag, 02. Januar 1999 02:39
>An: 	gfabasic@aachen.linux.de
>Betreff: 	Re: [GFA] Mit GFA-Basic ins Internet?
>
>Guardati, sei si commencianno ad parlare Tedesco sul' la lista, ci faccio
>io una rebutto in Italiana.
>
>Buon' Anno Nuove
><G>
>TomR.
>
>
>At 01:42 PM 01/01/99 -0800, you wrote:
>>Machen Sie, Sie meinen das Verbinden zum internet von einem GFA Programm.
>>Wenn so,
>>laden Sie WEBIT.ZIP von nach
>>http://gfa.net/adbryant/files.htm
>>----- Original Message -----
>>From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
>>To: <gfabasic@aachen.linux.de>
>>Sent: Friday, January 01, 1999 10:27 AM
>>Subject: [GFA] Mit GFA-Basic ins Internet?
>>
>>
>>Hallo,
>>
>>hat jemand eine Ahnung, wie man mit GFA-Basic ins Internet kommt? Bei
>>bestehender Netzverbindung sollte man doch Webseiten genauso laden knnen
>>wie von einem beliebigen Netzwerkrechner!? Oder irre ich mich da?
>>
>>Waere nett, wenn mir jemand weiterhelfen koennte.
>>
>>Eberhardt
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:19 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxA3h-00NKZcC>; Mon, 4 Jan 1999 14:28:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA01302; Mon, 4 Jan 1999 14:11:31 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3690CE8F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 4 Jan 1999 14:10:33 +0100
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: WG: [GFA] save *.bmp, 8-bit
X-UIDL: 8fcbd0a820115c1fa537b36726fdd03b

>
>As some of you all do, I am trying (already for a while) to save a 24/32-Bit
>bitmap from the screen into 8-Bit bitmap file (compressed or uncompressed,
>with optimizing colors). The reason for this (already 7 month) project is a
>simple program writing all calendar events to a file which gets displayed as
>desktop wallpaper (see mini picture). I never could save a 8 Bit file with
>useful color palette from a 24 Bit Window.
>
>Good luck to all other programmers,
>	Michael
>
>
[kalender.jpg]
>
>[...]
>RE: 8-bit vs. 24-bit/32-bit
>
>To be able to save an 8-bit bitmap, the bitmap has to be 8-bits. This could
>be tricky if you are starting with a 24 or 32 bit display.
>[...]
>
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:20 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxBA1-00NKh5C>; Mon, 4 Jan 1999 15:39:13 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA01444; Mon, 4 Jan 1999 15:21:28 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3690DEFA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990104142011.DWAT23444@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 4 Jan 1999 14:20:11 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Mon, 4 Jan 1999 14:20:11 +0000
Subject: Re: AW: [GFA] Mit GFA-Basic ins Internet?
X-UIDL: e8f826afa5a9b9b361470568e63eae39

Ah, Mechele
Quando parlando italiana giusto, come si fanno in Italia, si finisci col'
la "a" & senza capitalizare la "i".  Come mai le Ingleze piantata la
parola "Turin" invece de "Torino"?  O "Florence" nella posto de "Fiarenza"?

Nuts on Esparanto <G>, let's stick w/ English.  I lost track of the markings
eons ago w/ French, so when I learned Italian in Italy, I never got'em
straight for that, either.

Ha!  We *are* an international group, aren't we <G>.
<G>
TomR.


At 01:39 PM 04/01/99 +0100, you wrote:
>ma perch dici "italiana" - la parola  "italiano", non  ?
>
>ich habe mich auch gewundert, warum das Forum pltzlich multilingual
>wird...
>
>So, let's switch back to english (or esperanto) !
>- Michael
>
>PS.: Maybe to late to get the file:  www.vo.schooeller.at/file/snow.scr
>
>>----------
>>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>>Gesendet: 	Samstag, 02. Januar 1999 02:39
>>An: 	gfabasic@aachen.linux.de
>>Betreff: 	Re: [GFA] Mit GFA-Basic ins Internet?
>>
>>Guardati, sei si commencianno ad parlare Tedesco sul' la lista, ci faccio
>>io una rebutto in Italiana.
>>
>>Buon' Anno Nuove
>><G>
>>TomR.
>>
>>
>>At 01:42 PM 01/01/99 -0800, you wrote:
>>>Machen Sie, Sie meinen das Verbinden zum internet von einem GFA Programm.
>>>Wenn so,
>>>laden Sie WEBIT.ZIP von nach
>>>http://gfa.net/adbryant/files.htm
>>>----- Original Message -----
>>>From: Verlagsservice Eydt & Zimmerhansl GbR <info@vez.de>
>>>To: <gfabasic@aachen.linux.de>
>>>Sent: Friday, January 01, 1999 10:27 AM
>>>Subject: [GFA] Mit GFA-Basic ins Internet?
>>>
>>>
>>>Hallo,
>>>
>>>hat jemand eine Ahnung, wie man mit GFA-Basic ins Internet kommt? Bei
>>>bestehender Netzverbindung sollte man doch Webseiten genauso laden knnen
>>>wie von einem beliebigen Netzwerkrechner!? Oder irre ich mich da?
>>>
>>>Waere nett, wenn mir jemand weiterhelfen koennte.
>>>
>>>Eberhardt
>>>
>>>
>>>
>>>---
>>>This mailing list is currently running BeroList v2.5.6
>>>Report problems to bero@bero-online.ml.org
>>>
>>>
>>>
>>>
>>>---
>>>This mailing list is currently running BeroList v2.5.6
>>>Report problems to bero@bero-online.ml.org
>>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:22 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxBAv-00NKZ2C>; Mon, 4 Jan 1999 15:40:09 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA01445; Mon, 4 Jan 1999 15:21:29 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3690DEFA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990104142017.DWBS23444@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 4 Jan 1999 14:20:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 4 Jan 1999 14:20:17 +0000
Subject: Re: WG: [GFA] save *.bmp, 8-bit
X-UIDL: a8e1f49674f57700dc0750f9a8c8c35c

Michael
On this computer, wallpaper can be any colordepth & can even be compressed.
All that is demanded is that the file be a *.bmp in truth (has the "BM" 
file identifier as the first byte) & bears *.bmp as an extent.  The actual
image can even be RLE, which I find is NOT limited to 4- & 8- bits.  I run
16-bit HiColor, & this thing makes excellent RLEs at 16-bits.

Logo screens images, however, WILL BE 8-bit!  They'll be 126K & 320x400!
Can't run an RLE of any flavor for these.  They must contain the 1st byte
"BM" & carry *.sys as an extent.

I found that Rimmer's GWS can convert to 8-bit fairly nicely.  I want to do
it in GFA-W!!!!!  I can "make up" an 8-bit w/ one of Hamstra's routines,
but have yet to succeed in imposing it on an image during a save at any color
depth display.  I don't understand enough yet about the pallet to get away
with it.

One other way to get there is to convert the file to *.gif (compressed or
not - the pallet is forced!), then to *.bmp but... *this* step has to be 
done in GFA-W w/ the display set to 8-bit!  Leave it at 16-bit or higher,
it'll impose a 16-bit save nearly every time.  The rules seem to change
according to the weather.

I posted a chart the other day that proves the theory that RLE can be just
about any color depth - each one has a different compression factor!  That
took several hours to accomplish, but was something I wanted to know.  I have
a bitmaph() written w/ help from Eberhard F. that will display a ton of info
on *.bmp, but it has no printout yet.

If you figure how to impose a pallet for the save, PLEASE let me know how.

<G>
TomR.


At 02:10 PM 04/01/99 +0100, you wrote:
>>
>>As some of you all do, I am trying (already for a while) to save a 24/32-Bit
>>bitmap from the screen into 8-Bit bitmap file (compressed or uncompressed,
>>with optimizing colors). The reason for this (already 7 month) project is a
>>simple program writing all calendar events to a file which gets displayed as
>>desktop wallpaper (see mini picture). I never could save a 8 Bit file with
>>useful color palette from a 24 Bit Window.
>>
>>Good luck to all other programmers,
>>	Michael
>>
>>
>[kalender.jpg]
>>
>>[...]
>>RE: 8-bit vs. 24-bit/32-bit
>>
>>To be able to save an 8-bit bitmap, the bitmap has to be 8-bits. This could
>>be tricky if you are starting with a 24 or 32 bit display.
>>[...]
>>
>>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:25 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxDIE-00NKh4C>; Mon, 4 Jan 1999 17:55:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA01718; Mon, 4 Jan 1999 17:36:30 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3690FEB3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 4 Jan 1999 08:29:48 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] GFW
X-UIDL: 20f7b1d81e345c7627684b9b9604d806

Hi Eldon,
You might send a message to gfasoft@compuserve.com. I'm sure they can tell
you what you need to do.
dale

----- Original Message -----
From: ELDON EADIE <eeadie@iul-ccs.com>
To: <gfabasic@aachen.linux.de>
Sent: Sunday, January 03, 1999 7:21 PM
Subject: [GFA] GFW


>I just purchased the GFW system and the interpreter is in German.  Is
>there a way to switch it to English.  If not, it is completely useless
>to me, as I don't speek the language.
>
>Eldon Eadie
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 04 23:08:26 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxGDG-00NJiuC>; Mon, 4 Jan 1999 21:02:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA02051; Mon, 4 Jan 1999 20:46:28 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36912B3C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990104194552.IETY23444@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 4 Jan 1999 19:45:52 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 4 Jan 1999 19:45:52 +0000
Subject: Re: [GFA] GFW
X-UIDL: c6a4b57b2a547346f9d7a365307dd4bf

Dean's response was the correct one.  Why don't they mention it in the manual?
I don't know why I didn't think of it - had to ask a yr ago, myself.  Maybe it
should have the lable "Preferences"?
<G>
TomR.


At 08:29 AM 04/01/99 -0800, you wrote:
>Hi Eldon,
>You might send a message to gfasoft@compuserve.com. I'm sure they can tell
>you what you need to do.
>dale
>
>----- Original Message -----
>From: ELDON EADIE <eeadie@iul-ccs.com>
>To: <gfabasic@aachen.linux.de>
>Sent: Sunday, January 03, 1999 7:21 PM
>Subject: [GFA] GFW
>
>
>>I just purchased the GFW system and the interpreter is in German.  Is
>>there a way to switch it to English.  If not, it is completely useless
>>to me, as I don't speek the language.
>>
>>Eldon Eadie
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:06:51 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxRvq-00MqNYC>; Tue, 5 Jan 1999 09:33:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA03469; Tue, 5 Jan 1999 09:16:27 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3691DB06.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 Jan 1999 09:13:51 +0100
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: WG: [GFA] save *.bmp, 8-bit
X-UIDL: 31d3241745c669b40fbe9bce4b2c2d25

Tom

Wallpapers (in Win 3.x) can be (nearly) any BMP (not GIF) format (can be
checked with Paintshop, etc.), and that's the point: I'd like to use a
small file format which still looks fine, so compressed with 8 Bit would
be good for my calendar wall paper (because when saving with 24 bits, it
gets a size of some MEGA bytes !)
Because I'm not able to get this result automatically, I'm using
PaintShop to convert the 24 bit to a 256 color image file. So if there
is a tool (Rimmer GWS ?) or - better - a GFA code doing this en passant,
it would be great.

I've done a lot of experiments with palettes, with no useful results
until now. It seems to be that you have to do everything of the BMP file
(description in http://www.dcs.ed.ac.uk/~mxr/gfx/2d/BMP.txt), pixel per
pixel by hand with GFA code (what won't be very fast)
On the other hand, I'm not sure if GFA itself will be the cause of
color/palette problems.

Michael.

{ e.g. the following lines produce a yellow rectangle when using a color
depth of 24+ Bit)

OPENW #1,0,0,0,0,0
FULLW #1
hBACK& = LOADBMP("C:\windows\xxxx.bmp")   // use a bitmap

PUT 0,0,hBACK&

FOR x& = 0 TO 199
  FOR y& = 0 TO 199
    PSET x&,y&,POINT(x&,y&)
  NEXT y&
NEXT x&
}

>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Montag, 04. Januar 1999 15:20
>An: 	gfabasic@aachen.linux.de
>Betreff: 	Re: WG: [GFA] save *.bmp, 8-bit
>
>Michael
>On this computer, wallpaper can be any colordepth & can even be compressed.
>All that is demanded is that the file be a *.bmp in truth (has the "BM" 
>file identifier as the first byte) & bears *.bmp as an extent.  The actual
>image can even be RLE, which I find is NOT limited to 4- & 8- bits.  I run
>16-bit HiColor, & this thing makes excellent RLEs at 16-bits.
>
>Logo screens images, however, WILL BE 8-bit!  They'll be 126K & 320x400!
>Can't run an RLE of any flavor for these.  They must contain the 1st byte
>"BM" & carry *.sys as an extent.
>
>I found that Rimmer's GWS can convert to 8-bit fairly nicely.  I want to do
>it in GFA-W!!!!!  I can "make up" an 8-bit w/ one of Hamstra's routines,
>but have yet to succeed in imposing it on an image during a save at any color
>depth display.  I don't understand enough yet about the pallet to get away
>with it.
>
>One other way to get there is to convert the file to *.gif (compressed or
>not - the pallet is forced!), then to *.bmp but... *this* step has to be 
>done in GFA-W w/ the display set to 8-bit!  Leave it at 16-bit or higher,
>it'll impose a 16-bit save nearly every time.  The rules seem to change
>according to the weather.
>
>I posted a chart the other day that proves the theory that RLE can be just
>about any color depth - each one has a different compression factor!  That
>took several hours to accomplish, but was something I wanted to know.  I have
>a bitmaph() written w/ help from Eberhard F. that will display a ton of info
>on *.bmp, but it has no printout yet.
>
>If you figure how to impose a pallet for the save, PLEASE let me know how.
>
><G>
>TomR.
>
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:06:56 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxTka-00NKh0C>; Tue, 5 Jan 1999 11:30:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA03673; Tue, 5 Jan 1999 11:11:29 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3691F5E9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 Jan 1999 11:05:15 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: [GFA] Bitmap help please (2)

X-UIDL: 4a8150c1ded22641c83dee7fe2bfae67

There wasn't any return to my first asking, so I try it in English again for all 
the people, who are not understanding the german language. 

1st
I have a very great Bitmap with about 7 MB. I'm loading it with 
bmp&=Loadbmp("weltkart.bmp") and I am showing only parts of it.
Now I like to change some parts of this Bitmap with putting some smaller Bitmaps 
in it (override), but I don't have any idea anymore. I think I can use BITBLT, 
but it seems not to Work (don't change anything.) The bitmaps already have 
the same Colordepth.

2nd
Dit somebody know how to get the name of the user who is loged on with GFA BASIC 
( NETWORK The first Question you had to answer when the Computer starts with 
Win). 

3rd ( NO GFA Question )
And what can I make to force an answer at this Input. ( Abort at this moment and 
the Computer STARTS also ?!?!?. 
 
Help welcomed.

M.f.G.
Wilhelm Bckmann
Email Bueckmann.W@T-Online.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:22 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxVpl-00NJijC>; Tue, 5 Jan 1999 13:43:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA03947; Tue, 5 Jan 1999 13:26:30 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3692159C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990105122217.MJPT18419@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 5 Jan 1999 12:22:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Tue, 5 Jan 1999 12:22:17 +0000
Subject: Re: [GFA] Bitmap help please (2)
X-UIDL: 62a4f795d891fce28b423d7cbc85cb6c

Willi
I don't think you are being ignored.  When you ask a question that nobody knows
the answer to, nobody responds.  Often, it seems that the problem should have
been worked out years ago since GFA-W is not new & is very sophistocated.  In
*this* case, I sometimes get the response "it's very difficult".  If it wasn't
difficult, I wouldn't have asked help!  It would be fairly simple to show me
the answer to the question, I'd think!  It usually proves out that somebody has
done exactly what I asked & I sometimes find my answer just by going through
each & every exampla I can find.

If I run across an answer to the pasting one image into another, I'll pass it
along to you... I'm trying to resolve working w/ images, too.

The network question... sorry - wouldn't know one if it kissed me <G>.

<G>
TomR.


At 11:05 AM 05/01/99 +0100, you wrote:
>There wasn't any return to my first asking, so I try it in English again
for all 
>the people, who are not understanding the german language. 
>
>1st
>I have a very great Bitmap with about 7 MB. I'm loading it with 
>bmp&=Loadbmp("weltkart.bmp") and I am showing only parts of it.
>Now I like to change some parts of this Bitmap with putting some smaller
Bitmaps 
>in it (override), but I don't have any idea anymore. I think I can use BITBLT, 
>but it seems not to Work (don't change anything.) The bitmaps already have 
>the same Colordepth.
>
>2nd
>Dit somebody know how to get the name of the user who is loged on with GFA
BASIC 
>( NETWORK The first Question you had to answer when the Computer starts with 
>Win). 
>
>3rd ( NO GFA Question )
>And what can I make to force an answer at this Input. ( Abort at this
moment and 
>the Computer STARTS also ?!?!?. 
> 
>Help welcomed.
>
>M.f.G.
>Wilhelm Bckmann
>Email Bueckmann.W@T-Online.de
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:24 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxVqw-00NKShC>; Tue, 5 Jan 1999 13:44:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA03946; Tue, 5 Jan 1999 13:26:29 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3692159B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990105122211.MJPL18419@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 5 Jan 1999 12:22:11 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 5 Jan 1999 12:22:11 +0000
Subject: Re: AW: WG: [GFA] save *.bmp, 8-bit
X-UIDL: d7c77c414738b6859f95177d6e43ec82

At 09:13 AM 05/01/99 +0100, you wrote:
>Tom
>
>I've done a lot of experiments with palettes, with no useful results
>until now. It seems to be that you have to do everything of the BMP file
>(description in http://www.dcs.ed.ac.uk/~mxr/gfx/2d/BMP.txt), pixel per
>pixel by hand with GFA code (what won't be very fast)
>On the other hand, I'm not sure if GFA itself will be the cause of
>color/palette problems.
>
>Michael.
>
Hi, Boss
The "other hand" may have a hand on the problem!  The _REAL_ problem.

Win95+ logo screens are actually *.bmp (look inside) w/ *.sys for an
extension... ala MS!  This is funny - they have _VERY_ strict rules to
follow conserning the purity of the *.bmp format, then kick in a new
extension just to baffle people.  They're an odd size, they're stretched
to fit &... amazingly, they look good unless they contain small text.

IF a pallet imposition like *.gif could be worked into a *.bmp, I think
we'd be home free with this situation.  Almost any editor can convert
a 24-bit *.jpg to a decent-looking 8-bit *.gif!  No sweat, no strain!
Why the trouble getting 8-bit into a *.bmp?  Getting the 8-bit *.gif
converted to *.bmp is easy, but... if the display isn't in 8-bit, you
don't get an 8-bit *.bmp out of it & I have ABSOLUTELY NO IDEA where
the *.bmp aberition gets it's pallet - it seldom resembles the *.gif!

Good morning & greetings of the season.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:26 1999
Return-Path: <fxfarmer@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxWxo-00NKtYC>; Tue, 5 Jan 1999 14:56:04 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA04107; Tue, 5 Jan 1999 14:36:33 +0100
From: Bill Farmer <fxfarmer@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36922606.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 05 Jan 1999 08:32:41 -0500
X-Mailer: Mozilla 4.06 [en]C-RR082798  (Win95; I)
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="------------FCF54A8390D166721B68C438"
Subject: [GFA] Spin Button HELP
X-UIDL: 43803a2f3c258fd07e88bab3675eb223

Can anyone Help me with this one?  I want to use two (or more) Spin
Buttons in a receiver control program.  I can get one to work OK,  but
can't make the second one active...
-----
Tks,
Bill Farmer
Rockville, Md.
----


Attachment Converted: "c:\programme\eudora\attach\Spintest.lst"
From ???@??? Fri Jan 08 01:07:28 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxXA0-00NKtPC>; Tue, 5 Jan 1999 15:08:40 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA04141; Tue, 5 Jan 1999 14:51:28 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3692296C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 Jan 1999 14:51:57 +0100
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: AW: [GFA] Bitmap help please (2)
X-UIDL: 2af778d5c7f78291fef0e15757500146

Nice answer, 

but maybe the original question was also ignored because of the german
language (tja pech gehabt, junge).
The Network login name could be stored  into the variable _Name$, just
try it...

Michael


>----------
>Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>Gesendet: 	Dienstag, 05. Januar 1999 13:22
>An: 	gfabasic@aachen.linux.de
>Betreff: 	Re: [GFA] Bitmap help please (2)
>
>Willi
>I don't think you are being ignored.  When you ask a question that nobody
>knows
>the answer to, nobody responds.  Often, it seems that the problem should have
>been worked out years ago since GFA-W is not new & is very sophistocated.  In
>*this* case, I sometimes get the response "it's very difficult".  If it
>wasn't
>difficult, I wouldn't have asked help!  It would be fairly simple to show me
>the answer to the question, I'd think!  It usually proves out that somebody
>has
>done exactly what I asked & I sometimes find my answer just by going through
>each & every exampla I can find.
>
>If I run across an answer to the pasting one image into another, I'll pass it
>along to you... I'm trying to resolve working w/ images, too.
>
>The network question... sorry - wouldn't know one if it kissed me <G>.
>
><G>
>TomR.
>
>
>At 11:05 AM 05/01/99 +0100, you wrote:
>>There wasn't any return to my first asking, so I try it in English again
>for all 
>>the people, who are not understanding the german language. 
>>
>>1st
>>I have a very great Bitmap with about 7 MB. I'm loading it with 
>>bmp&=Loadbmp("weltkart.bmp") and I am showing only parts of it.
>>Now I like to change some parts of this Bitmap with putting some smaller
>Bitmaps 
>>in it (override), but I don't have any idea anymore. I think I can use
>>BITBLT, 
>>but it seems not to Work (don't change anything.) The bitmaps already have 
>>the same Colordepth.
>>
>>2nd
>>Dit somebody know how to get the name of the user who is loged on with GFA
>BASIC 
>>( NETWORK The first Question you had to answer when the Computer starts with
>>Win). 
>>
>>3rd ( NO GFA Question )
>>And what can I make to force an answer at this Input. ( Abort at this
>moment and 
>>the Computer STARTS also ?!?!?. 
>> 
>>Help welcomed.
>>
>>M.f.G.
>>Wilhelm Bckmann
>>Email Bueckmann.W@T-Online.de
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:30 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxXOF-00NKShC>; Tue, 5 Jan 1999 15:23:23 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA04191; Tue, 5 Jan 1999 15:06:28 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36922CF6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 Jan 1999 15:05:20 +0100
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: AW: WG: [GFA] save *.bmp, 8-bit
X-UIDL: 933fdb3f5bc826fca44c01b306d5f699

Hi Tom,

I do NOT use Win 95, so I'm not interested in logo-files :( 

By the way, it' not so new, that Microsoft is using a *.sys extenstion
for a bitmap - maybe the older still remember that the vgalogo.sys file
in the system directory of win 3.1 is the starting bitmap within the
win.com.

Part two is a little bit cryptic for me, as far as I am able to talk a
little bit german (with an austrian accent) and some words in italian,
french and english, I fear, I am to silly for your finish. *.JPG's and
*.Gif's are not usable for a Win-3.1 Wallpaper. Any graphic program
converts pictures to 256 colors, but that means (beside the problem to
implement that with gfa) to change pixels (dithering) and color palette.
Bad luck and nearly no chance for me to manage that.

Michael

>[
>The "other hand" may have a hand on the problem!  The _REAL_ problem.
>
>Win95+ logo screens are actually *.bmp (look inside) w/ *.sys for an
>extension... ala MS!  This is funny - they have _VERY_ strict rules to
>follow conserning the purity of the *.bmp format, then kick in a new
>extension just to baffle people.  They're an odd size, they're stretched
>to fit &... amazingly, they look good unless they contain small text.
>
>IF a pallet imposition like *.gif could be worked into a *.bmp, I think
>we'd be home free with this situation.  Almost any editor can convert
>a 24-bit *.jpg to a decent-looking 8-bit *.gif!  No sweat, no strain!
>Why the trouble getting 8-bit into a *.bmp?  Getting the 8-bit *.gif
>converted to *.bmp is easy, but... if the display isn't in 8-bit, you
>don't get an 8-bit *.bmp out of it & I have ABSOLUTELY NO IDEA where
>the *.bmp aberition gets it's pallet - it seldom resembles the *.gif!
>]

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:33 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxXSX-00NKhbC>; Tue, 5 Jan 1999 15:27:49 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA04218; Tue, 5 Jan 1999 15:11:27 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36922E23.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 Jan 1999 15:11:44 +0100
X-Mailer:  Microsoft Exchange Server Internet Mail Connector Version 4.0.995.52
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Subject: AW: [GFA] Spin Button HELP
X-UIDL: 391d4242ad5b7987fb2259543197c987

Bill,
  maybe you should play around with the following code...

Michael

-------

TITLEW #1,"Two SPIN Buttons"
OPENW #1
SCROLLBAR "",100,100,100,24,24,SB_VERT
EDITTEXT "BW",101,60,100,40,24,WS_BORDER
CB WIN(1),0 TO -1,xmsg
'
SCROLLBAR "",200,300,100,24,24,SB_VERT          	/// !!! ///
EDITTEXT " Vu",201,260,100,40,24,WS_BORDER	/// !!! ///
'CB WIN(2),0 TO -1,xxmsg
'
DO
  SLEEP
LOOP UNTIL MENU(1) = 4
'
PROCEDURE xmsg(h&,m&,w&,l%)
  LOCAL qq%
  SELECT m&
  CASE WM_VSCROLL
    PRINT HEX$(l% >> 24),HEX$(DLGITEM(WIN(1),101) >>
8),HEX$(DLGITEM(WIN(1),201) >> 8)	/// !!! ///
    SWITCH w&
    CASE SB_LINEDOWN
      qq% = VAL(_WIN$(DLG(-1,101)))
      qq% --
      IF qq% < 0 THEN qq% = 0       //Range check
      _WIN$(DLG(-1,101)) = DEC$(qq%)
    CASE SB_LINEUP
      qq% = VAL(_WIN$(DLG(-1,101)))
      qq% ++
      IF qq% > 2000 THEN qq% = 2000 //Range check
      _WIN$(DLG(-1,101)) = DEC$(qq%)
    ENDSELECT
  ENDSELECT
RETURN


>----------
>Von: 	Bill Farmer[SMTP:fxfarmer@erols.com]
>Gesendet: 	Dienstag, 05. Januar 1999 14:32
>An: 	gfabasic@aachen.linux.de
>Betreff: 	[GFA] Spin Button HELP
>
><<Datei: Spintest.lst>>
>Can anyone Help me with this one?  I want to use two (or more) Spin
>Buttons in a receiver control program.  I can get one to work OK,  but
>can't make the second one active...
>-----
>Tks,
>Bill Farmer
>Rockville, Md.
>----
>
>
>

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:35 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxZ25-00NKswC>; Tue, 5 Jan 1999 17:08:37 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA04536; Tue, 5 Jan 1999 16:51:33 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369245A1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990105154705.GIRO14393@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 5 Jan 1999 15:47:05 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 5 Jan 1999 15:47:05 +0000
Subject: Re: AW: AW: WG: [GFA] save *.bmp, 8-bit
X-UIDL: 334f02694fa1c016e76bd1f76c15d237

At 03:05 PM 05/01/99 +0100, you wrote:
>Hi Tom,
>
>I do NOT use Win 95, so I'm not interested in logo-files :( 
>
+++ Ok - that's where I am, right now.  They make an excellent subject
for this discussion.  I get images in 24-bit *.jpg.  To convert those
to 8-bit *.bmp without totally losing the color scheme is difficult!

I had tried converting them to *.gif type 87a because that's always done
quite well & no big color loss.  Going from *.gif to *.bmp is a bastard!
If the display is NOT 8-bit, GFA=W can't make it an 8-bit *.bmp!  Many
fine commercial editors blow the colors, too - going from *.gif to *.bmp.

IF GFA-W is used to save 8-bit *.bmp, it's very good at an 8-bit display
with one exception... any shade of gray is converted to a corresponding 
shade of gold for some reason.  All other colors seem to do well.  If there
was some way to monitor this & prevent the conversion, *that* would serve
the purpose.

http://www.north.net/alchemy/alchemy.html

This is Rimmer's GWS home page.  GWS has the best success rate I've seen
for converting to 8-bit *.bmp.  *Some* stuff near black get speckled a
bit, but the image isn't a total wipe-out otherwise.

Wallpaper can be any form of *.bmp... 16-bit, compressed, etc.  For what
you are doing, set the display to 16-bit HiColor or 24-bit (if you have
enough VRAM to handle it).  Save as BI_RGB or BI_RLE8 - 16-bit NOT
compressed or 16-bit compressed..  If you run 24-bit, the images will be
saved at 24-bit.
<G>
TomR.



>By the way, it' not so new, that Microsoft is using a *.sys extenstion
>for a bitmap - maybe the older still remember that the vgalogo.sys file
>in the system directory of win 3.1 is the starting bitmap within the
>win.com.
>
>Part two is a little bit cryptic for me, as far as I am able to talk a
>little bit german (with an austrian accent) and some words in italian,
>french and english, I fear, I am to silly for your finish. *.JPG's and
>*.Gif's are not usable for a Win-3.1 Wallpaper. Any graphic program
>converts pictures to 256 colors, but that means (beside the problem to
>implement that with gfa) to change pixels (dithering) and color palette.
>Bad luck and nearly no chance for me to manage that.
>
>Michael
>
>>[
>>The "other hand" may have a hand on the problem!  The _REAL_ problem.
>>
>>Win95+ logo screens are actually *.bmp (look inside) w/ *.sys for an
>>extension... ala MS!  This is funny - they have _VERY_ strict rules to
>>follow conserning the purity of the *.bmp format, then kick in a new
>>extension just to baffle people.  They're an odd size, they're stretched
>>to fit &... amazingly, they look good unless they contain small text.
>>
>>IF a pallet imposition like *.gif could be worked into a *.bmp, I think
>>we'd be home free with this situation.  Almost any editor can convert
>>a 24-bit *.jpg to a decent-looking 8-bit *.gif!  No sweat, no strain!
>>Why the trouble getting 8-bit into a *.bmp?  Getting the 8-bit *.gif
>>converted to *.bmp is easy, but... if the display isn't in 8-bit, you
>>don't get an 8-bit *.bmp out of it & I have ABSOLUTELY NO IDEA where
>>the *.bmp aberition gets it's pallet - it seldom resembles the *.gif!
>>]
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:37 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxZ20-00NKt0C>; Tue, 5 Jan 1999 17:08:32 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA04537; Tue, 5 Jan 1999 16:51:35 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369245A0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 5 Jan 1999 10:45:28 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Bitmaps
X-UIDL: 5ebc93eaf674fdd84b8a2b1ab27b76b6

Hi,

Converting bitmaps is not easy. GFABasic is not the problem; when GFA loads
a .bmp it becomes a DDB (device dependent bitmap) so it has the same colour
depth as the display. Bitmap images stored in files are DIBs, (device
independent bitmaps) and they are not strictly speaking BMPs. 

To get anywhere with this stuff you have to work with the bits of the image
and that cant be done unless you have the bits. If you load a .bmp and
leave it as a DIB you may get somewhere. If you use LOADBMP the original
data from the file has already been altered in that it now has the depth of
the display; so you won't know what it was originally.

To make matters worse for Win95/Win98 16-bit images are stored as; 

Extract from MS:
=======================================================================
NOTE: The DIB engine in Windows 95 supports only RGB555 and RGB565 for
16-bit DIBs and only RGB888 for 32-bit DIBs.
=======================================================================

Which means that 16-bit images are stored with 5 or 6 bits per pixel. Very
difficult; 24/32-bit images stored as 8-bits per pixel are not so bad to
manipulate.

8-bit images require a palette which 16-bit and 24/32-bit images don't.

I know that doesnt help much, but some information is better than none.

Perhaps. :-)


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:38 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxZ5E-00NIpmC>; Tue, 5 Jan 1999 17:11:52 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA04541; Tue, 5 Jan 1999 16:51:59 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369245AC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990105154646.GIOE14393@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 5 Jan 1999 15:46:46 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 5 Jan 1999 15:46:46 +0000
Subject: Re: [GFA] Spin Button HELP
X-UIDL: d299284cb06c844c57cfb8d1c3b420ba

Bill
Been there, done that w/ 3.  Will hunt & send a bit later.  Are you
interested in running on Win3.1+ or strictly Win95+?  Makes a big 
difference because Win95+ has a spl spin control that won't work on
Win3.1+.
<G>
TomR.


At 08:32 AM 05/01/99 -0500, you wrote:
>Can anyone Help me with this one?  I want to use two (or more) Spin
>Buttons in a receiver control program.  I can get one to work OK,  but
>can't make the second one active...
>-----
>Tks,
>Bill Farmer
>Rockville, Md.
>----
>
>
>Attachment Converted: C:\WORLDNET\DOWNLOAD\Spintest.lst
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:39 1999
Return-Path: <fxfarmer@erols.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxa7w-00NKZKC>; Tue, 5 Jan 1999 18:18:44 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA04719; Tue, 5 Jan 1999 18:01:28 +0100
From: Bill Farmer <fxfarmer@erols.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36925607.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 05 Jan 1999 11:56:31 -0500
X-Mailer: Mozilla 4.06 [en]C-RR082798  (Win95; I)
MIME-Version: 1.0
References: <369245AC.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Spin Button HELP
X-UIDL: eb1c58d664631573ccf0124bd32e87dc

Thanks Tom,

    I'm kinda partial to WIN95 here now.  Will appreciate any examples
you can find for either WIN 3.1 or WIN95 though.  I seem to recall a
very early GFA Demo/example with a very busy GUI with spin buttons in it
but can't seem to locate it.

Tks,

Bill Farmer
Rockville, Md.





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:07:51 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxcmS-00NJlbC>; Tue, 5 Jan 1999 21:08:44 +0100 (MET)
Received: from aachen.linux.de (linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA05014; Tue, 5 Jan 1999 20:51:30 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36927DEA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 5 Jan 1999 11:42:45 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] DDE
X-UIDL: 1cfd364f77b2e12eafd91904d724fa21

[From]
Bob McCullough

Does anyone know of
an example listing of a GFA Basic program that does DDE?  I'd sure
appreciate it if you'd let me know where it is.

Thanks
I will pass along any answers to Bob.
Dale
http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:08:05 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxsBC-00NKtBC>; Wed, 6 Jan 1999 13:35:18 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA06634; Wed, 6 Jan 1999 12:51:28 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369360C2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 6 Jan 1999 12:48:13 +0100
References: <3692296C.BeroList-2.5.9@aachen.linux.de>
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: Re: AW: [GFA] Bitmap help please (2)

X-UIDL: 9934c939d50c5cacba42b0acbed27720

Vogel Michael schrieb:
> Nice answer, 
>
> but maybe the original question was also ignored because of the german
> language (tja pech gehabt, junge).
> The Network login name could be stored  into the variable _Name$, just
> try it...
>
> Michael
>
>
As I wrote my question the first time I'm new here, now I think that most People 
here are speaking english and I didn't know, they're speaking German too.
Because of this I asked then question newly. I never thought that I've been 
ignored (why).!!!

Als Ich die Frage gestellt hatte, war ich noch neu hier, heute glaube ich, das 
die meisten hier Englisch sprechen und ich weiss nicht, ob Sie auch deutsch 
vestehen. Deswegen habe Ich die Frage erneut gestellt. Ich war nie der Meinung, 
das man mich Ignoriert. ( wieso auch )!!!!

Thanks Michael for the help,
but the Variable _NAME$ only give me the name of the Workstation. What I need is 
the name of the User who ist Logging on. I need it, to give different User ( on 
1 PC ) different authority.

M.f.G.
Wilhelm Bckmann
Email Bueckmann.W@T-Online.de

P.S.

Tem gente aqui que falar portugues ??



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 08 01:08:09 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zxwMX-00NKtmC>; Wed, 6 Jan 1999 18:03:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA06863; Wed, 6 Jan 1999 14:56:46 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36937D19.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990106135321.JHMR29733@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 6 Jan 1999 13:53:21 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Wed, 6 Jan 1999 13:53:21 +0000
Subject: Re: AW: [GFA] Bitmap help please (2)
X-UIDL: a19f43947d5e76afcaeb47d17193446e

Willi
No Italain, French, Latvian, etc...
You can scout the registry for users, etc., on Win95+.  I donno how 3.1 did it.
If you don't have the little registry routine handy, will send.
<G>
TomR.


At 12:48 PM 06/01/99 +0100, you wrote:
>Vogel Michael schrieb:
>> Nice answer, 
>>
>> but maybe the original question was also ignored because of the german
>> language (tja pech gehabt, junge).
>> The Network login name could be stored  into the variable _Name$, just
>> try it...
>>
>> Michael
>>
>>
>As I wrote my question the first time I'm new here, now I think that most
People 
>here are speaking english and I didn't know, they're speaking German too.
>Because of this I asked then question newly. I never thought that I've been 
>ignored (why).!!!
>
>Als Ich die Frage gestellt hatte, war ich noch neu hier, heute glaube ich, das 
>die meisten hier Englisch sprechen und ich weiss nicht, ob Sie auch deutsch 
>vestehen. Deswegen habe Ich die Frage erneut gestellt. Ich war nie der
Meinung, 
>das man mich Ignoriert. ( wieso auch )!!!!
>
>Thanks Michael for the help,
>but the Variable _NAME$ only give me the name of the Workstation. What I
need is 
>the name of the User who ist Logging on. I need it, to give different User
( on 
>1 PC ) different authority.
>
>M.f.G.
>Wilhelm Bckmann
>Email Bueckmann.W@T-Online.de
>
>P.S.
>
>Tem gente aqui que falar portugues ??
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:24:56 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzMB0-00NLBtC>; Sun, 10 Jan 1999 15:49:14 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA17428; Sun, 10 Jan 1999 15:30:20 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3698CA5E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990108102902.KUYF22626@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 8 Jan 1999 10:29:02 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 8 Jan 1999 10:29:02 +0000
Subject: [GFA] 8-bit *.bmp   0801xx1-
X-UIDL: 2ef861e70779d13813b9602cd6511317

08/01/99 04:15:17 AM   8-bit *.bmp   0801xx1-

This is a bit involved, but it works!

Any image > 8-bits, in any format, can be made into an 8-bit *.bmp.
Go to: http://www.zetnet.co.uk/rad/index.html & download gif2bmp.zip,
4.7K, contains gif2bmp.dll (7.4K) & a VB *.bas file w/ the calls.

Included below is a GFA-W appl w/ translated calls.  It works.

_IF_ you can manage a decent conversion to *.gif type 87a, you can now
manage a decent conversion to 8-bit *.bmp!
<G>
TomR.
--------------------------- cut here -------------------------------

' gif2bmp.lst  getting an 8-bit *.bmp regardless of the display.
' In a decent image editor, convert any format to *.gif.
' Run gif2bmp.lst on the new *.gif image in any display color depth.
' If you got a decent *.gif, you get a decent *.bmp!
' gif2bmp.dll is available at: http://www.zetnet.co.uk/rad/index.html
' the *.dll is free.  TomR.

dv&  = _DRIVE
dr$ = DIR$(0)


DLL #1,"GIFTOBMP.DLL"       // open DLL
  DECL LONG GIFToBMP(l,l)   // import/export functions
ENDDLL

FILESELECT "*.gif","",file$
CHDRIVE dv&  // move it back to the drive this is on
CHDIR dr$    // put it in the same dir this is in

gif$ = file$ + CHR$(0)      // source file - null-terminated

cut& = RINSTR(file$,"\")
file1$ = RIGHT$(file$,LEN(file$) - cut&)
file1$ = LEFT$(file1$,LEN(file1$) - 3) + "bmp"
bmp$ = file1$ + CHR$(0)     // destination file - null-terminated
ret% = ^GIFToBMP(V:gif$,V:bmp$)  // call DLL-functions ("^")

FREEDLL 1          // free memory
END


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:24:58 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzMAV-00NLBwC>; Sun, 10 Jan 1999 15:48:43 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA17427; Sun, 10 Jan 1999 15:30:20 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3698CA5E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990110134542.IRYV11635@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 10 Jan 1999 13:45:42 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 10 Jan 1999 13:45:42 +0000
Subject: [GFA] image *.dll, 32-bit   1001xx1-
X-UIDL: ae98eff228a3ca9a4eb64552cecdf1c1

10/01/99 07:36:49 AM   image *.dll, 32-bit   1001xx1-

Request assistance.  I need help translating the calls to the 
following image *.dll.  I have two 16->32-bit thunking *.dlls 
(gfa32s.dll & wow32.dll) to interface it.  If someone will perform the 
translations for me, I will pay for the registration of a copy for 
her/him.  It is $25 (US).  This *.dll is very good & quite fast.

ImgDLL - a Win32 Image File Processing DLL

This DLL provides JPG, PNG, TIFF and BMP read and write support.
Also included are routines to do various image processing
functions such as 24-bit to 8-bit color quantization and
gray-scaling, resizing, sharpening and blurring,
DWORD-alignment utilities, image size querys, etc..

Note : GIF support has been disabled as of 9/23/97. If you
absolutely need GIF support, I may be able to help you. Ask.
----------------------------------------------------------
The *.dll I have does have *.gif in it, but the save is not compressed 
with LZW.  The resulting file is a little larger, but my image editors 
will load them.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:24:59 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzMCa-00NLBtC>; Sun, 10 Jan 1999 15:50:52 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA17473; Sun, 10 Jan 1999 15:35:18 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3698CB5A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 12:26:30(GMT) on January 10, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 10 Jan 1999 13:29:42 +0100
In-Reply-To: <36937D19.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] GFA Basic & Win 2000?
X-UIDL: 6e6b375f256b8f3136ec2272ccc1ab43

Hi!

I heard Microsoft will release another game called 2000 later this year and
beta testing is already running. 

Does anybody know if programs made with the 16 bit version of GFA Basic
will run on Windows 2000?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:00 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzMEd-00NLBtC>; Sun, 10 Jan 1999 15:52:59 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA17432; Sun, 10 Jan 1999 15:31:36 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3698CA72.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.05 118 121 101) with SMTP
          id <19990108083634.DAQF3660@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 8 Jan 1999 08:36:34 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 8 Jan 1999 08:36:34 +0000
Subject: [GFA] Ulrich Becker
X-UIDL: ccd53bec82c59649a07d21991a0a7816

Does anybody have an e-mail adrs for Ulrich Becker?

I'd like to talk to him about owndraw.dll.

Thanks.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:02 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzOTR-00NLC2C>; Sun, 10 Jan 1999 18:16:25 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA17807; Sun, 10 Jan 1999 18:00:16 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3698ED66.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 9 Jan 1999 17:41:18 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: [GFA] Floodfill Help please & 2 Bitmap solution

X-UIDL: 47a3b40fcd8b9e2d5daf56f1f82040d8

Listing to copy one Bitmap into another.

Listing um ein Bitmap in ein anderes (greres) copieren.
Solution : 2 MEMDCs !!!!
Lsung: 2 MEMDCs !!!!
FULLW #1
hd1& = MEMDC(_DC(1))                 // create Memory-DCs anlegen
hd2& = MEMDC(_DC(1))
hb2& = LOADBMP("c:\windows\GFAWIN\welt.bmp")
hb3& = LOADBMP("c:\windows\GFAWIN\1.bmp")
~ SelectObject(hd1&,hb2&)
~ SelectObject(hd2&,hb3&)
f% = BitBlt(hd1&,10,10,32,16,hd2&,0,0,$00cc0020) 
FREEDC (hd1&)                 // Free DC freigeben
FREEDC (hd2&)                 // Free DC freigeben
PUT 0,0,h2&
KEYGET a&
FREEBMP h2&
FREEBMP h3&
KEYGET a&

Nur noch eines: mssen die MEMDCs der Bitmapgre angepasst werden ??
Das Programm funktioniert jedenfalls auch wenn welt.bmp grer als der 
Bildschirm ist.

One Qustion left: I don't know, if it's a Problem that the MEMDC isn't then same 
size as the Bitmaps. The Programm also works when the first Bitmap (welt.bmp) is 
greater than the screen.


Once again Help Please:
Dann brauche ich nochmals Hilfe: 
Listing:
FULLW #1
h& = MEMDC(_DC(1))                 // create Memory-DC anlegen,
COLOR 0
BOX 10,10,50,50
COLOR 4    /* irgendeine  anyone   qualquer un
DEFFILL 7  /* irgendeine  anyone
f1&  = FloodFill(_DC(1),40,40,0)  // Win API, direkt gehts mit Color und deffill
// Win API,direct on the DC works with Color und deffill.
DELAY 1
get 0,0,100,100,h2& /* or 
/* h2& = LOADBMP("c:\windows\GFAWIN\gen2.bmp")
CLS
put 0,0,h2&
COLOR 50   /* irgendeine  anyone   quelquer un
DEFFILL 7  /* irgendeine  anyone
~SelectObject(h&,h2&)
/* hier anpassen /* change here it works!! aqui trocar
f1& = FloodFill(h&,40,40,0) /* diese funktion geht / fllt wei!!! 
                              /* und ohne ?!? Color und deffill?!?! 
/* works without Color and Pattern why ???
FREEDC (h&)                 // Free DC freigeben
PUT 130,130,h2&
FREEBMP h1&
FREEBMP h2&
KEYGET a&

Hat jemand eine Idee wie ich etwas Farbe in die Sache bekomme.
(ein Fllmuster ist fr mich hier nicht so wichtig) 
Wenn ich hierfr eine eigene Palette bentige, so brauche ich Info ber die 
LOGPALETTE Datenstruktur. Seite 151 GFA WinAPI CreatePalette()

Somebody here, who has an idea how to use colors with the bitmaphandle.
Maybe I need a own colorpalette, did somebody know about the LOGPALETTE 
Datastructure. Page 151 GFA WinAPI CreatePalette()

M.f.G.
Wilhelm Bckmann
Email Bueckmann.W@T-Online.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:05 1999
Return-Path: <CompuHelp@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzPNe-00NLBtC>; Sun, 10 Jan 1999 19:14:30 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA17916; Sun, 10 Jan 1999 18:55:17 +0100
From: CompuHelp@t-online.de (CompuHelp@T-Online.de)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <3698FA41.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 8 Jan 1999 14:47:04 +0100
X-Mailer: T-Online eMail 2.0
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 0675893545-0001@t-online.de
Subject: [GFA] Control Window

X-UIDL: c99953e5931a3f541bdaa43c0793affa

Hi All !

I wish you all a Happy New Year 1999 !!!


I use a Program (not GFA) to play Music Files, that uses Keystrokes
to move forward or backward or to stop, etc...

Now I will control this Program from GFA-W.

But I dont know how to send a Message to this Program to control it
from my GFA-W Program !

I think some of you can help me !

Thank you, Ren


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:09 1999
Return-Path: <W.Schindler@josefstal.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzQuL-00NKhfC>; Sun, 10 Jan 1999 20:52:21 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA18276; Sun, 10 Jan 1999 20:35:21 +0100
From: Wolfgang Schindler <W.Schindler@josefstal.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369911C2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  by popmail.space.net with SMTP; 7 Jan 1999 10:30:26 -0000
Date: Thu, 07 Jan 1999 11:10:15 +0100
Organization: Studienzentrum Josefstal
X-Mailer: Mozilla 4.05 [de]C-NECCK  (Win95; I)
MIME-Version: 1.0
References: <368228F3.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Subject: Re: [GFA]

X-UIDL: bce7f2cca37d40b4b7f754ea8c826429

und was ist nun der vertrauliche INHALT???

BZB (Betz Martin ) schrieb:
> 
> **********************************************************************
> This email and any files transmitted with it are confidential and
> intended solely for the use of the individual or entity to whom they
> are addressed. If you have received this email in error please notify
> the system manager.
> 
> This footnote also confirms that this email message has been swept by
> MIMEsweeper for the presence of computer viruses.
> **********************************************************************
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

-- 

mit freundlichen / herzlichen Gren

Wolfgang Schindler 

-----------------------

http://www.josefstal.de

Unseren Newsletter bekommt man mit
mailto:mac_info-subscribe@josefstal.de	
(ohne Nachricht und Betreff)



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:15 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzWYO-00NLBkC>; Mon, 11 Jan 1999 02:54:04 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA18790; Mon, 11 Jan 1999 01:45:19 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36995A62.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 10 Jan 1999 16:37:49 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] NEW DOWNLOADS
X-UIDL: 16dfb6018b85f22b86e9ba2483124c0d

Don't miss MYOWNSUB.ZIP by Ulrich Becker and VTOOLSRC.ZIP by   Georg
Veichtlbauer.  These are both fantastic learning tools and both include
their own DLLs.  These files greatly enhance the GFAWHELP files for
downloading. If you find them useful, and you will, send a thank you message
to the authors. You can do that right from the download area.

Dale Bryant

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:17 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzWZ0-00NLBkC>; Mon, 11 Jan 1999 02:54:42 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA18791; Mon, 11 Jan 1999 01:45:22 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36995A62.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 10 Jan 1999 16:40:47 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] address
X-UIDL: a19f090e45ae5118c01b548827361457

If any of you have a email address for Ulrich Becker please send it to me.
Thank you,
Dale Bryant

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:18 1999
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzXIQ-00NKtcC>; Mon, 11 Jan 1999 03:41:38 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA18994; Mon, 11 Jan 1999 03:25:17 +0100
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369971B5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 7 Jan 1999 14:31:55 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
Importance: Normal
In-Reply-To: <36927DEA.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] RE: DDE
X-UIDL: 21addf3d22626ec15b5ed685c2d917d8

>> Does anyone know of an example listing of a GFA Basic program that does
DDE?<<

Dale,

I have a 2 part program (Client.gfw & Server.gfw) which I found very useful when
I was first getting started with DDE a few years ago.

The files originate from the GFA Compuserve Library. I have not seen them
uploaded to any other library since then. Unfortunately, I cannot remember the
original author's name. Although I do remember that (at that time) he was happy
to provide this sample code for the benefit of other GFA programmers.

If you (or anyone else on this list) would like this example, please e-mail me
direct and I will forward it to you.

Kindest Regards
Dave Barton



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:26 1999
Return-Path: <W.Schindler@josefstal.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzirW-00NLEkC>; Mon, 11 Jan 1999 16:02:38 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA20433; Mon, 11 Jan 1999 15:40:20 +0100
From: Wolfgang Schindler <W.Schindler@josefstal.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369A1E36.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
  by popmail.space.net with SMTP; 11 Jan 1999 14:35:26 -0000
Date: Mon, 11 Jan 1999 10:15:32 +0100
Organization: Studienzentrum Josefstal
X-Mailer: Mozilla 4.05 [de]C-NECCK  (Win95; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <369971B5.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Subject: Re: [GFA] RE: DDE

X-UIDL: 0776b36c111a8531718287dd727b00ce

Hi Dave,


> >> Does anyone know of an example listing of a GFA Basic program that does DDE?<<
> 
> I have a 2 part program (Client.gfw & Server.gfw)

> If you (or anyone else on this list) would like this example, please e-mail me direct and I will forward it to you.

I would be very interested to read those two files. Thank You.
Why dont' you put it on here ?!

mit freundlichen / herzlichen Gren

Wolfgang Schindler 

-----------------------

http://www.josefstal.de

Unseren Newsletter bekommt man mit
mailto:mac_info-subscribe@josefstal.de	
(ohne Nachricht und Betreff)



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:27 1999
Return-Path: <W.Schindler@josefstal.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzis0-00NKU6C>; Mon, 11 Jan 1999 16:03:08 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA20431; Mon, 11 Jan 1999 15:40:18 +0100
From: Wolfgang Schindler <W.Schindler@josefstal.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369A1E38.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  by popmail.space.net with SMTP; 11 Jan 1999 14:35:26 -0000
Date: Mon, 11 Jan 1999 10:15:32 +0100
Organization: Studienzentrum Josefstal
X-Mailer: Mozilla 4.05 [de]C-NECCK  (Win95; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <369971B5.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Subject: Re: [GFA] RE: DDE

X-UIDL: 3829f67efb2eaf13f448d5c13aa2ebf8

Hi Dave,


> >> Does anyone know of an example listing of a GFA Basic program that does DDE?<<
> 
> I have a 2 part program (Client.gfw & Server.gfw)

> If you (or anyone else on this list) would like this example, please e-mail me direct and I will forward it to you.

I would be very interested to read those two files. Thank You.
Why dont' you put it on here ?!

mit freundlichen / herzlichen Gren

Wolfgang Schindler 

-----------------------

http://www.josefstal.de

Unseren Newsletter bekommt man mit
mailto:mac_info-subscribe@josefstal.de	
(ohne Nachricht und Betreff)



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:31 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m0zzkV3-00NL3DC>; Mon, 11 Jan 1999 17:47:33 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA20659; Mon, 11 Jan 1999 17:30:17 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369A37C3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 11 Jan 1999 08:25:13 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] RE: DDE
X-UIDL: f7ab568dc15598030b6669175995c85d

To:Wolfgang Schindler

The GFA mail list does not allow attachments. Send me a message to
adbryant@man.com and I will attach files to a personal message and send them
to you. I also think I will make them available for down load from the
GFAWHELP web site.


-----Original Message-----
From: Wolfgang Schindler <W.Schindler@josefstal.de>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Cc: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Monday, January 11, 1999 6:42 AM
Subject: Re: [GFA] RE: DDE


>Hi Dave,
>
>
>> >> Does anyone know of an example listing of a GFA Basic program that
does DDE?<<
>>
>> I have a 2 part program (Client.gfw & Server.gfw)
>
>> If you (or anyone else on this list) would like this example, please
e-mail me direct and I will forward it to you.
>
>I would be very interested to read those two files. Thank You.
>Why dont' you put it on here ?!
>
>mit freundlichen / herzlichen Gren
>
>Wolfgang Schindler
>
>-----------------------
>
>http://www.josefstal.de
>
>Unseren Newsletter bekommt man mit
>mailto:mac_info-subscribe@josefstal.de
>(ohne Nachricht und Betreff)
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 11 21:25:34 1999
Return-Path: <adbryant@msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from smtp.email.msn.com (207.68.143.160) with esmtp
	  id <m0zznCn-00MZSUC>; Mon, 11 Jan 1999 20:40:53 +0100 (MET)
Received: from default - 208.251.149.196 by email.msn.com with Microsoft SMTPSVC;
	 Mon, 11 Jan 1999 11:16:11 -0800
From:     Dale Bryant <adbryant@msn.com>
To:        <adbryant@msn.com>
Subject: GFANL116
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Message-ID: <0386a1116190b19UPIMSSMTPUSR04@email.msn.com>
Date: 11 Jan 1999 11:16:21 -0800
X-UIDL: d45dcab9838fa9689e1cd55112d1d1a5

The Not Affiliated With GFA News Letter
GFA-BASIC USERS NEWS LETTER.116
This news letter is not affiliated with GFA.
***********************************
* The GFA BASIC Free News Letter  *
* Exploring The Power Of GFA      *
* Send News & Contributions To:   * 
* adbryant@msn.com                *
***********************************
* Not Affiliated With GFA         *
***********************************
GFA-BASIC USERS NEWS LETTER. 116 * 

[From Joe Hurst}

Hi Dale,

Here are some remarks to the last newsletter, including GIF-
Loader and
perhaps the Linker-Problem-Solution.
Don't panic, this mail doesn't contain any critic :-)

 [Q]
 In the GFA Basic Interpreter, push the button 'Variable',
 I can see all variables of my source code in a window.
 But there are also variables, which are older one
 and never more in use.
 How I can eliminate these variables from my source code?
The described solution isn't very "intelligent". Use "Write" 
from the filemenu, then kill file in interpreter, then load 
textfile in interpreter via "Merge" and then, use "Save as".
If another application uses the clipboard meanwhile doing the
clipboard-solution of Eberhard, the source is gone with the 
bits, away, futschikato, wech,... Don't cry then, Eberhard :-)

How to get color in a Dialog Box *

COLOR is !!!NOT THE SAME AS!!! RGBCOLOR. For proper coding, use 
always RGBCOLOR. One does not need GETNEAREST in all 
circumstances. If you have only a screen-color-depth of 16 
(VGA-Standard), GETNEAREST will not bring better colors than 
RGBCOLOR, because there are no more than 16 possibles, so
why use it?
Instead, always work with RGBCOLOR, and forget about COLOR 
GETNEAREST, at all, forget about COLOR, it is in my optinion 
only a pig-command for compatibility with GFABASIC ATARI ST.
Two examples:
> RGBCOLOR RGB((i% - 1) * 127.5,(j% MOD 3) * 127.5,INT(j% /
Here he does correct.

> COLOR black&
> BOX 296 + (j% - 1) * 19,25 + (i% - 1) * 19,295 + j% *
> 19,24 + i% * 19
Here I do not understand. Does RGBCOLOR not work for the BOX-
command?

> /* COLOR GETNEAREST(255,255,255) /* white& doesn't work
> for some reason
> /* RGBCOLOR white /* this works
Sure, RGBCOLOR always works.
> COLOR 19 /* this also
Another pig-way :-)



> Do you happen to have a .gif loader/saver?
I have a loader, works half-fine, half-ugly.

// Gif_LOADER
// Uebertragen aus PowerBasic von Eckhard Renner
//
'PROGRAM LIMITATIONS
' - Requires a color graphics card.
' - Does not have the capability to do interlacing.
' - Will only read the first image.
' - Will sometimes run out of memory when handling large or 
very detailed
' images. If this happens within PB, try compiling it to an 
EXE file,
' exiting PB, and running the .EXE file in DOS.
' - It will recognize a global color table, but not a local 
color table.
This
' is not a major problem, however, as a lot of the GIF files I 
have seen
have
' only a global color table.
' - The first part is mind-numbingly slow.

DEFINT "A-Z"
DIM STABLE$(4096)
DIM GLOBMAP$(255)
DIM D%(255)
OPEN "i",#1,"coyote.gif"
GOSUB GetScreenDescr
P% = 13 //

IF M$ = "1" THEN
FOR S% = 12 TO (2 ^ PX%) * 3 + 9 STEP 3
DE& = 0
FOR G% = 0 TO 2
SEEK #1,G% + S% + 1
BYTE$ = ""
BYTE$ = INPUT$(1,#1)
D%(G%) = ASC(BYTE$)
NEXT G%
C% = 0
IF D%(0) > 222 THEN
IF D%(1) > 222 THEN
IF D%(2) > 222 THEN
C% = 15
ELSE
C% = 14
ENDIF
ELSE
IF D%(2) > 222 THEN
C% = 13
ELSE
C% = 12
ENDIF
ENDIF
ELSE
IF D%(0) > 105 THEN
IF D%(1) > 105 THEN
IF D%(2) > 105 THEN
C% = 7
ELSE
C% = 6
ENDIF
ELSE
IF D%(2) > 105 THEN
C% = 5
ELSE
C% = 4
ENDIF
ENDIF
ELSE
IF D%(1) > 105 THEN
IF D%(1) > 222 THEN
IF D%(2) > 222 THEN
C% = 11
ELSE
C% = 10
ENDIF
ELSE
IF D%(1) > 105 THEN
IF D%(2) > 105 THEN
C% = 3
ELSE
C% = 2
ENDIF
ELSE
IF D%(1) > 105 THEN
IF D%(2) > 105 THEN
C% = 9
ELSE
C% = 8
ENDIF
ELSE
IF D%(2) > 105 THEN
C% = 1
ELSE
C% = 0
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
CC% = (S% - 12) / 3
STABLE$(CC%) = CHR$(C% + 1)
GLOBMAP$(CC%) = CHR$(C% + 1)
NEXT S%
ENDIF

STLEN% = 2 ^ N% + 2
P% = S% + 1

DO
SEEK #1,P%
BYTE$ = INPUT$(1,#1)
IF ASC(BYTE$) = 44 THEN
MORE% = 1
GOSUB IMGDESCR
SEEK #1,P%
BYTE$ = INPUT$(1,#1)
P% = P% + 1
N% = ASC(BYTE$) //: M = N
M% = N%
CLC% = 2 ^ N%
EOI% = (2 ^ N%) + 1
SEEK #1,P%
BYTE$ = INPUT$(1,#1)
BS% = ASC(BYTE$)
BM% = P%
P% = P% + 1
DO
GOSUB GETCODE
IF D% = CLC% THEN
GOSUB initst
GOSUB GETCODE
ENDIF
IF D% < STLEN% THEN
PC$ = STABLE$(D%)
GOSUB printchar
STABLE$(STLEN%) = OLD$ + LEFT$(STABLE$(D%),1)
STLEN% = STLEN% + 1
IF STLEN% = (2 ^ (N% + 1)) THEN
N% = N% + 1
IF N% > 11 THEN N% = 11
ENDIF
OLD$ = STABLE$(D%)
ELSE
STABLE$(STLEN%) = OLD$ + LEFT$(OLD$,1)
PC$ = STABLE$(STLEN%)
GOSUB printchar
STLEN% = STLEN% + 1
IF D% = (2 ^ (N% + 1)) - 1 THEN
N% = N% + 1
IF N% > 11 THEN N% = 11
ENDIF
OLD$ = STABLE$(D%)
ENDIF
LOOP UNTIL D% = EOI%
ELSE
MORE% = 0
ENDIF
LOOP UNTIL MORE% <> 1
GOSUB UNCLE
INPUT dummy$
END
PROCEDURE GetScreenDescr
SEEK #1,0
a$ = INPUT$(5,#1)
PRINT "Gif Sign ";a$
SEEK #1,6
l$ = INPUT$(2,#1)
W% = WORD{V:l$}
PRINT "Screen Width ";W%
SEEK #1,8
l$ = INPUT$(2,#1)
H% = WORD{V:l$}
PRINT "Screen Height ";W%
SC% = 7 'Set screen size.
IF W% > 320 THEN SC% = 8
IF H% > 200 THEN SC% = 9
SEEK #1,10
BYTE$ = INPUT$(1,#1)
B$ = BIN$(ASC(BYTE$))
B$ = "0000000" + B$
B$ = RIGHT$(B$,8)
PRINT "Byte #4 of Screen Descriptor ---> "; B$
M$ = LEFT$(B$,1)
PRINT "M Value (If M=1 then Global Color Map follows 
Descriptor) ---> ";M$
CR% = VAL(MID$(B$,2,1)) * 4 + VAL(MID$(B$,3,1)) * 2 + 
VAL(MID$(B$,4,1)) +
1
PRINT "CR Value (cr+1 = # bits of color resolution,";CR%;"for 
this
file)---> ";MID$(B$,2,3)
SOR% = VAL(MID$(B$,5,1))
PRINT "Sort Flag --->";SOR%
PX% = VAL(MID$(B$,6,1)) * 4 + VAL(MID$(B$,7,1)) * 2 + 
VAL(MID$(B$,8,1)) +
1
PRINT "Pixel Value (pixel+1 = # bits/pixel in image,"; PX%; 
"for this
file,"
PRINT " which will give";2 ^ PX%;"colors.)--->
";MID$(B$,6,3)
SEEK #1,11
BYTE$ = INPUT$(1,#1)
B$ = BIN$(ASC(BYTE$))
B$ = "0000000" + B$
B$ = RIGHT$(B$,8)
PRINT "Background (color index of screen background -- color is 
defined
from "
PRINT " the Global color map or default map if none
specified.) ---> ";B$
SEEK #1,12
BYTE$ = INPUT$(1,#1)
B$ = BIN$(ASC(BYTE$))
B$ = "0000000" + B$
B$ = RIGHT$(B$,8)
? "Pixel Aspect Ratio Number --->";B$
RETURN
PROCEDURE IMGDESCR
P% = P% + 1
SEEK #1,P%
l$ = INPUT$(2,#1)
L% = WORD{V:l$}
PRINT "Image left pos ";L%
SEEK #1,P% + 2
l$ = INPUT$(2,#1)
R% = WORD{V:l$}
PRINT "Image down pos ";R%
SEEK #1,P% + 4
l$ = INPUT$(2,#1)
IW% = WORD{V:l$}
PRINT "Image width ";IW%
SEEK #1,P% + 6
l$ = INPUT$(2,#1)
IH% = WORD{V:l$}
PRINT "Image height ";IH%
SEEK #1,P% + 8
BYTE$ = INPUT$(1,#1)
PRINT "Byte 10 of Image Descriptor ";BIN$(ASC(BYTE$))
P% = P% + 9
RETURN
PROCEDURE GETCODE
IF LEN(BIGBYTE$) < 25 THEN
DO
SEEK #1,P%
BYTE$ = INPUT$(1,#1)
IF P% = BM% + BS% + 1 THEN
BM% = P%
BS% = ASC(BYTE$)
P% = P% + 1
SEEK #1,P%
BYTE$ = INPUT$(1,#1)
ELSE
P% = P% + 1
B$ = BIN$(ASC(BYTE$))
B$ = "0000000000000" + B$
B$ = RIGHT$(B$,8)
BIGBYTE$ = B$ + BIGBYTE$
ENDIF
LOOP UNTIL LEN(BIGBYTE$) > 25
ENDIF
F$ = "0000000000000000" + RIGHT$(BIGBYTE$,N% + 1)
F$ = RIGHT$(F$,12)
BIGBYTE$ = LEFT$(BIGBYTE$,LEN(BIGBYTE$) - N% - 1)

D%=VAL(RIGHT$(F$,1))+VAL(MID$(F$,8,1))*16+VAL(MID$(F$,7,1))*32+
VAL(MID$(F$,6
,1))*64+VAL(MID$(F$,5,1))*128+VAL(MID$(F$,4,1))*256
D% = D% + VAL(MID$(F$,3,1)) * 512 + VAL(MID$(F$,2,1)) * 1024 +
VAL(MID$(F$,1,1)) * 2048
D% = D% + VAL(MID$(F$,9,1)) * 8 + VAL(MID$(F$,10,1)) * 4 +
VAL(MID$(F$,11,1)) * 2
RETURN
PROCEDURE initst
LOCAL STT%
N% = M%
FOR STT% = CC% + 3 TO 4096
STABLE$(STT%) = ""
NEXT STT%
STLEN% = 2 ^ N% + 2
GOSUB GETCODE
PC$ = STABLE$(D%)
GOSUB printchar
OLD$ = STABLE$(D%)
RETURN
PROCEDURE printchar
CLEN% = LEN(PC$)
FOR PPIX% = 1 TO CLEN%
X% = X% + 1
IF X% > W% THEN
X% = 1
Y% = Y% + 1
IF Y% = IH% THEN GOSUB UNCLE
IF Y% = H% THEN GOSUB UNCLE
IF Y% > 350 THEN GOSUB UNCLE
ENDIF
ccc% = ASC(MID$(PC$,PPIX%,1)) - 1
PSET X% - 1 + L%,Y% + R%,ccc%
NEXT PPIX%
RETURN
PROCEDURE SCRENERR
SC% = SC% - 1
IF SC% < 7 THEN SC% = 2
RETURN
PROCEDURE UNCLE
CLOSE #1
RETURN
-----
Instead of doing GIFs with GFAWIN16, use this freeware lib:
"nviewl16.dll". I think it is on my homepage at AOL in the 
package "TMMT"
(The multimedia Tool)
Greetings to John, the GFA-BBOX is based on his "ToolTips"-
Application.


Problem with the GFA-Linker?
> I'm not sure when it get's tricky for the Linker, but maybe
> there the problems are appearing, if the sum of bitmaps and
> icons within the resource is about 20.
No, that is not the solution. I have a very private program 
with lots more of icons.
Check this idea out: if some of the icons are "double-icons" 
(the ICO-file contains two or more icons, this format comes 
with W95/NT), I think the result will not work properly.


Greetings, Joe
On Friday, I hope to get my finally URL: http://www.jhurst.de
*******************************

'The following comes from John Findlay

Start of listing; some lines may become split when this listing 
is copied! 

// 
===============================================================
==//
// Simple listing to open a window and display some text with 
font //
// escapement using the 'C' style with GFABASIC. //
// //
// Resizing the window will resize the text. //
// //
// //
// John Findlay //
// //
// 
===============================================================
==//

// 
===============================================================
==
// STRICT VAR REGIME, NO VARIABLE POSTFIX USED.
// 
===============================================================
==
DEFDBL "f" // 64 bit, floats
DEFINT "l" // 32 bit, longs
DEFWRD "h,n,w" // 16 bit, words
DEFBYT "ID" // 8 bit, bytes
DEFSTR "z" // 8 bit, array of chars/strings
DEFBIT "b" // 1 bit, bools
// 
===============================================================
===
// "Z" is used for strings because there can be a conflict when 
using
// certain Windows constants that begin with "S" with API 
calls.
// 
===============================================================
===

@WinMain()

PROCEDURE WinMain()

@MakeStructures() ' Initialise structures
@Init() ' Initialise variables
@CreateWindow() ' Open application Window

WHILE GetMessage(*msg., NULL, 0, 0) ' The message loop
~TranslateMessage(*msg.)
~DispatchMessage(*msg.)
WEND
'----------------------------------------------------------'
' Cleanup
'----------------------------------------------------------'
~DestroyWindow(hWndMain) ' Destroy window
~UnregisterClass(V:zClassName, _INSTANCE) ' Unregister class
RETURN
PROCEDURE WndProc(hWnd, wMessage, wParam, lParam)

SWITCH wMessage
'--------------------------------------------------------------
-
' Do any painting
'--------------------------------------------------------------
-
CASE WM_PAINT
~BeginPaint(hWnd, *ps.)
@DoPaint(hWnd)
~EndPaint(hWnd, *ps.)
RETVAL 0

'--------------------------------------------------------------
-
' On WM_CLOSE
'--------------------------------------------------------------
-
CASE WM_CLOSE
~DestroyWindow(hWnd)
RETVAL 0

'--------------------------------------------------------------
-
' On WM_DESTROY, terminate.
'--------------------------------------------------------------
-
CASE WM_DESTROY
~PostQuitMessage(0)
RETVAL 0

'--------------------------------------------------------------
-
' If we didn't handle it, pass to DefWindowProc.
'--------------------------------------------------------------
-
DEFAULT
RETVAL DefWindowProc(hWnd, wMessage, wParam, lParam)
ENDSELECT
RETURN
PROCEDURE Init()
'-------------------------------'
' Declare global variables '
'-------------------------------'
hWndMain = 0 ' Handle for main window
DIM lFanColour(9)
lFanColour(0) = RGB(255,0,0)
lFanColour(1) = RGB(128,0,0)
lFanColour(2) = RGB(255,128,0)
lFanColour(3) = RGB(80,80,0)
lFanColour(4) = RGB(80,255,0)
lFanColour(5) = RGB(0,128,0)
lFanColour(6) = RGB(0,128,255)
lFanColour(7) = RGB(0,0,255)
lFanColour(8) = RGB(128,128,128)
lFanColour(9) = RGB(255,0,0)

zFanText = "GFABasic for Windows"
zArcText = "True Type"
zGFAText = "GFABasic"

RETURN
PROCEDURE CreateWindow()

zClassName = "TheClass" + CHR$(0) ' Window Class Name
_CB (1) = WndProc(wwwl) ' Where to send
messages
wndClass.style = CS_HREDRAW | CS_VREDRAW ' WM_PAINT after
resizing
wndClass.lpFNWndProc = _CB(1) ' The window
procedure
wndClass.cbClsExtra = 0 ' Extra data store
wndClass.cbWndExtra = 0 ' Extra data store
wndClass.hInstance = _INSTANCE ' Instance of
program
wndClass.hIcon = LoadIcon(0,IDI_APPLICATION) ' Application Icon
wndClass.hCursor = LoadCursor(0,IDC_ARROW) ' Mouse image
wndClass.hbrBackground = GetStockObject(WHITE_BRUSH) ' 
Background colour
wndClass.lpszMenuName = NULL ' No Menu
wndClass.lpszClassName = V:zClassName ' Pointer to Class
Name

~RegisterClass(V:wndClass.) ' Register our
Class

hWndMain = CreateWindow(zClassName, "Font Demo", 
WS_OVERLAPPEDWINDOW, 0,
0, 546, 450, NULL, 0, _INSTANCE, 0)

~ShowWindow(hWndMain, SW_SHOW) ' Show the window
RETURN
PROCEDURE MakeStructures()

'------------------------'
' Message Structure '
'------------------------'
TYPE MSG:
- WORD hwnd
- WORD message
- WORD wParam
- LONG lParam
- LONG time
- WORD msgx
- WORD msgy
ENDTYPE
MSG: msg.

'------------------------'
' Window Class Structure '
'------------------------'
TYPE WNDCLASS:
- WORD style ' 2 bytes for the window style
- LONG lpFNWndProc ' Pointer to the window procedure
- WORD cbClsExtra ' Extra space
- WORD cbWndExtra ' Extra space
- WORD hInstance ' Program Instance handle
- WORD hIcon ' Program Icon handle
- WORD hCursor ' Handle for Cursor
- WORD hbrBackground ' Background colour
- LONG lpszMenuName ' Ptr to string menu
- LONG lpszClassName ' Ptr to Class name
ENDTYPE
WNDCLASS: wndClass.

'------------------------'
' Paintstruct Structure '
'------------------------'
TYPE PAINTSTRUCT:
- WORD hdc ' 2 bytes to hold the device context
- USHORT fErase ' 2 bytes; flagged TRUE by Windows
// RECT Structure
- WORD psleft, pstop, psright, psbottom
//===========
- USHORT fRestore ' Reserved
- USHORT fIncUpdate ' Reserved
- CHAR*16 rgbReserved$ ' Reserved
ENDTYPE
PAINTSTRUCT: ps.

'------------------------'
' Logfont Structure '
'------------------------'
TYPE LOGFONT:
- WORD lfHeight
- WORD lfWidth
- WORD lfEscapement
- WORD lfOrientation
- WORD lfWeight
- BYTE lfItalic
- BYTE lfUnderline
- BYTE lfStrikeOut
- BYTE lfCharSet
- BYTE lfOutPrecision
- BYTE lfClipPrecision
- BYTE lfQuality
- BYTE lfPitchAndFamily
- STRING *128 lfFaceName$
ENDTYPE
LOGFONT: FontRec.
LOGFONT: MainFontRec.
LOGFONT: CornerFontRec.
LOGFONT: GFAFontRec.

'------------------------'
' Rect Structure '
'------------------------'
TYPE RECT:
- WORD left
- WORD top
- WORD right
- WORD bottom
ENDTYPE
RECT: rect.

'------------------------'
' Point Structure '
'------------------------'
TYPE POINT:
- WORD x
- WORD y
ENDTYPE
POINT: pt.

'------------------------'
' Textmetric Structure '
'------------------------'
TYPE TEXTMETRIC:
- WORD tmHeight
- WORD tmAscent
- WORD tmDescent
- WORD tmInternalLeading
- WORD tmExternalLeading
- WORD tmAveCharWidth
- WORD tmMaxCharWidth
- WORD tmWeight
- BYTE tmItalic
- BYTE tmUnderlined
- BYTE tmStruckOut
- BYTE tmFirstChar
- BYTE tmLastChar
- BYTE tmDefaultChar
- BYTE tmBreakChar
- BYTE tmPitchAndFamily
- BYTE tmCharSet
- WORD tmOverhang
- WORD tmDigitizedAspectX
- WORD tmDigitizedAspectY
ENDTYPE
TEXTMETRIC: textmet.

RETURN
PROCEDURE DoPaint(hWnd)
LOCAL nRadius, nx, ny, nBaseWidth, n, nCnt = 0
LOCAL nDesiredExtent, fDeg2Rad = PI / 18

//------------------------------------------------------------
// Create the font data for the font
//------------------------------------------------------------
MainFontRec.lfHeight = 26
MainFontRec.lfWidth = 10
MainFontRec.lfEscapement = 0
MainFontRec.lfOrientation = 0
MainFontRec.lfWeight = FW_BOLD
MainFontRec.lfItalic = 0
MainFontRec.lfUnderline = 0
MainFontRec.lfStrikeOut = 0
MainFontRec.lfCharSet = ANSI_CHARSET
MainFontRec.lfOutPrecision = OUT_DEFAULT_PRECIS
MainFontRec.lfClipPrecision = CLIP_DEFAULT_PRECIS
MainFontRec.lfQuality = PROOF_QUALITY
MainFontRec.lfPitchAndFamily = VARIABLE_PITCH | FF_ROMAN
MainFontRec.lfFaceName$ = "Times New Roman"

// Copy into CornerFontRec.
CornerFontRec. = MainFontRec.

//------------------------------------------------------------
// Copy again into GFAFontRec, but switch to Arial typeface, 
new size
//------------------------------------------------------------
GFAFontRec. = MainFontRec.
GFAFontRec.lfHeight = 60
GFAFontRec.lfWidth = 0 // choose best width for this height
GFAFontRec.lfWeight = 900
GFAFontRec.lfFaceName$ = "Arial"

//------------------------------------------------------------
// Save device context; easiest way to preserve current state
//------------------------------------------------------------
~SaveDC(ps.hdc)

//------------------------------------------------------------
// Set initial font data (for TrueType logo)
//------------------------------------------------------------
FontRec. = CornerFontRec.
~SetBkMode(ps.hdc, TRANSPARENT)
~SetTextColor(ps.hdc, RGB(128,128,128))
FontRec.lfHeight = FontRec.lfHeight * 2
FontRec.lfWidth = FLOOR(FontRec.lfWidth * 2.1)

//------------------------------------------------------------
// Create the TrueType logo
//------------------------------------------------------------
~SelectObject(ps.hdc, CreateFontIndirect(*FontRec.))
~TextOut(ps.hdc, 18, 5, "T", 1)
~SetTextColor(ps.hdc, RGB(0, 0, 0))
~TextOut(ps.hdc, 32, 13, "T", 1)

//------------------------------------------------------------
// Determine window dimensions & set up fan text parameters
//------------------------------------------------------------
~GetClientRect(hWnd, *rect.)
FontRec. = MainFontRec.
~DeleteObject(SelectObject(ps.hdc, 
CreateFontIndirect(*FontRec.)))

~GetTextMetrics(ps.hdc, *textmet.)
~SetViewportOrg(ps.hdc, textmet.tmHeight + 2, 0)
@GetTextSize(zFanText)

nBaseWidth = pt.x
rect.right -= textmet.tmHeight + 2

//------------------------------------------------------------
// Get a "null brush" for drawing operations
//------------------------------------------------------------
~SelectObject(ps.hdc, GetStockObject(NULL_BRUSH))

//------------------------------------------------------------
// Draw the hub of the fan
//------------------------------------------------------------
nRadius = 120
~Ellipse(ps.hdc, -(nRadius - 5), -(nRadius - 5), (nRadius - 5), 
nRadius -
5)
~Ellipse(ps.hdc, -(nRadius - 10), -(nRadius - 10), (nRadius - 
10),
nRadius - 10)

~SetTextColor(ps.hdc, lFanColour(0))

FOR n = 27 TO 36

nx = ROUND(nRadius * COS(n * fDeg2Rad))
ny = ROUND(nRadius * SIN(-n * fDeg2Rad)) // -n because y axis 
is
inverted

nDesiredExtent = MAX(rect.right, rect.bottom) - 130
FontRec. = MainFontRec.
FontRec.lfEscapement = n * 100
FontRec.lfWidth = FLOOR((textmet.tmAveCharWidth) * 
(nDesiredExtent /
(nBaseWidth * 1.0)))

~DeleteObject(SelectObject(ps.hdc, 
CreateFontIndirect(*FontRec.)))
@GetTextSize(zFanText)

IF pt.x < nDesiredExtent
~SetTextJustification(ps.hdc, nDesiredExtent - pt.x, 3)
ENDIF
~SetTextColor(ps.hdc, lFanColour(n - 27))
~TextOut(ps.hdc, nx, ny, V:zFanText, LEN(zFanText))

//------------------------------------------------------------
// Clear justifier's internal error accumulator
//------------------------------------------------------------
~SetTextJustification(ps.hdc, 0, 0)

FontRec. = CornerFontRec.
FontRec.lfEscapement = (n + 10) * 100
FontRec.lfWidth = 0
~DeleteObject(SelectObject(ps.hdc, 
CreateFontIndirect(*FontRec.)))
~SetTextColor(ps.hdc, 0)
nx = FLOOR((nRadius - textmet.tmHeight - 5) * COS(n * 
fDeg2Rad))
ny = FLOOR((nRadius - textmet.tmHeight - 5) * SIN(-n * 
fDeg2Rad))
~TextOut(ps.hdc, nx, ny, V:zArcText + nCnt, 1)
nCnt ++
NEXT n

//------------------------------------------------------------
// Delete the fan font, selecting in the GFA text font
//------------------------------------------------------------
~DeleteObject(SelectObject(ps.hdc, 
CreateFontIndirect(*GFAFontRec.)))
@GetTextSize(zGFAText)

~SetTextColor(ps.hdc, RGB(0,0,0))

//-------------------------------------------------------------
------
// Write the GFA text in the lower right corner, with a shadow 
effect
//-------------------------------------------------------------
------
~TextOut(ps.hdc, rect.right - pt.x, rect.bottom - pt.y, 
V:zGFAText,
LEN(zGFAText))

~SetTextColor(ps.hdc, RGB(255,0,0))
~TextOut(ps.hdc, rect.right - pt.x - 4, rect.bottom - pt.y - 4,
V:zGFAText, LEN(zGFAText))

~DeleteObject(SelectObject(ps.hdc, 
GetStockObject(SYSTEM_FONT)))
~RestoreDC(ps.hdc, -1)

RETURN
PROCEDURE GetTextSize(VAR zText)
LOCAL lTextSize
//------------------------------------------------------------
// Get the width and height of string
//------------------------------------------------------------
lTextSize = GetTextExtent(ps.hdc, V:zText, LEN(zText))
pt.x = LOWORD(lTextSize)
pt.y = HIWORD(lTextSize)
RETURN
PROCEDURE dummy()
RETURN

***************************
[ED] Please send comments and code to adbryant@msn.com or 
adbryant@gfa.net.

Untill next week.
END OF GFANL116
  
  
To remove yourself from this list:
E-mail to: adbryant@msn.com with "REMOVE" in the subject line



From ???@??? Wed Jan 13 19:09:03 1999
Return-Path: <CompuHelp@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1000dw-00NKwtC>; Tue, 12 Jan 1999 11:01:48 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA22406; Tue, 12 Jan 1999 10:45:16 +0100
From: CompuHelp@t-online.de (CompuHelp@T-Online.de)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369B2A6F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 12 Jan 1999 10:38:35 +0100
X-Mailer: T-Online eMail 2.0
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 0675893545-0001@t-online.de
Subject: [GFA] Control Window

X-UIDL: c1fdd33f591dfff311ebdcce5ca21bfd

Hi All !

I use a Program (not GFA) to play Music Files, that uses Keystrokes
to move forward or backward or to stop, etc...

Now I will control this Program from GFA-W.

But I dont know how to send a Message to this Program to control it
from my GFA-W Program !

Can someone help me ?

Thank you, Ren



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jan 13 19:09:07 1999
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1002hl-00NKw1C>; Tue, 12 Jan 1999 13:13:53 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA22635; Tue, 12 Jan 1999 12:55:14 +0100
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369B48D9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Tue, 12 Jan 1999 12:34:54 +0100
In-Reply-To: <3698CB5A.BeroList-2.5.9@aachen.linux.de>
References: <36937D19.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] GFA Basic & Win 2000?
X-UIDL: ed0f9c6a8ff44a9c9e8e9d48b9c4370d

Yes, they do, with the same limitations as on Windows NT.
This is valid for the current beta only, of course.

Regards

Sven Thomas
GFA Software

At 13:29 10.01.99 +0100, you wrote:
>Hi!
>
>I heard Microsoft will release another game called 2000 later this year and
>beta testing is already running. 
>
>Does anybody know if programs made with the 16 bit version of GFA Basic
>will run on Windows 2000?
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>

+++ Attention: The domain startrek.in-trier.de is NO LONGER valid! +++
Use bero-online.ml.org instead, i.e. the new addresses are:
ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
gfa@bero-online.ml.org                GFA Support
root@bero-online.ml.org               technical questions regarding the
                                      server only
gfasoft@compuserve.com                general GFA related questions
gfabasic@bero-online.ml.org           GFA related Mailing List


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jan 13 19:09:13 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1007WK-00NL3GC>; Tue, 12 Jan 1999 18:22:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA23194; Tue, 12 Jan 1999 17:20:17 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369B87EC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 12 Jan 1999 11:15:25 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Control Window
X-UIDL: 22f04312fb4e01112a44fd8f552b5635

>> Now I will control this Program from GFA-W. 
But I dont know how to send a Message to this Program to control it
from my GFA-W Program !
Can someone help me ? <<

Ren,

Here's a beginning;

First get the window handle, then you can send it a message;

John
 
OPENW #1
hWnd& = FindWindow(NULL, "GFA-BASIC Help - gfawin.hlp")
IF hWnd&
  ~PostMessage(hWnd&, WM_DESTROY, 0, 0)
  PRINT "Message sent"
ELSE
  PRINT "Could not find window"
ENDIF
PRINT "PRESS A KEY"
KEYGET a%
CLOSEW #1
EDIT

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Jan 13 19:09:18 1999
Return-Path: <gertkorn@csi.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m100BY8-00NLByC>; Tue, 12 Jan 1999 22:40:32 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA23759; Tue, 12 Jan 1999 22:10:16 +0100
From: "Gert Korn" <gertkorn@csi.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369BCADA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Sender: gertkorn@csi.com
Date: Tue, 12 Jan 1999 22:06:33 +0100
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] E-Mail Adresse
X-UIDL: ea5bef6d5e624062e9dc68a90391f7aa

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-htm  

From ???@??? Wed Jan 13 19:09:33 1999
Return-Path: <peter.wollwage@ivoclar.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m100PuJ-00NLFbC>; Wed, 13 Jan 1999 14:00:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA25334; Wed, 13 Jan 1999 13:35:15 +0100
From: Wollwage Peter <peter.wollwage@ivoclar.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369CA3BC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 13 Jan 1999 13:32:36 +0100
Mime-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2232.9)
Content-Type: text/plain;

Subject: [GFA] GFA-Basic version4.38
X-UIDL: 193b251b0813a130fcf030b6d1f1bf24

Wieviel kostet GFA-Basic fr Windows Vrsion 4.38 und der Compiler 1.07?
Kann ein, mit einem lteren GFA-Basic geschriebenes Programm auf Windows
umgewandelt werden?
Ich wre froh, wenn Sie mir eine entsprechende Nachricht zukommen lassen
knnten.

Vielen Dank im Voraus

Peter Wollwage   

peter.wollwage@ivoclar.com


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jan 14 20:19:11 1999
Return-Path: <Hans.Meier@unibw-muenchen.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m100hio-00NLC0C>; Thu, 14 Jan 1999 09:01:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA27230; Thu, 14 Jan 1999 08:40:46 +0100
From: Hans meier <Hans.Meier@unibw-muenchen.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369DB047.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 14 Jan 1999 08:41:47 +0100
X-Mailer: Mozilla 4.05 [de] (Win95; I)
MIME-Version: 1.0
References: <369CA3BC.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Subject: Re: [GFA] GFA-Basic version4.38

X-UIDL: ff7d57e294269692f75b083f34c34a25

Hi Peter,

den aktuellen Preis erfhrst Du bei GFA-Systemtechnik in Mnchengladbach.

Das ltere GFA-Basic Prog. ist wohl eine DOS-Version. Falls Du nicht gerade
wie wild im System oder mit den Interrups hantierst wird es wohl auch mit
GFA W
laufen. Zumindest mit dem Interpreter. Kompiliert knnen je nach Programm
schon
Probleme entstehen und es ist eine Anpassung nach Windows-Spezifikationen
notwendig.
MfG


Wollwage Peter schrieb:

> Wieviel kostet GFA-Basic fr Windows Vrsion 4.38 und der Compiler 1.07?
> Kann ein, mit einem lteren GFA-Basic geschriebenes Programm auf Windows
> umgewandelt werden?
> Ich wre froh, wenn Sie mir eine entsprechende Nachricht zukommen lassen
> knnten.
>
> Vielen Dank im Voraus
>
> Peter Wollwage
>
> peter.wollwage@ivoclar.com
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jan 14 20:19:16 1999
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m100ikn-00NLEwC>; Thu, 14 Jan 1999 10:07:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA27367; Thu, 14 Jan 1999 09:50:45 +0100
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369DC095.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 14 Jan 1999 03:47:38 -0500
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: [GFA] FW: Real signs...
X-UIDL: 5b4aeecef24c283494c1c8adeb3ac6a1

Morning All:

                             -->Bev<--


-----Original Message-----
From: darlene surrency [mailto:angltwin@surfsouth.com] 
Sent: Tuesday, January 12, 1999 11:50 PM
To: Louise Brown
Subject: Fw: Real signs...

>
>1. IN A LAUNDROMAT:
>Automatic washing machines. Please remove all
>your clothes when the light goes out.
>
>2. IN A LONDON DEPARTMENT STORE:
>Bargain Basement Upstairs
>
>3. IN AN OFFICE:
>Would the person who took the step ladder yesterday
>please bring it back or further steps will be taken.
>
>4. IN ANOTHER OFFICE: 
>After the tea break staff should empty the
>teapot and stand upside down on the draining board.
>
>5. ON A CHURCH DOOR:
>This is the gate of Heaven. Enter ye all by this door.
>(This door is kept locked because of the draft. Please use side
>entrance)
>
>6. OUTSIDE A SECOND HAND SHOP:
>We exchange anything -- bicycles,
>washing machines etc. Why not bring your wife along 
>and get a wonderful bargain.
>
>7. NOTICE IN A DRY CLEANER'S WINDOW:
>Anyone leaving their garments here for more than 30 days will be
>disposed of.
>
>8. IN A HEALTH FOOD SHOP WINDOW:
>Closed due to illness.
>
>9. SPOTTED IN A SAFARI PARK: 
> Elephants Please Stay In Your Car
>
>10.  SEEN DURING A CONFERENCE: 
>For anyone who has children and
>doesn't know it, there is a day care on the  first floor.
>
>11. MESSAGE ON A LEAFLET: 
>If you cannot read, this leaflet will tell
>you how to get lessons.
>
>12.  ON A REPAIR SHOP DOOR:
>We can  repair anything (Please knock hard
>on the door - the bell doesn't work
>
>13. SPOTTED IN A TOILET IN A LONDON OFFICE BLOCK:
>Toilet out of order. Please use floor below.
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Jan 14 20:19:40 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m100rGb-00NKZRC>; Thu, 14 Jan 1999 19:13:13 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA28243; Thu, 14 Jan 1999 18:55:45 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369E4069.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 13 Jan 1999 18:00:28 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] New Files
X-UIDL: a003da68b7a1b1c096727d941085a3be

New Files on the GFAWHELP web page.
by Georg Veichtlbauer

VTOOLSD -Deutsch version
VTOOLSE- English version
VTLIBS - Library for both of the above.

These are fantastic learning tools so don't miss them.
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 15 18:35:01 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m100tAf-00NLFTC>; Thu, 14 Jan 1999 21:15:13 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA28451; Thu, 14 Jan 1999 20:55:44 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369E5C6F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 14 Jan 1999 11:49:00 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] FILES
X-UIDL: 33ff5b4eed549f12d658d10673a002aa

New Files on the GFAWHELP web page.
by Georg Veichtlbauer

VTOOLSD -Deutsch version -no .exe files included(220kb)
VTOOLSE- English version - no.exe files included(183kb)
VTLIBS - Library for both of the above.
The vtlibs.zip is needed for both versions
These are fantastic learning tools so don't miss them.

A special thanks to Georg for his willingness to share all the source code.


Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 15 18:35:05 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m100w0t-00NKwCC>; Fri, 15 Jan 1999 00:17:19 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA28770; Fri, 15 Jan 1999 00:00:44 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369E87C6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 14 Jan 1999 17:57:37 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] FW: Real signs...
X-UIDL: 6f99693cf98c21968cb311bf0ec855d0

My Favorite,

Seen on a public trash receptacle on the streets of Ann Arbor, Michigan:

                    " Trash Only "


Best Regards,
Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 15 18:35:08 1999
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1014DY-00NLF7C>; Fri, 15 Jan 1999 09:02:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA29728; Fri, 15 Jan 1999 08:45:44 +0100
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369F02D7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 15 Jan 1999 02:43:56 -0500
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Importance: Normal
Subject: [GFA]  Fw: True Story [radio talk show]
X-UIDL: 575ba82bfd869993aa7b1385b1fae445

Morning All: (adult content)

Date: Tuesday, January 12, 1999 10:28 PM
Subject: Fwd: [Fwd: FW: radio talk show]


>In a message dated 1/12/99 9:58:12 AM Eastern Standard Time,
>
>
><< Trick ending on this one
>  > > >  This is a beauty.
>  > > > This story occurred on Melbourne, Australia radio last week.......
>  > > >
>  > > > One of the FM stations has a competition where they ring someone
up, ask
>  > > > them three personal questions, ring their spouse or partner, ask
them the
>  > > > same three questions, if the answers are the same,  the couple win
a
>  > > > holiday to Bali.
>  > > >
>  > > > Last week the competition went like this:
>  > > >
>  > > > Presenter: Gidday its XXX-FM, do you want to play the game ?
>  > > >
>  > > > Brian: Yeah, sure.
>  > > >
>  > > > Presenter: O.K., Question 1 - When was the last time you had sex ?
>  > > >
>  > > > Brian: Ohhh, maaaate. Ha Ha, well, about 8 o'clock this morning.
>  > > >
>  > > > Presenter: And how long did it go for Brian ?
>  > > >
>  > > > Brian: Orrrrr .... about 10 minutes.
>  > > >
>  > > > Presenter: 10 minutes ? Good one. And where did you do it mate ?
>  > > >
>  > > > Brian: Ohhhh maaaaate, I can't say that.
>  > > >
>  > > > Presenter: There's a holiday to Bali at stake here Brian !
>  > > >
>  > > > Brian: O.K. ... O.K. ... On the kitchen table.
>  > > >
>  > > > Presenter: (and others in the room - much laughter). Good one
Brian, now
>  > > > is it O.K. for us to call your wife ?
>  > > >
>  > > > Brian: Yeah, alright.
>  > > >
>  > > > Presenter: Hi Sharelle, how are you ?
>  > > >
>  > > > Sharelle: Hi. Good thanks.
>  > > >
>  > > > Presenter: (Explains competition again) We've got Brian on the
other
>  > > > line, say hello.
>  > > >
>  > > > Sharelle: Hi Brian.
>  > > >
>  > > > Brian: Hi Sharelle.
>  > > >
>  > > > Pesenter: Now Sharelle, we're going to ask you the same three
questions
>  > > > we asked Brian and if you give the same answers, you win a  trip
for two
>  > > > to Bali.
>  > > >
>  > > > Brian: Just tell the truth Honey.
>  > > >
>  > > > Sharelle: O.K.
>  > > >
>  > > > Presenter: Sharelle, when was the last time you had sex ?
>  > > >
>  > > > Sharelle: Oohhhh, noooooo. I can't say that on radio.
>  > > >
>  > > > Brian: Sharelle, it doesn't matter. I've already told them.
>  > > >
>  > > > Sharelle: O.K. ... About 8:00 this morning before Brian went to
work.
>  > > >
>  > > > Presenter: Good, nice start ! Next question. How long did it go for
>  > > > Sharelle ?
>  > > >
>  > > > Sharelle: (giggling) About 12, maybe 15 minutes.
>  > > >
>  > > > Co-Presenter: That's close enough ... Brian was just being a
gentleman.
>  > > >
>  > > > Presenter: O.K. Sharelle, final question.  Where did you do it ?
>  > > >
>  > > > Sharelle: Oh no I can't say that. My mum could be listening. No
way, no.
>  > > >
>  > > > Presenter: There's a trip to Bali on the line here.
>  > > >
>  > > > Brian: Sharelle, I've already told them so it doesn't matter
anyway..
>  > > > just tell em.
>  > > >
>  > > > Sharelle: Ohhhh .... alright .... Up the ass!
>  > > >
>  > > > Radio Silence
>  > > >
>  > > > Advertisement
>  > > >
>  > > > Presenter: Sorry if anyone was offended before, we're going live
here,
>  > > > and sometimes these things happen.
>  > > > Weve given Brian and Sharelle the holiday.  Now we'll take a music
>  > > > break.
>  >>
>
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 15 18:35:10 1999
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1014GG-00NLBdC>; Fri, 15 Jan 1999 09:05:44 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA29747; Fri, 15 Jan 1999 08:50:44 +0100
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369F03F2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 15 Jan 1999 02:44:15 -0500
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Importance: Normal
Subject: [GFA] FW: FW: The Monday morning commute...
X-UIDL: ee044f7a999c40cab6ce329ae753f9ef

Morning All:

Date: Tuesday, January 12, 1999 10:39 PM
Subject: Fwd: FW: The Monday morning commute...


>In a message dated 1/12/99 9:28:24 AM Eastern Standard Time,

>
><<
> As a senior citizen was driving down the freeway, his car phone rang.
>
> Answering, he heard his wife's voice urgently warning him, "Herman, I just
> heard on the news
> that there's a car going the wrong way on Interstate 128.  Please be
> careful!"
>
> "Hell," said Herman, "It's not just one car. It's hundreds of them!" >>
>
>
                             -->Bev<--


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 15 18:35:15 1999
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1014Vh-00NLG0C>; Fri, 15 Jan 1999 09:21:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA29798; Fri, 15 Jan 1999 09:05:46 +0100
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369F0792.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 15 Jan 1999 02:54:39 -0500
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Importance: Normal
Subject: [GFA] FW: More very bad jokes
X-UIDL: fbe3ca93e9ca122b1f1a53a448a970e5

Morning All:

Date: Tuesday, January 12, 1999 10:45 PM
Subject: Fwd: More very bad jokes


>In a message dated 1/12/99 9:23:44 AM Eastern Standard Time,

><< "Memories"
>     A ninety-year old man is sitting on a park bench, sobbing when a young
man
>     walks by and asks him what's wrong.
>
>    Through his tears the old man answers, "I'm in love with a twenty-five
>    year-old woman.""What's wrong with that?" asks the young man.
>    Between the sobs and sniffles, he answers, "You can't understand.
>
>   Every  morning before she goes to work we make love...At lunchtime she
comes
>   home and   we make love again, and then she makes my favorite meal. In
the
>   afternoon when she gets a break, she rushes home and gives me oral sex,
>   the best an old man   could want. And then at suppertime, and all night
long,
>   we make love." He breaks down, no longer able to speak.
>
>    The young man puts his arm around him. "I don't understand. It sounds
>    like you have the perfect relationship. Why are you crying?"
>
>   The old man answers,again through his tears, "I forgot where I live."
> ~*~*~*~*~*~*~*~*~*~*~
>  New Broom
>
>       A woman was waiting in the check-out line at a shopping center. Her
>  arms were laden with a mop and broom and other cleaning supplies.  By her
>  actions and deep sighs, it was obvious she was in a hurry and not happy
>  about the slowness of the line.
>       When the cashier called for a price check on a box of soap, the
woman
>  remarked indignantly, "Well, I'll be lucky to get out of here and home
before
> Christmas!"  "Don't worry, ma'am," replied the clerk.  "With that wind
kicking
> up out there and that brand new broom you have there, you'll be home in no
> time!"
> ~*~*~*~*~*~*~*~*~*~*~
> A surgeon went to check on his very famous patient after an operation.
> She was awake, so he examined her.
> She asked, "How long will it be before I am able to have a normal sex life
> again doctor."
> The surgeon seemed to pause, which alarmed the girl.
> "What's the matter Doctor? I will be all right won't I?"
> He replied, "Yes, you'll be fine, Miss Lewinsky. It's just that no one has
> ever asked me that after having their tonsils out."
> ~*~*~*~*~*~*~*~*~*~*~
> This little boy wakes up 3 nights in a row when he hears a thumping
> sound coming from his parents room. Finally one morning he goes to his mom
> and says, "Mommy, every night I hear you and daddy making noises and when
I
> look in your bedroom you're bouncing up and down on him."  His mom is
taken
> by surprise and says, "Oh, well I'm bouncing on his stomach because he's
fat
> and that makes him thin again."  And the boy says, "Well, that won't
work!"
> His mom says, "Why?!?" And the boy replies, "Because the lady next door
comes
> by after you leave each day and blows him back up!"
> ~*~*~*~*~*~*~*~*~*~*~
> A guy went to the middle of no where and picked up one of
> those new Mercedes. He was testing it out in the parking lot,
> turned on the radio and nothing happened. Furious, he
> demanded to see the plant manager, and told her "When I buy
> a $50,000 car I expect the damned radio to work."
>
> The plant manager explained to him that the radio had been
> programmed to his voice and all he had to do was tell the
> radio what he wanted to hear.  Pretty neat stuff.
>
> He got back into the car and said "Country music," and old
> Willie Nelson started singing.
>
> "Rock and roll," he exclaimed, and immediately Elvis started
> crooning.
>
> "Easy listening," he remarked, and all at once it sounded
> like he was in an elevator.
>
> He was relaxed, driving back to his home when a female driver
> cuts him off. He controls his temper but before he knows it
> another female driver cuts him off.
>
> "Stupid bitches!" he screamed.
>
> The radio immediately blurted out, "So tell me what you want
> what you really, really want..."
> ~*~*~*~*~*~*~*~*~*~*~
> A man is having problems with his dick which certainly had seen better
> times. He consults a doctor who, after a couple of tests, says, "Sorry,
but
> you've overdone it the last 30 years.  Your dick is burned out; you only
have
> 30 erections left in your penis."
>
>   The man walks home (deeply depressed); his wife is waiting for him at
the
> front door and asks him what the doctor said concerning his problem.  He
> tells her what the doc told him.  She says, "Oh no, only 30 times! We
> shouldn't waste that; we should make a list!"  He replies, "Yes, I already
> made a list on the way home.  Sorry, your name isn't on it."
> ~*~*~*~*~*~*~*~*~*~*~
>

                             -->Bev<--


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 15 18:35:19 1999
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1014W2-00NLFeC>; Fri, 15 Jan 1999 09:22:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA29797; Fri, 15 Jan 1999 09:05:45 +0100
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <369F0777.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 15 Jan 1999 03:00:39 -0500
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Importance: Normal
Subject: [GFA] FW: These are some bad jokes!!!
X-UIDL: 0f5043b52702c431bf02888d2c44a100

Morning All:

Date: Tuesday, January 12, 1999 10:56 PM
Subject: Fwd: These are some bad jokes!!!


>In a message dated 1/12/99 9:03:43 AM Eastern Standard Time,

>
><< Maria is a devoted, religious girl. She gets married and has 17
> children. Then her husband dies. She remarries two weeks later,
> and has 22 children by her next husband. Then he dies. A while
> later, she dies.
>
> At the funeral, the priest looks skyward and says, "At least
> they're finally together."
>
> A guy sitting in the front row says, "Excuse me father, but you
> do mean her and her FIRST husband, or her and her SECOND
> husband?"
>
> The priest says, "I mean her legs."
>
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>
> During the World War II, an American warship was attacked by
> the Japanese. A torpedo was heading towards the ship and a
> hit seemed inevitable. So the captain told the navigator to go
> down to the crew quarters and tell a joke or something - at
> least they would die laughing.
>
> The navigator went down and said to the crew, "What would
> you think if I could split the whole ship in two by hitting my dick
> against the table?"
>
> The crew burst laughing. So the navigator pulled his dick out
> and whammed it on the table. Just when the dick hit the table,
> a huge explosion tore the ship apart. The only survivors were
> the captain and the navigator.
>
> As they floated around in a lifeboat captain asked the navigator,
> "Well, the crew really laughed. What did you do?" The
> navigator told him.
>
> The captain replied, "Well, you better be careful with that dick
> of yours. The torpedo missed!"
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> One summer evening during a violent thunderstorm a mother
> was tucking her small boy into bed. She was about to turn off
> the light when he asked with a tremor in his voice, "Mommy,
> will you sleep with me tonight?"
>
> The mother smiled and gave him a reassuring hug. "I can't
> dear," she said. "I have to sleep in Daddy's room."
>
> A long silence was broken at last by his shaking little voice:
> "The big sissy." >>
>
>
                             -->Bev<--


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 17 22:03:50 1999
Return-Path: <gkorn@ewr-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m101epT-00NLKTC>; Sun, 17 Jan 1999 00:08:31 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA00910; Sat, 16 Jan 1999 23:50:13 +0100
From: "Gert Korn" <gkorn@ewr-online.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36A1288C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
Date: Sat, 16 Jan 1999 23:45:10 +0100
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Neue E-Mail Adresse
X-UIDL: c6f95fb17a5f38e7cdddeebd3921394b

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Thu Jan 21 17:45:56 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1039PF-00NL3bC>; Thu, 21 Jan 1999 02:59:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA11187; Thu, 21 Jan 1999 02:42:23 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36A696BE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 20 Jan 1999 20:41:49 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="f1d0c726-b0c9-11d2-b233-00805feabca1"
Subject: [GFA] clipboard resources
X-UIDL: 539708d2c68e1e23c8b61f05c8abe56a

I'm haveing trouble cleaning up after the clipboard.

The problem does not appear to be in the clipboard, but in my program.
Even when I comment out the Setclipboard() function, I still cannot avoid a
loss
of resouces. 

Any comments are welcome.

See attached file.

Brent



Attachment Converted: "c:\programme\eudora\attach\METCLIP2.LST"
From ???@??? Thu Jan 21 17:46:23 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m103KLp-00NOWzC>; Thu, 21 Jan 1999 14:40:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA12403; Thu, 21 Jan 1999 14:22:28 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36A73AD4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 21 Jan 1999 08:19:46 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] clipboard resources
X-UIDL: 06f362645433b9ef4f9ed4233c45bc12

Brent,

>Any comments are welcome.<

I did notice that taking out the 'RGBCOLOR' command resulted in no resource
loss.

Can't say why!!

Try using API GDI calls instead of GFA graphics. 

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 23 00:10:08 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m103Ovd-00NOAwC>; Thu, 21 Jan 1999 19:34:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA12908; Thu, 21 Jan 1999 19:17:31 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36A77FFF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 21 Jan 1999 12:45:17 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="ef58a8a2-b158-11d2-b41c-00805feae8d8"
Subject: [GFA] clipboard resources
X-UIDL: 7b5f5a538a9a706d80a2e3f22a5ceb47

>> I did notice that taking out the 'RGBCOLOR' command resulted in no
resource
loss  <<

Thats it.

The reason (as I discovered before, and already forgot) is that you cant
use any
GFA command which creates a hidden GDI handle within a metaile.
(color, rgbcolor, deffill, defline, clip). You must use the API functions
instead.
Otherwise, GFA somehow loses track of the handles.

Here's a corrected version.

Regards,

Brent


Attachment Converted: "c:\programme\eudora\attach\METACLP2.LST"
From ???@??? Sat Jan 23 00:11:00 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m103h8L-00NOXDC>; Fri, 22 Jan 1999 15:00:25 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA14824; Fri, 22 Jan 1999 14:27:53 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36A88DBB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 22 Jan 1999 08:26:49 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] clipboard resources
X-UIDL: d027673419fe9179819462d01358793b

Brent,

>Otherwise, GFA somehow loses track of the handles.<

Looks as if that's it.

Have to create and delete the GDI objects yourself.


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 23 00:11:46 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m103k3d-00NOASC>; Fri, 22 Jan 1999 18:07:45 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA15158; Fri, 22 Jan 1999 17:37:53 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36A8BA13.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 22 Jan 1999 08:32:32 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-Mimeole: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] UPDATE
X-UIDL: b1a0b2c81672da4f83cabb2713f4562a

Attention:
VTLIBSD.ZIP has had some of the files in the archive updated.
By Georg Veichtlbauer (Needs VTLIBS.ZIP)
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 24 15:54:52 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104BEp-00NLC0C>; Sat, 23 Jan 1999 23:09:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA01057; Sat, 23 Jan 1999 22:37:55 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AA520C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 23 Jan 1999 09:17:04 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] setup
X-UIDL: 41087c7cc3b96f86e616c65b03e29e2c

Could I hear some preferences on a decent setup program?
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 24 15:54:53 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104BXb-00NLFvC>; Sat, 23 Jan 1999 23:28:31 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA01102; Sat, 23 Jan 1999 22:57:08 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AA5666.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990123215628.BNXH19757@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 23 Jan 1999 21:56:28 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 23 Jan 1999 21:56:28 +0000
Subject: Re: [GFA] setup
X-UIDL: c59e8c62ab2860e58542d5dfc00a8d64

At 09:17 AM 23/01/99 -0800, you wrote:
>Could I hear some preferences on a decent setup program?
>Dale
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net
>

Sorry, Boss... I can't resist.

Pls define...

"Ok, setup straight & drink yer beer or I'm gonna."

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 24 15:54:54 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104FGF-00NLGqC>; Sun, 24 Jan 1999 03:26:51 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA01554; Sun, 24 Jan 1999 02:58:22 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AA8EF0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 23 Jan 1999 17:53:38 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] setup
X-UIDL: 218f0a0dc8889f7b0f4f3f27e556a87c

Your as  crazy as a bed bug.(G)

Setup:Installation software

-----Original Message-----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Saturday, January 23, 1999 1:57 PM
Subject: Re: [GFA] setup


>At 09:17 AM 23/01/99 -0800, you wrote:
>>Could I hear some preferences on a decent setup program?
>>Dale
>>
>>http://gfa.net/adbryant
>>http://gfawhelp.gfa.net
>>
>
>Sorry, Boss... I can't resist.
>
>Pls define...
>
>"Ok, setup straight & drink yer beer or I'm gonna."
>
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 25 22:59:47 1999
Return-Path: <AlanLennon@USA.NET>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104Sbo-00NLKIC>; Sun, 24 Jan 1999 17:42:00 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA02993; Sun, 24 Jan 1999 17:12:56 +0100
From: Alan Lennon <AlanLennon@USA.NET>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AB574C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 24 Jan 1999 16:09:55 +0000
X-Mailer: Mozilla 4.5 [en] (Win98; I)
X-Accept-Language: en
MIME-Version: 1.0
References: <36AA520C.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] setup
X-UIDL: f55d637063981fa26193c708b8c36bfb



Dale Bryant wrote:
> 
> Could I hear some preferences on a decent setup program?
> Dale
> 
I use Installshield Express. It's reasonably priced, easy to use, does
16 and 32 bit installations, and automatically generates uninstall
information for your application. There's also a professional version
but Express has been fine for my needs. They have a web site at
http://www.installshield.com/express

Regards   Alan Lennon

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 25 22:59:49 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104SlT-00NLITC>; Sun, 24 Jan 1999 17:51:59 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA03020; Sun, 24 Jan 1999 17:23:39 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AB59BC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 24 Jan 1999 08:18:41 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] setup
X-UIDL: c514086982e5e2d02ce40214d6573103

Thanks  Alan,
I will check it out today.
Dale

-----Original Message-----
From: Alan Lennon <AlanLennon@USA.NET>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Sunday, January 24, 1999 8:13 AM
Subject: Re: [GFA] setup


>
>
>Dale Bryant wrote:
>>
>> Could I hear some preferences on a decent setup program?
>> Dale
>>
>I use Installshield Express. It's reasonably priced, easy to use, does
>16 and 32 bit installations, and automatically generates uninstall
>information for your application. There's also a professional version
>but Express has been fine for my needs. They have a web site at
>http://www.installshield.com/express
>
>Regards   Alan Lennon
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 25 23:01:10 1999
Return-Path: <szalay@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104nal-00NOX1C>; Mon, 25 Jan 1999 16:06:19 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA05359; Mon, 25 Jan 1999 15:33:58 +0100
From: Andras Szalay <szalay@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AC91B5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 25 Jan 1999 09:33:14 -0500
Sender: Andras Szalay <szalay@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] UPDATE
X-UIDL: 4adae03ac71d3f04e6dfa6477f67a8d6

>>Attention:
>>VTLIBSD.ZIP has had some of the files in the archive updated.
>>By Georg Veichtlbauer (Needs VTLIBS.ZIP)
>>Dale
>>http://gfa.net/adbryant

Dale, where can this be found? I do not find it on your home page.

                Andras Szalay



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Jan 25 23:01:13 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104r7p-00NLL5C>; Mon, 25 Jan 1999 19:52:41 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA05744; Mon, 25 Jan 1999 19:23:06 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36ACC75C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 25 Jan 1999 10:17:58 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] UPDATE
X-UIDL: cf980ca35a13eee4e7a93b262a87d2ce

HI Andras,
Form the main page select the download button.  Scroll down until you find
the file.
Dale

-----Original Message-----
From: Andras Szalay <szalay@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: Monday, January 25, 1999 6:35 AM
Subject: [GFA] UPDATE


>>Attention:
>>VTLIBSD.ZIP has had some of the files in the archive updated.
>>By Georg Veichtlbauer (Needs VTLIBS.ZIP)
>>Dale
>>http://gfa.net/adbryant

Dale, where can this be found? I do not find it on your home page.

                Andras Szalay



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jan 26 21:08:01 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104wdA-00NLBhC>; Tue, 26 Jan 1999 01:45:24 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA06347; Tue, 26 Jan 1999 01:14:11 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AD19A0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 25 Jan 1999 16:09:10 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] gfanl118
X-UIDL: 5cfcfad3e6ec50bc68b0e8495d3ef8c3

If you did not receive the Not Affiliated With Gfa Newsletter #118 it is
available for download from the web site below.
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Jan 26 21:08:03 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m104xtk-00NLBhC>; Tue, 26 Jan 1999 03:06:36 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA06532; Tue, 26 Jan 1999 02:37:04 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AD2CFA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 25 Jan 1999 17:32:03 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3115.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] ADDRESS
X-UIDL: 6419a99afaca8d5c607d83c313314ab5

Do any of you have a different email address for K. Walmsley? The one below
seems to be no longer any good..
Dale
k.walmsley@uclan.ac.uk
http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:21 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105L7g-00NLH5C>; Wed, 27 Jan 1999 03:54:32 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA09011; Wed, 27 Jan 1999 03:23:12 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AE8973.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990127022257.CQEQ10932@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 27 Jan 1999 02:22:57 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 27 Jan 1999 02:22:57 +0000
Subject: [GFA] clarification, please
X-UIDL: ad829d316c7a24a5bc07d3e01530dd34

>From the Petzold collection... 

menudemo.lst  ' 10.1             MENUS PROG1

MenuResource:
DATA 30
DATA &File,&New|1,&Open...|2,&Save|3,Save &As...|4,-,E&xit|5,
DATA &Edit,&Undo|11,-,Cu&t|12,&Copy|13,&Paste|14,De&lete|15,
DATA &Bkgnd,&White|21,&Lt Gray|22,&Gray|23,&Black|24,
DATA &Timer,&Start|31,S&top|32,
DATA &Help,&Help...|41,&About...|42,,**

Above...

I don't understand the first statement.

The number following each pipe (|) is the CASE identifier used in SELECT 
routines - this is easily seen.

HOW are the data items counted?

  CASE 31 'start timer
    SETTIMER 10,1,1000
    MENU 23,MF_GRAYED,m$(23)
    MENU 24,MF_ENABLED,m$(24)
  CASE 32 'stop timer
    KILLTIMER 10,1
    MENU 24,MF_GRAYED,m$(24)
    MENU 23,MF_ENABLED,m$(23)

No matter how I count them, "&Start" & "S&top" do NOT come out 23 & 24!  
OK, they originally were 24 & 25, but I eliminated one item before them 
in the sequence,thereby dropping their numbers by "1".  Experimentation 
got the corrections made & working.

I don't find _ANYTHING_ in GFA-W's documentation that explains this 
numbering system.  I'd really like to know the rules... "cut & try" is 
NOT the way to good programming.

Between the "Programmer's Reference" & Sjouke Hamstra's "Programming in 
GFABASICfor Windows", I find some clarifgication of other questions, but 
*this* one is not mentioned in either resource.

Please, please, please, please......

Thank you
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:23 1999
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105N9n-00NLFeC>; Wed, 27 Jan 1999 06:04:51 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA09238; Wed, 27 Jan 1999 05:34:36 +0100
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AEA81A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 27 Jan 1999 12:29:28 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2110.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Re: Windows resolution
X-UIDL: 8d0a395d9c45e1befed1f49bb37f337d


I'm sure this question has been asked before but I don't recall ever seeing
an answer.

Is it possible to define the definition of the screen in Windows 95/98 from
within a gfw program? ie I wish to have a 640x480 window fill the screen
regardless of the resolution setting of the display - and set the screen
back to the original setting when leaving the program of course.

Mac Howard



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:31 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105TOU-00NOZgC>; Wed, 27 Jan 1999 12:44:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA09954; Wed, 27 Jan 1999 12:13:38 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AF05A3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990127111334.FKAS17249@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 27 Jan 1999 11:13:34 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 27 Jan 1999 11:13:34 +0000
Subject: Re: [GFA] Re: Windows resolution
X-UIDL: 43642e066494b72dbb9dade1adbb5bc5

Mac
Not sure this is what you want to see, but...
cx& = GETDEVCAPS(HORZRES)
cy& = GETDEVCAPS(VERTRES)
Now, position everything hor'ly & vert'ly in terms of cx& +/-n & cy& +/-n... 
everything will maintain it's positional relationship within the window 
regardless of the screen mode & you don't have to reset anything afterward.
<G>
TomR.


At 12:29 PM 27/01/99 +0800, you wrote:
>
>I'm sure this question has been asked before but I don't recall ever seeing
>an answer.
>
>Is it possible to define the definition of the screen in Windows 95/98 from
>within a gfw program? ie I wish to have a 640x480 window fill the screen
>regardless of the resolution setting of the display - and set the screen
>back to the original setting when leaving the program of course.
>
>Mac Howard
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:35 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105UH0-00NOZkC>; Wed, 27 Jan 1999 13:40:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA10068; Wed, 27 Jan 1999 13:09:56 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AF12CE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 27 Jan 1999 13:14:03 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.1960.3)
Content-Type: text/plain
Subject: AW: [GFA] clarification, please
X-UIDL: 7464affd34e78b267bcbe84a0e3d4a16


I have no idea, what the program will do for you, the number sceme can
be done however you want (in the example, it's just hierarchic: the
first ciffer is counted per menu, the second by item).

> ----------
> Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
> Gesendet: 	Mittwoch, 27. Januar 1999 03:22
> An: 	gfabasic@aachen.linux.de
> Betreff: 	[GFA] clarification, please
> 
> From the Petzold collection... 
> 
> menudemo.lst  ' 10.1             MENUS PROG1
> 
> MenuResource:
> DATA 30
> DATA &File,&New|1,&Open...|2,&Save|3,Save &As...|4,-,E&xit|5,
> DATA &Edit,&Undo|11,-,Cu&t|12,&Copy|13,&Paste|14,De&lete|15,
> DATA &Bkgnd,&White|21,&Lt Gray|22,&Gray|23,&Black|24,
> DATA &Timer,&Start|31,S&top|32,
> DATA &Help,&Help...|41,&About...|42,,**
> 
> Above...
> 
> I don't understand the first statement.
> 
> The number following each pipe (|) is the CASE identifier used in
> SELECT 
> routines - this is easily seen.
> 
> HOW are the data items counted?
> 
>   CASE 31 'start timer
>     SETTIMER 10,1,1000
>     MENU 23,MF_GRAYED,m$(23)
>     MENU 24,MF_ENABLED,m$(24)
>   CASE 32 'stop timer
>     KILLTIMER 10,1
>     MENU 24,MF_GRAYED,m$(24)
>     MENU 23,MF_ENABLED,m$(23)
> 
> No matter how I count them, "&Start" & "S&top" do NOT come out 23 &
> 24!  
> OK, they originally were 24 & 25, but I eliminated one item before
> them 
> in the sequence,thereby dropping their numbers by "1".
> Experimentation 
> got the corrections made & working.
> 
> I don't find _ANYTHING_ in GFA-W's documentation that explains this 
> numbering system.  I'd really like to know the rules... "cut & try" is
> 
> NOT the way to good programming.
> 
> Between the "Programmer's Reference" & Sjouke Hamstra's "Programming
> in 
> GFABASICfor Windows", I find some clarifgication of other questions,
> but 
> *this* one is not mentioned in either resource.
> 
> Please, please, please, please......
> 
> Thank you
> <G>
> TomR.
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:49 1999
Return-Path: <AlanLennon@USA.NET>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105cQq-00NOBBC>; Wed, 27 Jan 1999 22:23:28 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA10880; Wed, 27 Jan 1999 21:40:15 +0100
From: Alan Lennon <AlanLennon@USA.NET>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AF8A81.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 27 Jan 1999 20:37:11 +0000
X-Mailer: Mozilla 4.5 [en] (Win98; I)
X-Accept-Language: en
MIME-Version: 1.0
References: <36AE8973.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] clarification, please
X-UIDL: 982508b9e8bb046a1777c4be3370fa3d



Tom Record wrote:
> 
> >From the Petzold collection...
> 
> menudemo.lst  ' 10.1             MENUS PROG1
> 
> MenuResource:
> DATA 30
> DATA &File,&New|1,&Open...|2,&Save|3,Save &As...|4,-,E&xit|5,
> DATA &Edit,&Undo|11,-,Cu&t|12,&Copy|13,&Paste|14,De&lete|15,
> DATA &Bkgnd,&White|21,&Lt Gray|22,&Gray|23,&Black|24,
> DATA &Timer,&Start|31,S&top|32,
> DATA &Help,&Help...|41,&About...|42,,**
> 
> Above...
> 
> I don't understand the first statement.
> 
> The number following each pipe (|) is the CASE identifier used in SELECT
> routines - this is easily seen.
> 
> HOW are the data items counted?
> 
>   CASE 31 'start timer
>     SETTIMER 10,1,1000
>     MENU 23,MF_GRAYED,m$(23)
>     MENU 24,MF_ENABLED,m$(24)
>   CASE 32 'stop timer
>     KILLTIMER 10,1
>     MENU 24,MF_GRAYED,m$(24)
>     MENU 23,MF_ENABLED,m$(23)
> 
> No matter how I count them, "&Start" & "S&top" do NOT come out 23 & 24!
> OK, they originally were 24 & 25, but I eliminated one item before them
> in the sequence,thereby dropping their numbers by "1".  Experimentation
> got the corrections made & working.
> 
> I don't find _ANYTHING_ in GFA-W's documentation that explains this
> numbering system.  I'd really like to know the rules... "cut & try" is
> NOT the way to good programming.
> 
> Between the "Programmer's Reference" & Sjouke Hamstra's "Programming in
> GFABASICfor Windows", I find some clarifgication of other questions, but
> *this* one is not mentioned in either resource.
> 
> Please, please, please, please......
> 
> Thank you
> <G>
> TomR.

Tom, did you take into account that each data statement ends in a blank
item. The last thing in each statement is a comma which means eg the
first statement contains 8 items. Theres a null item at the end of the
data statement!!!

Does it count right now???

I have a much better and easier to understand menu creation and handling
method which I can email an example if it you would like.

By the way the "DATA 30" line is the total number of menu items (30)
prior to the ** item which I assume is used to terminate the menu
creation loop. I suspect it's a bit redundant as you can just loop
reading menu items until you get the ** but you haven't included enough
of the original code to tell.


Regards  Alan

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:52 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105eLa-00NIpmC>; Thu, 28 Jan 1999 00:26:10 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA11095; Wed, 27 Jan 1999 23:43:48 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFA75F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 27 Jan 1999 23:40:33 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
In-Reply-To: <36AEA81A.BeroList-2.5.9@aachen.linux.de>
Subject: AW: [GFA] Re: Windows resolution
X-UIDL: 73184db3810513e74999cf03871dce5e

> Is it possible to define the definition of the screen in Windows
> 95/98 from
> within a gfw program? ie I wish to have a 640x480 window fill the screen
> regardless of the resolution setting of the display - and set the screen
> back to the original setting when leaving the program of course.

Sorry, this is surely not what you want to hear: There is no reason for me
to not delete a pig-program from harddisc immediately that switches my
screen-resolution. Time-critical background-tasks like channels, running
mathmatical paintings like Mandelbrot-Sets, they will surely not survice
when such a pig-programm changes the resolution. A minimum/maximum
resolution requirement for a program shows only that the programmer wasn't
able to do resolution-independing programming! (But this only my poor
opinion.)

Greetings,
  Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:55 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105fbk-00NOZ7C>; Thu, 28 Jan 1999 01:46:56 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA11272; Thu, 28 Jan 1999 01:16:16 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFBD0E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990128001608.FAAN4126@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 28 Jan 1999 00:16:08 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 28 Jan 1999 00:16:08 +0000
Subject: Re: [GFA] clarification, please
X-UIDL: 59c167c76adf2d4eeedaba7d7a4d595e

Alan
THANK YOU!!!  The ending comma infers a last item.  This is sort of in
the Hamstra explanation but not so stated, exactly.  I didn't catch it.

DATA30... I didn't notice any comment or limiting statement in the code
anywhere but noticed that if the number is reduced, items beynd it are 
lost & don't appear.  *This* isn't mentioned in anything ai've studied.
"**" *is* the "end of data" demarcation "symbol".

I'd like to see *any* successful menu creation routine.  I'm not very
fond of this one, but it seems to be the most frequently used by those
who provide "study material".  My main "attraction" to it is having an
example or two of appending 2ndary levels of menu popups to it.

Thank you very much, Alan.  These items bother me every time I have to
look at doing a menu this way.
<G>
TomR.



At 08:37 PM 27/01/99 +0000, you wrote:
>
>
>Tom Record wrote:
>> 
>> >From the Petzold collection...
>> 
>> menudemo.lst  ' 10.1             MENUS PROG1
>> 
>> MenuResource:
>> DATA 30
>> DATA &File,&New|1,&Open...|2,&Save|3,Save &As...|4,-,E&xit|5,
>> DATA &Edit,&Undo|11,-,Cu&t|12,&Copy|13,&Paste|14,De&lete|15,
>> DATA &Bkgnd,&White|21,&Lt Gray|22,&Gray|23,&Black|24,
>> DATA &Timer,&Start|31,S&top|32,
>> DATA &Help,&Help...|41,&About...|42,,**
>> 
>> Above...
>> 
>> I don't understand the first statement.
>> 
>> The number following each pipe (|) is the CASE identifier used in SELECT
>> routines - this is easily seen.
>> 
>> HOW are the data items counted?
>> 
>>   CASE 31 'start timer
>>     SETTIMER 10,1,1000
>>     MENU 23,MF_GRAYED,m$(23)
>>     MENU 24,MF_ENABLED,m$(24)
>>   CASE 32 'stop timer
>>     KILLTIMER 10,1
>>     MENU 24,MF_GRAYED,m$(24)
>>     MENU 23,MF_ENABLED,m$(23)
>> 
>> No matter how I count them, "&Start" & "S&top" do NOT come out 23 & 24!
>> OK, they originally were 24 & 25, but I eliminated one item before them
>> in the sequence,thereby dropping their numbers by "1".  Experimentation
>> got the corrections made & working.
>> 
>> I don't find _ANYTHING_ in GFA-W's documentation that explains this
>> numbering system.  I'd really like to know the rules... "cut & try" is
>> NOT the way to good programming.
>> 
>> Between the "Programmer's Reference" & Sjouke Hamstra's "Programming in
>> GFABASICfor Windows", I find some clarifgication of other questions, but
>> *this* one is not mentioned in either resource.
>> 
>> Please, please, please, please......
>> 
>> Thank you
>> <G>
>> TomR.
>
>Tom, did you take into account that each data statement ends in a blank
>item. The last thing in each statement is a comma which means eg the
>first statement contains 8 items. Theres a null item at the end of the
>data statement!!!
>
>Does it count right now???
>
>I have a much better and easier to understand menu creation and handling
>method which I can email an example if it you would like.
>
>By the way the "DATA 30" line is the total number of menu items (30)
>prior to the ** item which I assume is used to terminate the menu
>creation loop. I suspect it's a bit redundant as you can just loop
>reading menu items until you get the ** but you haven't included enough
>of the original code to tell.
>
>
>Regards  Alan
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:57 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105h5u-00NIpmC>; Thu, 28 Jan 1999 03:22:10 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA11441; Thu, 28 Jan 1999 02:52:52 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFD3B3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 27 Jan 1999 17:47:54 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] Print Routrine
X-UIDL: c9acffbb97a2c29caf2d181e531d2d65

Eldon Eadie writes:
Are there any printer routines that work with Windows 95?  The one that
I am using causes the computer to hang half way thru the print sequence.

I will forward any answers,
Dale





http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:58 1999
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105hOm-00NLKUC>; Thu, 28 Jan 1999 03:41:40 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA11485; Thu, 28 Jan 1999 03:12:34 +0100
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFD846.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 Jan 1999 10:07:25 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2110.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] Re: Windows resolution
X-UIDL: adbd21cc01416a7eab88cf3ee11edf71

>there is no reason for me to not delete a pig-program from harddisc
immediately that switches my screen-resolution.<

The idea is to offer the option to the user. He will decide for himself
whether changing the resolution will cause problems with other applications.
However, I want to give him the option of doing this from within the program
rather than change the settings from the control panel.

>time crtical background-tasks like channels, running
>mathmatical paintings like Mandelbrot-Sets, they will surely not survice
>when such a pig-programm changes the resolution.<

In which case you would choose not to change the resolution and put up with
the inconvenience of the program operating within a window taking up only a
part of the screen. Others would choose to change to maximise the impact of
the program (a game) if this caused no problems.

>A minimum/maximum resolution requirement for a program shows only that the
programmer wasn't able to do resolution-independing programming! (But this
only my poor opinion.)

It's a poor opinion based on a hasty assumption. The program runs happily in
any resolution from 640x480 upwards. But, like the majority of Windows
programs, the size of text and graphics is reduced the higher the resolution
and the impact of the game is significantly compromised.

Scaling experiments have not proved successful because many of the graphics
items have 1/2/3 pixel elements and non-integer scaling factors (as for
800x600 resolutions) produce unpleasant effects. Some text is positioned
with a single pixel accuracy and non-integer scaling screws that up too.

Graphic elements could be duplicated for each problematic resolution and
switched in appropriately but in a 36,000 line, 150 plus screen program
that's a lot of work I'd rather not take on.

So, to change the resolution to 640x480, at the request of the user seems
like a good answer. At the moment he/she does it using the control panel
etc. I would prefer to offer the option from within the program.

Mac Howard




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:39:59 1999
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105hR6-00NLIuC>; Thu, 28 Jan 1999 03:44:04 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA11506; Thu, 28 Jan 1999 03:15:21 +0100
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFD8EA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 Jan 1999 09:38:39 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2110.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] Re: Windows resolution
X-UIDL: c13e484ed0ec9bef91f9d89732cc3947

>Mac
>Not sure this is what you want to see, but...
>cx& = GETDEVCAPS(HORZRES)
>cy& = GETDEVCAPS(VERTRES)
>Now, position everything hor'ly & vert'ly in terms of cx& +/-n & cy&
+/-n...

Thanks Tom. That's already done but the result is that the text and graphics
are correctly positioned but small when the resolution is high. Most
application software does that, of course, but the program's a game and the
impact very much reduced when seen as only a proportion of the screen size.

I could scale everything, but the program is a conversion of a DOS program
of over 36,000 lines of which 10,000 or more are text/box/line etc.
statements which will all need scaling. I'm reluctant to do that
particularly as many of the graphics items are 2/3 pixels wide and much of
the text positioned to a single pixel accuracy and, when the scaling factor
is not an integer, the result is very unpleasant.

I'm sure there must be some way of changing the resolution of the screen so
that the 640x480 pixel window fills the screen. With Win95 the change, via
control panel/display, on my machine at least, merely results in a brief
flicker and does not require that Windows be reloaded. Also, when the DOS
version of the game is used from within Windows the screen 18 statement
creates a DOS window that fills the screen with 640x480 regardless of the
original resolution setting. I'm not sure what is happening here but it
certainly isn't scaling. The solution to my problem is to produce the same
result with my 640x480 defined window in my gfw program.

Mac Howard

>everything will maintain it's positional relationship within the window
>regardless of the screen mode & you don't have to reset anything afterward.
><G>
>TomR.
>
>
>At 12:29 PM 27/01/99 +0800, you wrote:
>>
>>I'm sure this question has been asked before but I don't recall ever
seeing
>>an answer.
>>
>>Is it possible to define the definition of the screen in Windows 95/98
from
>>within a gfw program? ie I wish to have a 640x480 window fill the screen
>>regardless of the resolution setting of the display - and set the screen
>>back to the original setting when leaving the program of course.
>>
>>Mac Howard
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:01 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105hV1-00NOZRC>; Thu, 28 Jan 1999 03:48:07 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA11517; Thu, 28 Jan 1999 03:19:20 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFD9D8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 27 Jan 1999 17:45:00 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] NEW!
X-UIDL: eb22b35231c09d3646f13621ffcf839b

CTRL.ZIP from John Findlay has been added to the download list from the
GFAWHELP web pages.  Contains. GFW,EXE,DOC,DLL and more.
Hurry!
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:02 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105jk6-00NLH6C>; Thu, 28 Jan 1999 06:11:50 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA11811; Thu, 28 Jan 1999 05:41:56 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFFB43.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990128044117.EJCE13682@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 28 Jan 1999 04:41:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 28 Jan 1999 04:41:17 +0000
Subject: Re: [GFA] Re: Windows resolution
X-UIDL: 8754f8ef4ef16186cd2e43ae431a205e

Mac
Didn't see this.  Sorry.
OK - to get what you want requires one hell of a lot of work on your part!
DEVCAP positioning alone won't get the job done as you now describe it.

You will be forced to use DEVCAP SCALING!  Each dimension/position will
have to be translated on the basis of the dpi differences between 640x480
& the mode or resolution the computer is in.  You must find out how many
dpi is each screen.  640x480 is 96.  Anything larger is a bigger dpi!
There is the scale factor that will have to be applied to every dimension
in the window & it's graphics!  There is no way around this if you want 
to maintain objects at the same size despite the screen mode!
<G>
TomR.


At 09:38 AM 28/01/99 +0800, you wrote:
>>Mac
>>Not sure this is what you want to see, but...
>>cx& = GETDEVCAPS(HORZRES)
>>cy& = GETDEVCAPS(VERTRES)
>>Now, position everything hor'ly & vert'ly in terms of cx& +/-n & cy&
>+/-n...
>
>Thanks Tom. That's already done but the result is that the text and graphics
>are correctly positioned but small when the resolution is high. Most
>application software does that, of course, but the program's a game and the
>impact very much reduced when seen as only a proportion of the screen size.
>
>I could scale everything, but the program is a conversion of a DOS program
>of over 36,000 lines of which 10,000 or more are text/box/line etc.
>statements which will all need scaling. I'm reluctant to do that
>particularly as many of the graphics items are 2/3 pixels wide and much of
>the text positioned to a single pixel accuracy and, when the scaling factor
>is not an integer, the result is very unpleasant.
>
>I'm sure there must be some way of changing the resolution of the screen so
>that the 640x480 pixel window fills the screen. With Win95 the change, via
>control panel/display, on my machine at least, merely results in a brief
>flicker and does not require that Windows be reloaded. Also, when the DOS
>version of the game is used from within Windows the screen 18 statement
>creates a DOS window that fills the screen with 640x480 regardless of the
>original resolution setting. I'm not sure what is happening here but it
>certainly isn't scaling. The solution to my problem is to produce the same
>result with my 640x480 defined window in my gfw program.
>
>Mac Howard
>
>>everything will maintain it's positional relationship within the window
>>regardless of the screen mode & you don't have to reset anything afterward.
>><G>
>>TomR.
>>
>>
>>At 12:29 PM 27/01/99 +0800, you wrote:
>>>
>>>I'm sure this question has been asked before but I don't recall ever
>seeing
>>>an answer.
>>>
>>>Is it possible to define the definition of the screen in Windows 95/98
>from
>>>within a gfw program? ie I wish to have a 640x480 window fill the screen
>>>regardless of the resolution setting of the display - and set the screen
>>>back to the original setting when leaving the program of course.
>>>
>>>Mac Howard
>>>
>>>
>>>
>>>---
>>>This mailing list is currently running BeroList v2.5.6
>>>Report problems to bero@bero-online.ml.org
>>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:05 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105jk6-00NLIuC>; Thu, 28 Jan 1999 06:11:50 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA11805; Thu, 28 Jan 1999 05:41:11 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFFB3D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990128044108.EIZY13682@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 28 Jan 1999 04:41:08 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 28 Jan 1999 04:41:08 +0000
Subject: Re: [GFA] Print Routrine
X-UIDL: 25fb11ad4befc33abceebaa997479c9c

Print, Win95
Images?
Text?
Haven't been able to get the same one to do both.
Confess also to the fact that running ProgMan instead of Explorer does
often make big differences in several ways.
<G>
TomR.


At 05:47 PM 27/01/99 -0800, you wrote:
>Eldon Eadie writes:
>Are there any printer routines that work with Windows 95?  The one that
>I am using causes the computer to hang half way thru the print sequence.
>
>I will forward any answers,
>Dale
>
>
>
>
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:06 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105jjz-00NIpmC>; Thu, 28 Jan 1999 06:11:43 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA11807; Thu, 28 Jan 1999 05:41:18 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36AFFB3F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990128044112.EJAZ13682@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 28 Jan 1999 04:41:12 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 28 Jan 1999 04:41:12 +0000
Subject: Re: [GFA] Re: Windows resolution
X-UIDL: 09da43ebb0958315960616ddea61edee

Mac
Going w/ GETDEVCAPS & using them to position each item maintains each item's
size, it changes ONLY positioning per screan resolution.  Bear in mind, Sir...
a 75 dpi image does NOT measure 1 inch at any resolution but possibly 320x200.
640x480 resolution is _96_ dpi (dpi being dots (pixels) per inch).  Each larger
screen resolution has higher dpi, making everything appear smaller.  I *THINK*
75 dpi (*.gif resolution) applies only to 320x200 but am not sure.

If you use DEVCAPS, apply them ONLY to the origin, UL co-ordinates.  The screen
resolution will take care of moving things around & maintaining respective
positions & sizes.  What is sickening to *ME* is the programmer that makes all
screens 800x600 & it can't be altered.  I don't ever see the whole screen
because
I run 640x480.  God forbid I get into one w/ a larger screen resolution!

As for the "narrow minded" response you got... BRAVO, JOE!  I delete a lot of
otherwise good shareware & never register it because I can't see the whole scrn.

DEVCAP positioning resolves the whole problem for everybody, neatly & simply!
<G>
TomR.



At 10:07 AM 28/01/99 +0800, you wrote:
>>there is no reason for me to not delete a pig-program from harddisc
>immediately that switches my screen-resolution.<
>
>The idea is to offer the option to the user. He will decide for himself
>whether changing the resolution will cause problems with other applications.
>However, I want to give him the option of doing this from within the program
>rather than change the settings from the control panel.
>
>>time crtical background-tasks like channels, running
>>mathmatical paintings like Mandelbrot-Sets, they will surely not survice
>>when such a pig-programm changes the resolution.<
>
>In which case you would choose not to change the resolution and put up with
>the inconvenience of the program operating within a window taking up only a
>part of the screen. Others would choose to change to maximise the impact of
>the program (a game) if this caused no problems.
>
>>A minimum/maximum resolution requirement for a program shows only that the
>programmer wasn't able to do resolution-independing programming! (But this
>only my poor opinion.)
>
>It's a poor opinion based on a hasty assumption. The program runs happily in
>any resolution from 640x480 upwards. But, like the majority of Windows
>programs, the size of text and graphics is reduced the higher the resolution
>and the impact of the game is significantly compromised.
>
>Scaling experiments have not proved successful because many of the graphics
>items have 1/2/3 pixel elements and non-integer scaling factors (as for
>800x600 resolutions) produce unpleasant effects. Some text is positioned
>with a single pixel accuracy and non-integer scaling screws that up too.
>
>Graphic elements could be duplicated for each problematic resolution and
>switched in appropriately but in a 36,000 line, 150 plus screen program
>that's a lot of work I'd rather not take on.
>
>So, to change the resolution to 640x480, at the request of the user seems
>like a good answer. At the moment he/she does it using the control panel
>etc. I would prefer to offer the option from within the program.
>
>Mac Howard
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:08 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105mCV-00NLIzC>; Thu, 28 Jan 1999 08:49:19 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA12212; Thu, 28 Jan 1999 08:16:45 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B01F9B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990128071636.EIQI5324@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 28 Jan 1999 07:16:36 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 28 Jan 1999 07:16:36 +0000
Subject: [GFA] resolutions   2801xx1-
X-UIDL: 2b37f0ffc4ebc8a3399f61137b58fbba

28/01/99 12:49:23 AM   resolutions   2801xx1-


In 2nd response to the debate about changing screen resolution from 
within a program...

Sorry, my computer won't allow me to change the screen resolution 
tonight.  I can change the desktop presentation, but it is still a 
640x480 screen & 96 dpi.

It isn't that I can't do this, it is simply that I am on painkillers 
for my knee & can't think well enough to get this thing to do what I 
want.  I was going to post a chart of screen resolutions & the dpi 
each represents.  This will have to suffice.

By obtaining the resolution of each screen setting, you can easily 
chart out the conversion factors necessary for maintaining the size & 
placement of each component of a screen.  It will be simple to check 
resolution when a program starts to run & let it convert all 
co-ordinates & dimensions within each screen.  The nasty part would be 
adapting long-winded programs to this system, but a routine could be 
written to do just that by reading the code line by line & making the 
adjustments.

Adopting this "solution" means that a 1-pixel line will remain as such
at any resolution.  Nothing should appear different except the possible
width of lines, etc... at a higher resolution that is 3 times 96, a
1-pixel line will become a 3-pixel line, etc.  A simple solution, but
a very complex job to achieve in a long-winded program.

I apologize for the long way around for answering Pat's question, but 
I become very disgusted when an author arbitrarily starts changing 
settings on my system.  By adopting the above (or something else like 
it), no settings on a system have to be altered, then have to be put 
back afterward.  Once the target program has been modified to perform 
this, the program can run on ANY PC at any screen resolution & won't 
cause any havoc w/ the system settings.

It can be done by calculating screen width vs setting, but... as I 
said, I am under a painkiller & things don't add up for me.  The 
window this is in is simply a testbed... it gives me a window w/ 
rudimentary control to try out things I get from the helpfile or other 
places.  It isn't actually needed to perfprm the task of obtaining dpi 
@ each resolution.  Using it is just a habit.

Here is a programette that will get dpi for anybody interested:

--------------------------- cut here -----------------

''''  testbed.lst
' It will be necessary to change screen resolution, then run this
' again each time.  It will give you a file listing the screen dpi
' at each resolution you run it at.  Watch your color depth if you
' don't have a lot of VRAM... set it to 256 colors or even 16 for
' safety just in case.

cx& = GETDEVCAPS(HORZRES)
cy& = GETDEVCAPS(VERTRES)
cp& = GETDEVCAPS(LOGPIXELSX)
dv&  = _DRIVE
dr$ = DIR$(0)
TITLEW #1, " Checking resolutions of different screens"
OPENW #1,0,0,cx&,cy&,48
SETMOUSE cx& / 2,cy& / 2
DEFMOUSE 2
IF EXIST("dpi.dat") THEN GOTO GotIt
OPEN "o",#1,"dpi.dat"
CLOSE #1
GotIt:
OPEN "a",#1,"dpi.dat"
PRINT #1, STR$(cx&);" x ";STR$(cy&);"  @ "; STR$(cp&);" dpi"
PRINT #1
DEFMOUSE 0
'KEYGET k%
CHDRIVE dv&
CHDIR dr$
CLOSEW #1
END


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:13 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105p5m-00NOXXC>; Thu, 28 Jan 1999 11:54:34 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA12541; Thu, 28 Jan 1999 11:38:37 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B04F0F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 Jan 1999 05:37:22 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Re: Windows resolution
X-UIDL: 7f46d57d903bee2fdea50d47fa5b4aac

Mac,

There is a WIN95 API call [ChangeDisplaySettings] that looks as if it would
do the job. If you like I'll send the info. Too much to send here.

I half agree with Joe, but as things pan out many programmes fail to
achieve 'resolution-independent-programming' and 'font-size-independent
programming'.

BTW, to use the API call ChangeDisplaySettings() is quite involved you need
to set up a few structures fill them in, probably use API
EnumDisplaySettings() and you would also need to open the WOW (32bit)
interface. Let me know if you want to continue and I'll send some info
stuff.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:18 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105qnT-00NPHQC>; Thu, 28 Jan 1999 13:43:47 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA12713; Thu, 28 Jan 1999 13:13:33 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B0652D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 Jan 1999 07:13:08 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] clarification, please
X-UIDL: 104afab2831c580a7e2494aa79e7def8

>I'd like to see *any* successful menu creation routine. <

Here's one; has to be compiled into a .res or .dll with a resource
compiler. hInstance is either the Instance of the .exe if the menu is
stored in the .res or hInstance is the Instance of the .dll if menu is
stored in a dll. Very convenient method in my opinion!


  hMenu = LoadMenu(hInstance, "MENU_1")
  ~SetMenu(hWnd, hMenu)

There is '2ndary levels of menu popups' as well;

MENU_1 MENU LOADONCALL MOVEABLE DISCARDABLE 
{
 POPUP "&File   "
 {
  MENUITEM "&New        ", 10
  MENUITEM "&Load", 11
  MENUITEM "&Save", 12
  MENUITEM "Save &As      ", 13
  MENUITEM SEPARATOR
  MENUITEM "S&et Printer", 14
  MENUITEM "&Print", 15
  MENUITEM SEPARATOR
  MENUITEM "E&xit", 16
 }

 POPUP "&Edit    "
 {
  MENUITEM "&Cut        ", 20
  MENUITEM "C&opy", 21
  MENUITEM "&Paste  ", 22
 }

 POPUP "&Display   "
 {
  MENUITEM "&Tools", 30
  MENUITEM "&Horz Ruler", 31
  MENUITEM "&Vert Ruler", 32
  MENUITEM "&Status", 33
  POPUP "&Rulers   "
  {
   MENUITEM "&Inches", 34
   MENUITEM "&Centimetres", 35
  }

  POPUP "&Coords  "
  {
   MENUITEM "&Units", 36
   MENUITEM "&Pixels", 37
  }

 }

 POPUP "&Object    "
 {
  MENUITEM "&Text Box      ", 40
  MENUITEM "&Image Box     ", 41
  MENUITEM "Image/Text &Box     ", 42
  MENUITEM SEPARATOR
  MENUITEM "In&fo        ", 43
  MENUITEM "&Delete       ", 44
  MENUITEM "&Align        ", 45
  MENUITEM "Define &Mono Patten", 46
  MENUITEM "Define &Colour Patten", 47
 }

 POPUP "&Help    "
 {
  MENUITEM "&Help", 50
  MENUITEM SEPARATOR
  MENUITEM "&About", 51
 }

}

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:30 1999
Return-Path: <AlanLennon@USA.NET>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105wgu-00NPHLC>; Thu, 28 Jan 1999 20:01:24 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA13387; Thu, 28 Jan 1999 19:31:16 +0100
From: Alan Lennon <AlanLennon@USA.NET>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B0BDC0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 28 Jan 1999 18:25:48 +0000
X-Mailer: Mozilla 4.5 [en] (Win98; I)
X-Accept-Language: en
MIME-Version: 1.0
References: <36AFBD0E.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] clarification, please
X-UIDL: 60ec7a2c4bfc1d03ef09559f46fa87eb


Tom Record wrote:
> 
> I'd like to see *any* successful menu creation routine

Ok Tom here's mine

The following is some code fragments from a program I am currently
writing to do data acquisition and analysis. It illustrates the
method...

First create the menu structure. This routine also creates a popup menu.
This method of popup creation must be used in GFA as the POPUP statement
does _not_ compile properly! The variable menu_id& is the number
returned in the wparam of the menu messages
The use of API functions instead of GFA MENU is more reliable and
portable (ie it converts to "C++" easily)

REMEMBER it's real code cut from a working program so some of it may not
make sense as it is out of context.
 
**********************************************************************************************************************************

PROCEDURE create_menu

  main_menu&   = CreateMenu()
  menu&        = CreatePopupMenu()
  menu_id&     = 1
  menu_data:
  DATA File,Capture Data,-,Load,-,Print,Print Setup,-,Quit,XXX
  DATA Capture,Capture Data,Enable Auto Capture,-,Set default
timeout,Set data timeout,XXX
  DATA Graph,Engagement Timing,FFT data,Adjust IOM,Print Graph,Export
Data,Run animation,Source filename,Graph setup,XXX
  DATA System,Com Ports,Capture Options,Graph Options,Animation,FFT
analyser,Advanced,-,System Test,XXX
  DATA Window,Live Data,XXX
  DATA Help,Contents,Search help,Help on help,-,About ILTMF,XXX
  DATA END

  RESTORE menu_data
  READ heading$
  DO
    READ temp$
    SELECT temp$
    CASE "XXX"
      ~AppendMenu(main_menu&,MF_POPUP,menu&,heading$)
      READ heading$
      EXIT IF heading$ = "END"
      menu& = CreatePopupMenu()
    CASE "-"
      ~AppendMenu(menu&,MF_SEPARATOR,-1,"")
    DEFAULT
      ~AppendMenu(menu&,MF_STRING,menu_id&,temp$)
    ENDSELECT
    INC menu_id&
  LOOP
 
 IF auto_capture! THEN 
~ModifyMenu(main_menu&,11,MF_BYCOMMAND,11,"Disable Auto Capture")
  FOR a| = 16 TO 22
    ~EnableMenuItem(main_menu&,a|,MF_GRAYED)
  NEXT a|
  ~SetMenu(main_win&,main_menu&)     //main_win& is the handle of the
window 

  popup_menu& = CreatePopupMenu()
  popup_menu_data:
  DATA Engagement Timing,FFT data,Adjust IOM,Print Graph,Export Data,Run
animation,Source filename,Graph setup,-,Cancel
  RESTORE popup_menu_data
  FOR id& = 100 TO 109
    READ temp$
    IF temp$ = "-"
      ~AppendMenu(popup_menu&,MF_SEPARATOR,-1,"")
    ELSE
      ~AppendMenu(popup_menu&,MF_STRING,id&,temp$)
    ENDIF
  NEXT id&

RETURN

*********************************************************************************************************************************

This routine illustrates two methods of assigning the menu id's. The
window menu uses an incrementing counter to assign id. this way the menu
can be in a do loop and extra items added just by adding another data
statement. I am aware that this changes all the id's after the position
in which the data is inserted. The popup menu uses a simple loop. I'mam
just about to re-write this code to handle sub-menu creation.

I always use a callback to handle all window messages. This piece of
code is part of a SELECT CASE statement in the callback

*************************************************************************************************************************************

CASE WM_COMMAND
   @handle_menu(wparam&)         //wparam& is the menu_id& variable

*************************************************************************************************************************************

and here is the actual menu handler

*************************************************************************************************************************************

PROCEDURE handle_menu(al_selection&)

  SELECT al_selection&
  CASE 1,10
    IF !store! THEN @capture_data
  CASE 3
    IF @load_old_file
    ELSE
      ~@message_box("An error occurred during" + crlf$ + "the file
conversion",MB_OK | MB_ICONSTOP)
    ENDIF
  CASE 5,19
    // print graph
  CASE 6
    DLG PRINT main_win&,-1,pdc&
  CASE 8
    IF @exit_check THEN @end_prog
  CASE 11
    @swap_auto_capture
  CASE 13,14
    IF !store! THEN @system_setup(1)
  CASE 16   //engagement timing
    @show_engagement_window
  CASE 17   //fft
    ~@load_wav(wav_file$)
  CASE 18   //adjust iom
    iom% = @adjust_iom(iom%)
  CASE 20   //export data
    @export_data(graph_filename$)
  CASE 21   //animate

  CASE 22   //source info
    ~@message_box("This data is from " + crlf$ + graph_filename$,MB_OK |
MB_ICONINFORMATION)
  CASE 23   //graph setup
    IF !store! THEN  @system_setup(2)
  CASE 25 TO 30
    IF !store! THEN  @system_setup(al_selection& - 25)
  CASE 32
    IF !store! THEN @system_test
  CASE 34
    IF ICONIC?(live_win&) THEN ~ShowWindow(live_win&,SW_RESTORE)
    ~BringWindowToTop(live_win&)
  CASE 36
    //help contents
  CASE 37
    //search help
  CASE 38
    //help on help
  CASE 40
    @about
  DEFAULT
    IF debug! THEN  show_inf(STR$(al_selection&))
  ENDSELECT

RETURN

************************************************************************************************************************************


I hope this code is of interest. If further description of the code is
needed just email me.

Regards Alan Lennon


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:32 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m105x8W-00NLL4C>; Thu, 28 Jan 1999 20:29:56 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA13469; Thu, 28 Jan 1999 20:01:29 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B0C4BB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990128190122.BXEP8659@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 28 Jan 1999 19:01:22 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 28 Jan 1999 19:01:22 +0000
Subject: Re: [GFA] clarification, please
X-UIDL: 3f479a32f293bd9f18f5b66115cbee60

At 06:25 PM 28/01/99 +0000, you wrote:
>
>Tom Record wrote:
>> 
>> I'd like to see *any* successful menu creation routine
>
>Ok Tom here's mine
>

Alan
I appreciate you letting me look at it.  Thank you very much.
I'll let you know if I'm unsuccesful in getting thru it.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:38 1999
Return-Path: <gfa@bero-online.ml.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106455-00NLL6C>; Fri, 29 Jan 1999 03:54:51 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA14194; Fri, 29 Jan 1999 03:24:40 +0100
From: GFA <gfa@bero-online.ml.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B12CC3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@bero-online.ml.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Thu, 28 Jan 1999 21:37:31 +0100
In-Reply-To: <36AE8973.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] clarification, please
X-UIDL: 7b94662a287ddce8f308b3f7ae8395dd

Tom,

just to get it clear: the DATA entries are internally counted.
GFA does it itself, it does not need any numberation for it.
This means, that the numbers included in the DATA file are
NOT necessary and will be handled like all the other characters.
There is only one special character in a DATA field, i.e.
the comma, that separates the entries.

Greetings

Sven Thomas
GFA Software

At 02:22 27.01.99 +0000, you wrote:
>>From the Petzold collection... 
>
>menudemo.lst  ' 10.1             MENUS PROG1
>
>MenuResource:
>DATA 30
>DATA &File,&New|1,&Open...|2,&Save|3,Save &As...|4,-,E&xit|5,
>DATA &Edit,&Undo|11,-,Cu&t|12,&Copy|13,&Paste|14,De&lete|15,
>DATA &Bkgnd,&White|21,&Lt Gray|22,&Gray|23,&Black|24,
>DATA &Timer,&Start|31,S&top|32,
>DATA &Help,&Help...|41,&About...|42,,**
>
>Above...
>
>I don't understand the first statement.
>
>The number following each pipe (|) is the CASE identifier used in SELECT 
>routines - this is easily seen.
>
>HOW are the data items counted?
>


+++ Attention: The domain startrek.in-trier.de is NO LONGER valid! +++
Use bero-online.ml.org instead, i.e. the new addresses are:
ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
gfa@bero-online.ml.org                GFA Support
root@bero-online.ml.org               technical questions regarding the
                                      server only
gfasoft@compuserve.com                general GFA related questions
gfabasic@bero-online.ml.org           GFA related Mailing List


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:40 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1067GP-00NLL6C>; Fri, 29 Jan 1999 07:18:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id GAA14586; Fri, 29 Jan 1999 06:48:27 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B15C87.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990129054819.GRSD19400@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 29 Jan 1999 05:48:19 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 29 Jan 1999 05:48:19 +0000
Subject: Re: [GFA] clarification, please
X-UIDL: 9c536ddae95319467d57c934055c2284

Sven
Thank you for responding.

My problem was easy identification of the DATA items for the purpose
of such things as graying text, etc.  I wasn't allowing for an extra
count at the end of each DATA line ending with a comma.

Before knowing how they are enumerated, I was having to guess at them
& play "hide & seek".  I am slowly working toward being a GFA-W
programmer.  I want to be a good one, so I ask things I don't readily
see or understand.  This is my last shot... I can't afford to discard
GFA-W & start all over again

Respects
<G>
TomR.



At 09:37 PM 28/01/99 +0100, you wrote:
>Tom,
>
>just to get it clear: the DATA entries are internally counted.
>GFA does it itself, it does not need any numberation for it.
>This means, that the numbers included in the DATA file are
>NOT necessary and will be handled like all the other characters.
>There is only one special character in a DATA field, i.e.
>the comma, that separates the entries.
>
>Greetings
>
>Sven Thomas
>GFA Software
>
>At 02:22 27.01.99 +0000, you wrote:
>>>From the Petzold collection... 
>>
>>menudemo.lst  ' 10.1             MENUS PROG1
>>
>>MenuResource:
>>DATA 30
>>DATA &File,&New|1,&Open...|2,&Save|3,Save &As...|4,-,E&xit|5,
>>DATA &Edit,&Undo|11,-,Cu&t|12,&Copy|13,&Paste|14,De&lete|15,
>>DATA &Bkgnd,&White|21,&Lt Gray|22,&Gray|23,&Black|24,
>>DATA &Timer,&Start|31,S&top|32,
>>DATA &Help,&Help...|41,&About...|42,,**
>>
>>Above...
>>
>>I don't understand the first statement.
>>
>>The number following each pipe (|) is the CASE identifier used in SELECT 
>>routines - this is easily seen.
>>
>>HOW are the data items counted?
>>
>
>
>+++ Attention: The domain startrek.in-trier.de is NO LONGER valid! +++
>Use bero-online.ml.org instead, i.e. the new addresses are:
>ftp.bero-online.ml.org/pub/gfabasic   GFA files, Trial versions etc.
>gfa@bero-online.ml.org                GFA Support
>root@bero-online.ml.org               technical questions regarding the
>                                      server only
>gfasoft@compuserve.com                general GFA related questions
>gfabasic@bero-online.ml.org           GFA related Mailing List
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 14:40:45 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1069xS-00NOBBC>; Fri, 29 Jan 1999 10:11:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA14908; Fri, 29 Jan 1999 09:42:17 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B18527.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 29 Jan 1999 09:17:32 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Drag 'n Drop
X-UIDL: 86cfad0d5fe2701ed1f87c8e129b5236

Hi!

Has anyone experiences in using drag 'n drop together with GFA? I want to
send a "drop-message" to WinWord 6 to let it load a document. Can I do this
with a simple SENDMESSAGE? What is the API-Message?

Many thanks in advance
Yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 21:37:45 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106HHv-00NPa1C>; Fri, 29 Jan 1999 18:00:59 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA15658; Fri, 29 Jan 1999 17:30:10 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B1F2D6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 29 Jan 1999 08:25:03 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] FORMTEXT
X-UIDL: ae3bc6b1935bd7f10e166c0be35fa18f

Want a quick and easy way to have a help file for your application. Download
FORMTEXT.ZIP from the URl below. This great utility,  by Roland Walter,
offers a quick and easy way to create a help file.  Modeled after HTML, your
help application can be created in any text editor and called from your
application. Different fonts, different colors of text and more! Your right,
I really like it!
Dale


http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Jan 29 21:37:46 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106HOo-00NOBCC>; Fri, 29 Jan 1999 18:08:06 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA15675; Fri, 29 Jan 1999 17:39:49 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B1F509.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 29 Jan 1999 08:34:45 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] PROGRAMMERS
X-UIDL: 0da4ca19e4000bbac7fb4312baa81e05

If you program in GFA BASIC, Windows or DOS, I would like to include you in
the GFA programmers biography page at he web site below.

1. Name
2. City/Country
3. email address
4. Web page URL if applicable
5. Main areas of programming interest.
6. Some personal facts if desired

send to: adbryant@gfa.net

http://gfa.net/adbryant
http://gfawhelp.gfa.net





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 30 10:50:43 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106QCA-00NOZEC>; Sat, 30 Jan 1999 03:31:38 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA16589; Sat, 30 Jan 1999 03:02:55 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B27917.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 29 Jan 1999 21:00:30 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="ae9f0b35-b7e1-11d2-9cc0-00805feacc26"
Subject: [GFA] BLOAD and BGET
X-UIDL: b0f2275c3aed59c8a3877fd84129e4fe

I'm having trouble loading a file larger than 64 K into memory.

In the attached file, I have tried BGET  and BLOAD in PROC makemem().

BLOAD works fine up to 64K, as advertized

BGET works only up to a maximum count% of  64K - 1.

Is there any way to load a binary file larger than 64K using GFA?

Thanks,

Brent.

Attachment Converted: "c:\programme\eudora\attach\METAPLAC.GFW"
From ???@??? Sat Jan 30 11:49:04 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106X7a-00NOXXC>; Sat, 30 Jan 1999 10:55:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA17388; Sat, 30 Jan 1999 10:25:43 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B2E0F2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 30 Jan 1999 10:29:59 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain;

Subject: [GFA] Professional Help wanted !
X-UIDL: 6726a96205a1126a957c3af14d01033b

Hi,

I really thought, Win/Gfa can't give me a big surprise - nd now this...

I've made a dialog (which is changed very often, so it's done (1), then a
normal Event-loop is processed (2), including the keys 1-9 (3), and now the
problem:
the keys "1" to "8" are really working, the "9" does the same like cursor
down !!!
The program works (inclusive the key "9"), when I open a "dummy" window,
like in line (4).

If anyone want to help, PLEASE download the full source code (60k) at
http://vo.schoeller.at (http://193.80.105.57/file/problem/cases.zip), just
search in the interpreter for "**Problemzone**".

Thanks for trying to catch this bug/problem/programmers fault...

Michael



[...]
SHOWW #DLG(30),SW_SHOW   // (1)

[...]

// (4) openw#9,9,9,9,9,0

DO				// (2)
  GETEVENT
  t& = WORD(_wParam)

  SELECT _Mess

  CASE WM_CLOSE
  [...]
  CASE WM_SYSCOMMAND
  [...]

  CASE WM_CHAR                          

    SELECT t&

    CASE 49 TO 57               //  "1"..."9"  (3)
      beep
      print t&

    CASE 32
    [...]

  ENDSELECT

[...]

SHOWW #DLG(30),SW_HIDE  ' = CLOSEDIALOG #30   '  Dialogbox schlieen


_____
PS.: on the same location you can find a tiny Euro-Converter / download it,
use it, but don't forget my name if you use the code !!!


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Jan 30 11:49:05 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106XUE-00NLL4C>; Sat, 30 Jan 1999 11:18:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA17438; Sat, 30 Jan 1999 10:51:01 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B2E6BB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 30 Jan 1999 04:50:39 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] BLOAD and BGET
X-UIDL: d4da4b48ab541adb3b02728fabd9685a

Brent,

There are Win3.1 API's;  _hread & _hwrite, but GFA will not accept

  DECL LONG _hread(w,l,l)


So you have to load the library;

hkernel = LoadLibrary("kernel.dll")  // Needed for _hread/_hwrite etc

IF hkernel THEN ~FreeLibrary(hkernel)

FUNCTION  HugeRead(hFile, lpBuffer, lBytes)
  RETURN P:(GetProcAddress(hkernel, "_hread"))(hFile, L:lpBuffer, L:lBytes)
ENDFUNC
FUNCTION  HugeWrite(hFile, lpBuffer, lBytes)
  RETURN P:(GetProcAddress(hkernel, "_hwrite"))(hFile, L:lpBuffer,
L:lBytes)
ENDFUNC

 
You could use this instead, I think Sjouke wrote it

PROCEDURE LoadHuge(n&, lpBuf%, len%)
  LOCAL count% = 0, maxlen%, offset% = LOCARD(lpBuf%)

  TRY

    maxlen% = IMIN(32768 - offset%, len%)
    WHILE count% < len%
      BGET #n&, _Huge(lpBuf%, count%), maxlen%
      count% += maxlen%
      maxlen% = IMIN(32768, len% - count%)
    WEND

  CATCH

  CLOSE #n&
  ~ALERT(1,"LoadHuge-error:" + STR$(ERR),1,"Ok")
RETURN

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 31 16:57:02 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106asm-00NOAgC>; Sat, 30 Jan 1999 14:56:20 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA17807; Sat, 30 Jan 1999 14:27:53 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B3199E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 30 Jan 1999 08:26:14 -0500
Sender: BDD <BrentDeck@compuserve.com>
Cc: GFA Basic Mailing List <gfabasic@linux.net.eu.org>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Copy of: BLOAD and BGET
X-UIDL: c91e2f52766183456d17c4ed0881168e

Here's the best way I've found to load binary files larger than 64K using
GFA commands. It's slow in the interpreter, but not noticeably slow when
compiled.

It requires getting one byte at a time, to avoid the eof error.

 OPEN "i",#1, name$
  ptr% = addr%
  DO
    BGET #1,ptr%,1
    INC ptr%
  LOOP UNTIL EOF(#1)
  CLOSE #1

Better ideas are welcome.

Brent.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 31 16:57:03 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106b2G-00NLL4C>; Sat, 30 Jan 1999 15:06:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA17834; Sat, 30 Jan 1999 14:38:29 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B31C06.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 30 Jan 1999 08:37:17 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] BLOAD and BGET
X-UIDL: 8baec78f7bcc4c14c70f3426e0dcf10e

Thanks for the info,

The try / catch is just a way to detect the end of file. I fretted over how
to determine the length of the file in advance, so as not to worry about
EOF error. But I'm not sure it matters.

Best Regards

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 31 16:57:04 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106bJh-00NLL4C>; Sat, 30 Jan 1999 15:24:09 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA17885; Sat, 30 Jan 1999 14:56:18 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B32036.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990130135555.BNYX7176@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 30 Jan 1999 13:55:55 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 30 Jan 1999 13:55:55 +0000
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: a24978503565e1abf675b6ef5e2c3d5e

TYPE dta:
-CHAR *21	fs_donttouch$
-BYTE		fs_attr
-CARD		fs_time
-CARD		fs_date
-LONG		fs_size
-CHAR *14	fs_name$
ENDTYPE
//
dta%=FGETDTA()	//stores the address of DTA in dta%
//
e%=FSFIRST("*.*",%10001)
WHILE e%=>0
  	a$=SPACE$(60)
  	MID$(a$,2)={dta%}.fs_name$
  	q$=" "
  	IF BTST({dta%}.fs_attr,4)
 		RSET q$="<DIR>"
  	ELSE
 		RSET q$=STR$({dta%}.fs_size) ' <----------------------
  	ENDIF
  	MID$(a$,16)=q$
  	a%={dta%}.fs_date
  	q$=DEC$(a% & 31,2)+"."

  	q$=q$+DEC$((a% >> 5) & 15,2)+"."
  	q$=q$+DEC$((a% >> 9) + 1980,4)
  	MID$(a$,30)=q$
  	a%={dta%}.fs_time
  	q$=DEC$(a% >> 11,2)+"."+DEC$((a% >> 5) & 63,2)
  	q$=q$+DEC$((a% & 31)*2,2)
  	MID$(a$,42)=q$
  	PRINT a$
  	e%=FSNEXT()
	KEYGET a%
WEND

Brent
You can cull out what you don't want from the above - you can keep any 
_one_ of the items you want.
<G>
TomR.



At 08:37 AM 30/01/99 -0500, you wrote:
>Thanks for the info,
>
>The try / catch is just a way to detect the end of file. I fretted over how
>to determine the length of the file in advance, so as not to worry about
>EOF error. But I'm not sure it matters.
>
>Best Regards
>
>Brent
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 31 16:57:06 1999
Return-Path: <shamstra@gelrevision.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106bZC-00NLL6C>; Sat, 30 Jan 1999 15:40:10 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA17936; Sat, 30 Jan 1999 15:11:42 +0100
From: "Sjouke Hamstra" <shamstra@gelrevision.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B323D3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.07) id A26954B3028C; Sat, 30 Jan 1999 15:08:41 +0100
Date: Sat, 30 Jan 1999 15:02:35 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Professional Help wanted !
X-UIDL: 268970f2b46e8962365ba4b155f94bf1

>> I really thought, Win/Gfa can't give me a big surprise - nd now this...

Don't we all get surprised now and then..


>>I've made a dialog (which is changed very often, so it's done (1), then a
normal Event-loop is processed (2), including the keys 1-9 (3), and now the
problem:
the keys "1" to "8" are really working, the "9" does the same like cursor
down !!!
The program works (inclusive the key "9"), when I open a "dummy" window,
like in line (4).
<<

It took me a while before I got it running, something with casepath$. I could
not reproduce your problem, i.e. on my system '9' responds to your CASE 48 TO
57. You should note however, that you are responding to a posted listbox
WM_CHAR message. That is, the listbox has the focus, the _hwnd contains the
handle of the list box. Getevent executes IsDialogMessage because you are
dealing with a dialog box. After IsDialogMessage returns, which didn't process
the WM_CHAR message '0' to '9', the list box window procedure is executed
through a call of DispatchMessage. Then WM_CHAR is processed: WM_CHAR moves
the selection to the first item that begins with the character the user typed.
Then the window procedure for the listbox returns to its caller:
DispatchMessage, which returns to its caller: Getevent. Now the message is
processed and copied to MENU(). Then Getevent returns. It's only then that
your program gets a chance to respond to it. So, what you are dealing with is
a message that can be intercepted, filtered or what ever by the listbox window
procedure. The best way to go is by subclassing the listbox, process WM_CHAR
and pass it on to the window proc of the listbox. This way you got a chance to
respond to it first, however read teh SDK carefully before you do so
(WM_GETDLGCODE).

Sjouke Hamstra





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 31 16:57:10 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106lG0-00NOXVC>; Sun, 31 Jan 1999 02:01:00 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA18974; Sun, 31 Jan 1999 01:31:41 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B3B538.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 30 Jan 1999 16:26:35 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-Mimeole: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] Fw: Biography
X-UIDL: 49e3b9da9e1832e218af9df0817e8799

Say hello to Mr. Bueckmann.
----- Original Message -----
From: Bueckmann.W <Bueckmann.W@t-online.de>
To: <adbryant@gfa.net>
Sent: Saturday, January 30, 1999 3:52 PM
Subject: Re: Biography


>Dale Bryant schrieb:
>> HI Wilhelm,
>> Your information has been posted to the programmers page. Please review
it
>> and let me know if it is OK or if you want any changes made.
>> Dale
>> http://gfa.net/adbryant
>> http://gfawhelp.gfa.net/adbryant
>>
>>
>
>Thank you. It's o.k.
>
>When i like to have some changes i will mail you.
>
>I'm programmimg GFA Basic since Atari St. But the Windows functions are all
new
>for me. But it's very interesting ...
>
>Greetings to all GFA friends.
>
>Willi
>
>M.f.G.
>Wilhelm Bckmann
>Email Bueckmann.W@T-Online.de
>
>P.S
>
>Why is the E-MAil-Adress of you (i see adbryant@email.msn.com) always
diffent???
>
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Jan 31 16:57:12 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106lqQ-00NKU8C>; Sun, 31 Jan 1999 02:38:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA19057; Sun, 31 Jan 1999 02:10:34 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B3BE3F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 30 Jan 1999 20:09:42 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="c63f2907-b89f-11d2-afcf-00805fbe60fa"
Subject: [GFA] BLOAD and BGET
X-UIDL: 745c84aa89e11a4635011701e8571b8b

Hello John,

Heres my final version of load and save routines for huge blocks using GFA
commands.

I found the bput must use a count of 2 near the page boundaries to prevent
error.
Otherwise, it can use any count%, as with bget.

Both your examples were very helpful.
 

Best Regards,

Brent



Attachment Converted: "c:\programme\eudora\attach\TESTBGET.LST"
From ???@??? Sun Jan 31 16:57:25 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106wkO-00NOZEC>; Sun, 31 Jan 1999 14:17:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA20234; Sun, 31 Jan 1999 13:47:23 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B461CD.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 31 Jan 1999 07:46:51 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] BLOAD and BGET
X-UIDL: c9fb1eea56fb64f27745d28e8cd3a2a6

Brent,

>Heres my final version of load and save routines for huge blocks using GFA
commands.<

Final?? Never!!!

You may be right about the BPUT problem. I tried to do it with BPUT and the
file was always a few bytes too long.

Here's a routine that doesn't use BPUT; a plus in using this method is that
you can do better error handling.

Regards,

John

'==================================================================
DEFINT "l"                    ' 32 bit/long
DEFWRD "h"                    ' 16 bit/word

ladr = MALLOC(138000)

' Fill mem with an ascii value
FOR l = 0 TO 137999
  BYTE{_Huge(ladr, l)} = 54
NEXT l

OPEN "O",#1, "d:\myfile.txt"
PRINT "Bytes Sent", @HugeWrite(_FILE(1), ladr, 138000)
CLOSE #1

~MFREE(ladr)

OPEN "I",#1, "d:\myfile.txt"
PRINT "Actual Size of File", LOF(#1)
CLOSE #1

KEYGET l
CLOSEW #1
EDIT

FUNCTION HugeWrite(hFile, lpBuf, lBytes)
  LOCAL lBytesTmp = lBytes

  '-------------------------------------------
  ' Write out the data in 32767 byte chunks.
  '-------------------------------------------
  WHILE lBytes > 32767
    IF _lwrite(hFile, lpBuf, 32767) != 32767
      RETURN -1                                   ' Error
    ENDIF
    lBytes -= 32767
    lpBuf   = _Huge(lpBuf, 32767)
  WEND

  '-------------------------------------------
  ' If there's some still to write send the
  ' last chunk which is < 32767 bytes
  '-------------------------------------------
  IF lBytes
    IF _lwrite(hFile, lpBuf, lBytes) != lBytes
      RETURN -1                                   ' Error
    ENDIF
  ENDIF

  RETURN lBytesTmp                                ' Success

ENDFUNC
'==================================================================

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:03:36 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m106zYj-00NOZEC>; Sun, 31 Jan 1999 17:17:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA20540; Sun, 31 Jan 1999 16:48:13 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B48C04.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 31 Jan 1999 07:42:39 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] EMAIL ADDRESS
X-UIDL: fc5aaeda6b7d9c798d1d554d9b8746a2

Does anyone have another email address for Mr. Walmsley?
If so, please send it to me.
Dale Bryant
mailto:k.walmsley@uclan.ac.uk
http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:03:58 1999
Return-Path: <adrian@fkend.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1074NF-00NPaBC>; Sun, 31 Jan 1999 22:25:45 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA21052; Sun, 31 Jan 1999 21:56:10 +0100
From: Adrian Kendrick <adrian@fkend.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B4D42D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 31 Jan 1999 20:55:34 +0000
MIME-Version: 1.0
X-Mailer: Turnpike (32) Version 4.01  <qPaIXqrkXNlirhxDnnIvxdrD0B>
Subject: [GFA] How to unsibscribe
X-UIDL: cb49b1c98422ea20820d47953e7c627d

Please someone tell me how to UNSUBSCRIBE from this newsletter, thanks.
-- 
Regards
Adrian Kendrick

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:04:02 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1075T4-00NLFeC>; Sun, 31 Jan 1999 23:35:50 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA21184; Sun, 31 Jan 1999 23:07:03 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B4E4C7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 31 Jan 1999 14:01:20 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] gfa forum
X-UIDL: 19c26a017b02762a098ead82c4600759

I have created a GFA BASIC forum at the following URL.

http://forums.delphi.com/m/main.asp?sigdir=gfabasic

Dale Bryant
http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:04:06 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1078kG-00NOZnC>; Mon, 1 Feb 1999 03:05:48 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA21530; Mon, 1 Feb 1999 02:35:29 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B515A9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 31 Jan 1999 17:30:15 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] NEW DOWNLOAD
X-UIDL: e31aa5094a934c8e1fd4ef5559bdec92

DISKAPI.ZIP

[DALE]
John Findlay has sent the above which is now available for downloading from
the GFAWHELP web site.  If you are interested in disk I/O don't miss this
one. This is code that all data base programmers should find very beneficial
JOHN]

These functions use Windows API calls for disk file I/O. The functions are
especially designed for use in a network environment where files are shared
by many users. Files are essentially random access with fixed-length
records.
Here is something else you can add to the library.

I recently needed to develop a set of disk file functions using the API
instead of GFA's own. This is the result. I particularly needed the
ability to lock a whole file for single user access on a network during
writing and also allow that file multiple access for read-only
activities. This prompted the Openr and Openw functions in the code. All
the rest flowed from that. The record locking functions were something I
added but I don't use. I have tested these on a Win98 network and in
conjunction with my Dos software, which is written in a different
language. The Dos and GFAWin programs interacted without a hitch.
Documentation is a WRI file. Oddly enough, these functions appear to
work a shade more quickly than GFA's own equivalent.

---------------------------------------------------------------------------
Dean Hodgson
http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:04:10 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107EsU-00NLKlC>; Mon, 1 Feb 1999 09:38:42 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA22239; Mon, 1 Feb 1999 09:10:23 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B57232.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Feb 1999 03:09:23 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] NEW DOWNLOAD
X-UIDL: 4153b12d46e153df7746f3c2ba185333

Dale,

DISKAPI.ZIP

>John Findlay has sent the above which is now available for downloading
from
the GFAWHELP web site.<

I think you mean Dean.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:04:22 1999
Return-Path: <bmcs@ozemail.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107GO3-00NPZwC>; Mon, 1 Feb 1999 11:15:23 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA22409; Mon, 1 Feb 1999 10:46:12 +0100
From: "bmcs" <bmcs@ozemail.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B588A2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Feb 1999 20:44:14 +1100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2232.26
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Importance: Normal
In-Reply-To: <36B4E4C7.BeroList-2.5.9@aachen.linux.de>
Subject: RE: [GFA] gfa forum
X-UIDL: a9ec0a9dc1a7b36709b51d1c2c957b3b

Hi Dale,

Nice idea! Unfortunate that you chose a US based forum server.
Tried to join, but I don't have a US 'ZIP' code!

Too much to hope that the US organisations will ever stop naval gazing and
become less parochial, insular and join the rest of humanity. It has probably
escaped the notice of delphi.com's administrators that there are lands beyond
the Pacific & Atlantic oceans. Perhaps if they had paid more attention in their
American history class, they may have realised Mr. C. Columbus did not have a US
ZIP code :).

Regards,
Dave Barton


-----Original Message-----
From:	Dale Bryant [mailto:adbryant@email.msn.com]
Sent:	Monday, 1 February 1999 09:01
To:	gfabasic@aachen.linux.de
Subject:	[GFA] gfa forum

I have created a GFA BASIC forum at the following URL.

http://forums.delphi.com/m/main.asp?sigdir=gfabasic

Dale Bryant
http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:04:35 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107KYV-00NPaUC>; Mon, 1 Feb 1999 15:42:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA22931; Mon, 1 Feb 1999 15:10:53 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B5C6C8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Feb 1999 15:14:45 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Professional Help wanted !
X-UIDL: bf2233e4eb413f1e1e4247292043ab9b

Thanks,

it will take a while to implement your tips (first I'll read your mail
carefully some more times)...
Sorry about the Path, it's set within the Ini-File to C:\, I forgot to tell
you...

Michael

> ----------
> Von: 	Sjouke Hamstra[SMTP:shamstra@gelrevision.nl]
> Gesendet: 	Samstag, 30. Januar 1999 15:02
> An: 	gfabasic@aachen.linux.de
> Betreff: 	Re: [GFA] Professional Help wanted !
> 
> >> I really thought, Win/Gfa can't give me a big surprise - nd now this...
> 
> Don't we all get surprised now and then..
> 
> 
> >>I've made a dialog (which is changed very often, so it's done (1), then
> a
> normal Event-loop is processed (2), including the keys 1-9 (3), and now
> the
> problem:
> the keys "1" to "8" are really working, the "9" does the same like cursor
> down !!!
> The program works (inclusive the key "9"), when I open a "dummy" window,
> like in line (4).
> <<
> 
> It took me a while before I got it running, something with casepath$. I
> could
> not reproduce your problem, i.e. on my system '9' responds to your CASE 48
> TO
> 57. You should note however, that you are responding to a posted listbox
> WM_CHAR message. That is, the listbox has the focus, the _hwnd contains
> the
> handle of the list box. Getevent executes IsDialogMessage because you are
> dealing with a dialog box. After IsDialogMessage returns, which didn't
> process
> the WM_CHAR message '0' to '9', the list box window procedure is executed
> through a call of DispatchMessage. Then WM_CHAR is processed: WM_CHAR
> moves
> the selection to the first item that begins with the character the user
> typed.
> Then the window procedure for the listbox returns to its caller:
> DispatchMessage, which returns to its caller: Getevent. Now the message is
> processed and copied to MENU(). Then Getevent returns. It's only then that
> your program gets a chance to respond to it. So, what you are dealing with
> is
> a message that can be intercepted, filtered or what ever by the listbox
> window
> procedure. The best way to go is by subclassing the listbox, process
> WM_CHAR
> and pass it on to the window proc of the listbox. This way you got a
> chance to
> respond to it first, however read teh SDK carefully before you do so
> (WM_GETDLGCODE).
> 
> Sjouke Hamstra
> 
> 
> 
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:04:42 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107MhQ-00NPacC>; Mon, 1 Feb 1999 17:59:48 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA23175; Mon, 1 Feb 1999 17:30:43 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B5E771.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Feb 1999 08:25:23 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] gfa forum
X-UIDL: 9291a3db5eeb3ebdaa4e284d1bbc498f

Hi Dave,
Dave, I am sorry. I had no idea a zip code was required to view the forum.
I will see if I can contact them and ask why!
Dale
----- Original Message -----
From: bmcs <bmcs@ozemail.com.au>
To: <gfabasic@aachen.linux.de>
Sent: Monday, February 01, 1999 1:44 AM
Subject: RE: [GFA] gfa forum


>Hi Dale,
>
>Nice idea! Unfortunate that you chose a US based forum server.
>Tried to join, but I don't have a US 'ZIP' code!
>
>Too much to hope that the US organisations will ever stop naval gazing and
>become less parochial, insular and join the rest of humanity. It has
probably
>escaped the notice of delphi.com's administrators that there are lands
beyond
>the Pacific & Atlantic oceans. Perhaps if they had paid more attention in
their
>American history class, they may have realised Mr. C. Columbus did not have
a US
>ZIP code :).
>
>Regards,
>Dave Barton
>
>
>-----Original Message-----
>From: Dale Bryant [mailto:adbryant@email.msn.com]
>Sent: Monday, 1 February 1999 09:01
>To: gfabasic@aachen.linux.de
>Subject: [GFA] gfa forum
>
>I have created a GFA BASIC forum at the following URL.
>
>http://forums.delphi.com/m/main.asp?sigdir=gfabasic
>
>Dale Bryant
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net/adbryant
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 01 19:04:43 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107MyB-00NPa4C>; Mon, 1 Feb 1999 18:17:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA23211; Mon, 1 Feb 1999 17:48:22 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B5EB8B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 1 Feb 1999 08:43:11 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] DISKAPI
X-UIDL: 3059fd81f7860e7ab178f7a9bf44bdbb

NOTE: This is to correct my error in who sent the DISKAPI.ZIP file.  Yes, my
face is red!!  To credit someone's hard work to another is terribly bad and
I apologize to all concerned, and especially to Dean Hodgson.
Dale Bryant

[DALE]
Dean Hodgson has sent the above which is now available for downloading from
the GFAWHELP web site.  If you are interested in disk I/O don't miss this
one. This is code that all data base programmers should find very beneficial
[DEAN]

These functions use Windows API calls for disk file I/O. The functions are
especially designed for use in a network environment where files are shared
by many users. Files are essentially random access with fixed-length
records.
Here is something else you can add to the library.

I recently needed to develop a set of disk file functions using the API
instead of GFA's own. This is the result. I particularly needed the
ability to lock a whole file for single user access on a network during
writing and also allow that file multiple access for read-only
activities. This prompted the Openr and Openw functions in the code. All
the rest flowed from that. The record locking functions were something I
added but I don't use. I have tested these on a Win98 network and in
conjunction with my Dos software, which is written in a different
language. The Dos and GFAWin programs interacted without a hitch.
Documentation is a WRI file. Oddly enough, these functions appear to
work a shade more quickly than GFA's own equivalent.

---------------------------------------------------------------------------
Dean Hodgson
http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 02 23:00:05 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107VXV-00NL3EC>; Tue, 2 Feb 1999 03:26:09 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA24144; Tue, 2 Feb 1999 02:56:18 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B66C01.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Feb 1999 20:55:10 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="65114bc5-ba41-11d2-aaef-00805fea3ca9"
Subject: [GFA] BLOAD and BGET
X-UIDL: 5d4fdac5148779638aad79a1da685776

 '-------------------------------------------
  ' Write out the data in 32768 byte chunks.
  '-------------------------------------------

John,

Very clever.  I've modified your routine somewhat and added a companion
HugeRead() function as well.
 
They both work fine interpreted or compiled. Was there a reason you used
&h7FFF rather than &h8000 bocks?

My routine using BGET seems OK, but BPUT  is just plain flaky. I don't have
a clue.

Huge functions using _hread() and _hwrite() are producing an error of
"Function Unidentified", so I've given up on them.

Best Regards

Brent



Attachment Converted: "c:\programme\eudora\attach\TESTBGE4.LST"
From ???@??? Tue Feb 02 23:00:07 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107WLW-00NKtIC>; Tue, 2 Feb 1999 04:17:50 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA24235; Tue, 2 Feb 1999 03:44:18 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B6773C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Feb 1999 21:42:58 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="6511663c-ba41-11d2-aaef-00805fea3ca9"
Subject: [GFA] BLOAD and BGET
X-UIDL: 6584699e4b77f9fd16108388673d87a5

Oops.

I sent the wrong version.

Here's the correct version.

Routines based on your example work fine, compiled or interpreted.

Routine using BPUT works interpreted, but not compiled.

Do you have a more complete example of the _hread, _hwrite implementation?

Brent.

Attachment Converted: "c:\programme\eudora\attach\TESTBGE41.LST"
From ???@??? Tue Feb 02 23:00:08 1999
Return-Path: <the_bear1@hotmail.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107XkJ-00NLIpC>; Tue, 2 Feb 1999 05:47:31 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA24413; Tue, 2 Feb 1999 05:19:05 +0100
From: Tom <the_bear1@hotmail.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B68D75.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 01 Jan 1999 11:10:03 -0500
X-Mailer: Mozilla 4.07 [en] (Win95; I)
MIME-Version: 1.0
References: <36B4D42D.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] How to unsibscribe
X-UIDL: 1a8fdae1c74a3ac44ba53c7fd9d10cd3

Hi Adrian, did you find out how to unsubscribe? I've been
trying to as well. If you know, can you tell me?

Thanks
Tom

Adrian Kendrick wrote:
> 
> Please someone tell me how to UNSUBSCRIBE from this newsletter, thanks.
> --
> Regards
> Adrian Kendrick
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 02 23:00:10 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107YWE-00NOB0C>; Tue, 2 Feb 1999 06:37:02 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id GAA24514; Tue, 2 Feb 1999 06:09:03 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B69924.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990202050852.DCOX8892@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 2 Feb 1999 05:08:52 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 2 Feb 1999 05:08:52 +0000
Subject: Re: [GFA] How to unsibscribe
X-UIDL: ab4a8b5a6d03530c3b490db1d9fb0970

to remove yourself from this list, send a message to
gfabasic@aachen.linux.de with "unsubscribe" (without the quotation marks)
in the SUBJECT of the message. Don't add anything else (such as
"un-subscribe"), because the list processor can't recognize that as a
request.

LLaP
bero

<G>
TomR.


At 11:10 AM 01/01/99 -0500, you wrote:
>Hi Adrian, did you find out how to unsubscribe? I've been
>trying to as well. If you know, can you tell me?
>
>Thanks
>Tom
>
>Adrian Kendrick wrote:
>> 
>> Please someone tell me how to UNSUBSCRIBE from this newsletter, thanks.
>> --
>> Regards
>> Adrian Kendrick
>> 
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 02 23:00:15 1999
Return-Path: <adrian@fkend.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107dEH-00NLGZC>; Tue, 2 Feb 1999 11:38:49 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA25076; Tue, 2 Feb 1999 11:07:01 +0100
From: Adrian Kendrick <adrian@fkend.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B6DF11.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Feb 1999 08:46:47 +0000
References: <36B4D42D.BeroList-2.5.9@aachen.linux.de>
 <36B68D75.BeroList-2.5.9@aachen.linux.de>
In-Reply-To: <36B68D75.BeroList-2.5.9@aachen.linux.de>
MIME-Version: 1.0
X-Mailer: Turnpike (32) Version 4.01  <qPaIXqrkXNlirhxDnnIvxdrD0B>
Subject: Re: [GFA] How to unsibscribe
X-UIDL: e9a5166dc9fccbaafcec52d4d2bb598f

Hi Tom
I got a message telling me to mail <gfabasic@aachen.linux.de> and put
unsubscribe in the subject box, we will see!


In message <36B68D75.BeroList-2.5.9@aachen.linux.de>, Tom
<the_bear1@hotmail.com> writes
>Hi Adrian, did you find out how to unsubscribe? I've been
>trying to as well. If you know, can you tell me?
>
>Thanks
>Tom
>
>Adrian Kendrick wrote:
>> 
>> Please someone tell me how to UNSUBSCRIBE from this newsletter, thanks.
>> --
>> Regards
>> Adrian Kendrick
>> 
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org

-- 
Regards
Adrian Kendrick

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 02 23:00:16 1999
Return-Path: <adrian@fkend.demon.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107dEZ-00NLCBC>; Tue, 2 Feb 1999 11:39:07 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA25078; Tue, 2 Feb 1999 11:07:03 +0100
From: Adrian Kendrick <adrian@fkend.demon.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B6DF11.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Feb 1999 08:47:22 +0000
References: <36B69924.BeroList-2.5.9@aachen.linux.de>
In-Reply-To: <36B69924.BeroList-2.5.9@aachen.linux.de>
MIME-Version: 1.0
X-Mailer: Turnpike (32) Version 4.01  <qPaIXqrkXNlirhxDnnIvxdrD0B>
Subject: Re: [GFA] How to unsibscribe
X-UIDL: 6760909aace6c8ec3bed570dcf995f98

Thanks for information, I will give it a try.


In message <36B69924.BeroList-2.5.9@aachen.linux.de>, Tom Record
<tiger.genealogical.rescue@worldnet.att.net> writes
>to remove yourself from this list, send a message to
>gfabasic@aachen.linux.de with "unsubscribe" (without the quotation marks)
>in the SUBJECT of the message. Don't add anything else (such as
>"un-subscribe"), because the list processor can't recognize that as a
>request.
>
>LLaP
>bero
>
><G>
>TomR.
>
>
>At 11:10 AM 01/01/99 -0500, you wrote:
>>Hi Adrian, did you find out how to unsubscribe? I've been
>>trying to as well. If you know, can you tell me?
>>
>>Thanks
>>Tom
>>
>>Adrian Kendrick wrote:
>>> 
>>> Please someone tell me how to UNSUBSCRIBE from this newsletter, thanks.
>>> --
>>> Regards
>>> Adrian Kendrick
>>> 
>>> ---
>>> This mailing list is currently running BeroList v2.5.6
>>> Report problems to bero@bero-online.ml.org
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org

-- 
Regards
Adrian Kendrick

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 02 23:00:17 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107db9-00NOBDC>; Tue, 2 Feb 1999 12:02:27 +0100 (MET)
Received: from aachen.linux.de (bero-online.ml.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA25140; Tue, 2 Feb 1999 11:32:29 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B6E4F6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Feb 1999 05:32:05 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="62a051d2-ba88-11d2-b233-00805feabca1"
Subject: [GFA] BLOAD and BGET
X-UIDL: 2b0a437b4f655593021308edd8d4aee6

Brent,

>> Was there a reason you used &h7FFF rather than &h8000 bocks? <<

Acording to the documentation for _lread & _lwrite you can use;

0xFFFE (65,534)       one short of a UINT

However, I read somewhere that _lread & _lwrite don't always handle blocks
greater than a signed int ($7FFF) correctly (don't know why!) so that's
what I use to be safe.

The _hread & _hwrite routines are attached [Hugew1.lst].


Regards,

John

Attachment Converted: "c:\programme\eudora\attach\Hugew1.lst"
From ???@??? Tue Feb 02 23:00:19 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m107hTY-00NPafC>; Tue, 2 Feb 1999 16:10:52 +0100 (MET)
Received: from aachen.linux.de (tng.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA25567; Tue, 2 Feb 1999 15:30:41 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B71CDB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 2 Feb 1999 08:28:54 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Drag'n Drop
X-UIDL: 11169bdc920c1ef7e61730d65398dc33

Hi!

Has anyone experiences in using drag 'n drop together with GFA? I want to
send a "drop-message" to WinWord 6 to let it load a document. Can I do this
with a simple SENDMESSAGE? What is the API-Message?

Many thanks in advance
Yours

Thomas



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 03 19:04:22 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1086Ja-00NPgcC>; Wed, 3 Feb 1999 18:42:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA28162; Wed, 3 Feb 1999 18:00:36 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B891A2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Feb 1999 17:33:42 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: [GFA] Dialog Help Please

X-UIDL: 820d5d9a6d947edd25002208be699b2f

Hallo GFA friends.

I like to make an dialog box, that stays in the foreground so that the user 
can't ignore it. He must give an input, before the programm goes on, like an 
"Alert-Box". But I don't find out, how to make it with normal dialog functions 
in GFABasic. The only way I see is to use the API-Command "DialogBoxIndirect". 
( May be useful. )

Has someone found out an easier way to go ??

Help needed !!

Thank you

M.f.G.
Wilhelm Bckmann
Email Bueckmann.W@T-Online.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 03 22:37:18 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10884A-00NLCBC>; Wed, 3 Feb 1999 20:34:26 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA28417; Wed, 3 Feb 1999 20:05:23 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B8AEBA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Wed, 03 Feb 1999 19:53:57 -0100
In-Reply-To: <36B6E4F6.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Subject: Re: [GFA] BLOAD and BGET

X-UIDL: 8b51e502690f30eddbd0639e87d08991

At 05:32 02.02.1999 -0500, you wrote:
>>> Was there a reason you used &h7FFF rather than &h8000 bocks? <<

There is a good way using huge functions (see listing below).
Bye, Roland Walter
-------------------------------------------------------
'BIGFILE.GFW - How to load and save files bigger then 64KB
'Roland Walter, Berlin Feb. 1999
'Just since Windows 3.1 there are some API functions for easy handling files bigger then 64KB,
'You simply have to use them. This example program copys a file wich can be so big if You
'have memory.
'If You want to make changes in a part of the memory block it is important not to forget
'we have to work with Segment+Offset addresses. The GFA Basic functions _HUGE can help
'to handle this problem relatively simple.

InFile$="c:\command.com"  'source file wich is to copy (with each size if You have enough free memory)
OutFile$="d:\command.com"   'destination filename + path

DLL #1,"kernel"  'declare functions not just declared in GFA Basic 4.38
  DECL LONG _hread(W,L,L)  'load files bigger then 64KB into memory (exists since Windows 3.1)
  DECL LONG _hwrite(W,L,L)  'write files bigger then 64KB from memory (exists since Windows 3.1)
  //DECL BYTE hmemcpy(L,L,L) 'copy memory blocks bigger then 64KB (exists since Windows 3.1)
ENDDLL

hFile&=_lopen(InFile$,OF_READ) 'The file can be so big as You have free memory
lenFile%=@LOF(hFile&) 'because we use Windows file handles we cannot use the GFA LOF command
hMem&=GlobalAlloc(GMEM_FIXED,lenFile%)  'get a memory block
lpMem%=GlobalLock(hMem&) ' fix the memory block and get back the address
~@@_hread(hFile&,lpMem%,lenFile%) 'read the complete file into the memory block
~_lclose(hFile&)  'after closing the file handle is invalid
IF EXIST(OutFile$)
  hFile&=_lopen(OutFile$,OF_WRITE) 'open the destination file and set length to zero
ELSE
  hFile&=_lcreat(OutFile$,0) 'create and open the destination file
ENDIF
~@@_hwrite(hFile&,lpMem%,lenFile%)  'write the file from memory to hard disk
~_lclose(hFile&)  ' close the destination file
~GlobalUnlock(hMem&) 'don't forget to unlock the memory block before free it
~GlobalFree(hMem&) 'free the memory block

FREEDLL 1

FUNCTION LOF(hFile&) 'replacement for GFA's LOF using "real"  file handles
  $FUNC%
  LOCAL CurrentPos%=_llseek(hFile&,0,0)  'return the current position in file
  LOCAL LOF%=_llseek(hFile&,0,2) 'set file pointer to end of file and get position
  ~_llseek(hFile&,CurrentPos%,0) 'reset to the current position
  RETURN LOF% 'return length of file or -1 if error
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 03 22:37:22 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1088Yu-00NOB7C>; Wed, 3 Feb 1999 21:06:12 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA28518; Wed, 3 Feb 1999 20:24:57 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B8B33E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Feb 1999 11:19:29 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: 500fb0611ef29107accdd76a62f2907d

Hi Roland,
I tried to run your code but get syntax errors on the following
>  DECL LONG _hread(W,L,L)  'load files bigger then 64KB into memory (exists
since Windows 3.1)
>  DECL LONG _hwrite(W,L,L)  'write files bigger then 64KB from memory
(exists since Windows 3.1)
my gfa editor does not like these and I wondered if you knew why?
I would like to get it working as it would be a great routine for the help
file.
Dale


----- Original Message -----
From: Roland Walter <alibaba@zedat.fu-berlin.de>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, February 03, 1999 12:53 PM
Subject: Re: [GFA] BLOAD and BGET


>At 05:32 02.02.1999 -0500, you wrote:
>>>> Was there a reason you used &h7FFF rather than &h8000 bocks? <<
>
>There is a good way using huge functions (see listing below).
>Bye, Roland Walter
>-------------------------------------------------------
>'BIGFILE.GFW - How to load and save files bigger then 64KB
>'Roland Walter, Berlin Feb. 1999
>'Just since Windows 3.1 there are some API functions for easy handling
files bigger then 64KB,
>'You simply have to use them. This example program copys a file wich can be
so big if You
>'have memory.
>'If You want to make changes in a part of the memory block it is important
not to forget
>'we have to work with Segment+Offset addresses. The GFA Basic functions
_HUGE can help
>'to handle this problem relatively simple.
>
>InFile$="c:\command.com"  'source file wich is to copy (with each size if
You have enough free memory)
>OutFile$="d:\command.com"   'destination filename + path
>
>DLL #1,"kernel"  'declare functions not just declared in GFA Basic 4.38
>  DECL LONG _hread(W,L,L)  'load files bigger then 64KB into memory (exists
since Windows 3.1)
>  DECL LONG _hwrite(W,L,L)  'write files bigger then 64KB from memory
(exists since Windows 3.1)
>  //DECL BYTE hmemcpy(L,L,L) 'copy memory blocks bigger then 64KB (exists
since Windows 3.1)
>ENDDLL
>
>hFile&=_lopen(InFile$,OF_READ) 'The file can be so big as You have free
memory
>lenFile%=@LOF(hFile&) 'because we use Windows file handles we cannot use
the GFA LOF command
>hMem&=GlobalAlloc(GMEM_FIXED,lenFile%)  'get a memory block
>lpMem%=GlobalLock(hMem&) ' fix the memory block and get back the address
>~@@_hread(hFile&,lpMem%,lenFile%) 'read the complete file into the memory
block
>~_lclose(hFile&)  'after closing the file handle is invalid
>IF EXIST(OutFile$)
>  hFile&=_lopen(OutFile$,OF_WRITE) 'open the destination file and set
length to zero
>ELSE
>  hFile&=_lcreat(OutFile$,0) 'create and open the destination file
>ENDIF
>~@@_hwrite(hFile&,lpMem%,lenFile%)  'write the file from memory to hard
disk
>~_lclose(hFile&)  ' close the destination file
>~GlobalUnlock(hMem&) 'don't forget to unlock the memory block before free
it
>~GlobalFree(hMem&) 'free the memory block
>
>FREEDLL 1
>
>FUNCTION LOF(hFile&) 'replacement for GFA's LOF using "real"  file handles
>  $FUNC%
>  LOCAL CurrentPos%=_llseek(hFile&,0,0)  'return the current position in
file
>  LOCAL LOF%=_llseek(hFile&,0,2) 'set file pointer to end of file and get
position
>  ~_llseek(hFile&,CurrentPos%,0) 'reset to the current position
>  RETURN LOF% 'return length of file or -1 if error
>ENDFUNC
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 03 22:37:23 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1088ah-00NPZyC>; Wed, 3 Feb 1999 21:08:03 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA28568; Wed, 3 Feb 1999 20:39:40 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B8B6B8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 3 Feb 1999 11:34:00 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] GFAWHELP
X-UIDL: 53176a466332f1d7ba0633761f74754d

A new version of GFAWHELP is available for down load from the web site
below. The new version is compiled for Win3.x and not WIn95.  Also a few
routines have been added to the help file.
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Feb 04 21:37:50 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m108AyY-00NPaDC>; Wed, 3 Feb 1999 23:40:50 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA28845; Wed, 3 Feb 1999 23:07:23 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B8D95C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@bero-online.ml.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 18:17:34(GMT) on February 03, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Wed, 03 Feb 1999 19:07:29 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] Error 112?
X-UIDL: 48703e2db202f935a6504b08d009f43b

Hi!

Am am getting Errors 112 when I am writing code in my program. The source
has now 375 kB. Is there any limit?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Feb 04 21:37:53 1999
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m108C5w-00NPaVC>; Thu, 4 Feb 1999 00:52:32 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA28993; Thu, 4 Feb 1999 00:22:54 +0100
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B8EB0E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 04 Feb 1999 08:48:06 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <36B891A2.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Subject: Re: [GFA] Dialog Help Please

X-UIDL: 6f8e5ebf3907e03dfbbc1f29947f8b80

Bueckmann.W wrote:
> 
> Hallo GFA friends.
> 
> I like to make an dialog box, that stays in the foreground so that the user
> can't ignore it. He must give an input, before the programm goes on, like an
> "Alert-Box". But I don't find out, how to make it with normal dialog functions
> in GFABasic. The only way I see is to use the API-Command "DialogBoxIndirect".
> ( May be useful. )
> 
> Has someone found out an easier way to go ??
> 
> Help needed !!
> 
> Thank you
> 
> M.f.G.
> Wilhelm Bckmann
> Email Bueckmann.W@T-Online.de
> 

I ran into this early on, too. There are two ways to achieve it.

1. Disable the window from which you went into the Dialog. Say that your
first window is another dialog with #0 that you have assigned. The
procedure is:
	Dialog #1,....	'your new dialog
	  ...
	Enddialog
	~EnableWindow(DLG(0),0)	'this is an API call that disables the first
window.
	....		'rest of code here
	Closedialog #1	'finish the top dialog
	~EnableWindow(DLG(0),-1)	'reenable the previous window

2. Use the API call  ~SetSysModalWindow(DLG(1))  after creating your
dialog (the one you want all input to go to). This forces Windows to
suspend everything else until that dialog is closed. Be careful not to
call another dialog from this one.


Here is an example. This function pops up a dialog box to request a
password. It returns a string containing the password, or a null string
if cancel was selected. The dialog uses SetSysModalWindow to require an
input before anything else happens.  Note that a few of my own functions
that do special things are included.

FUNCTION password$(title$,msg$)
  LOCAL e&,result$,pwdctl%,dlgctl%
  dlgctl%=DS_SYSMODAL | WS_VISIBLE | DS_NOIDLEMSG	'dialog box properties
  pwdctl%=WS_VISIBLE | WS_BORDER | ES_PASSWORD | WS_TABSTOP	'editbox
properties
  DIALOG #31,215,165,210,170,title$,dlgctl%		'make dialog
    CTEXT msg$,313,0,20,210,64				'the message that appears above the
editbox
    EDITTEXT "",310,10,63,188,24,pwdctl%		'editbox for inputting the
password
    PUSHBUTTON "OK",IDOK,35,110,60,24			'OK button
    PUSHBUTTON "Cancel",IDCANCEL,115,110,60,24		'Cancel button
  ENDDIALOG
  ft&=@zfont(DLGITEM(31,310),"TIMES",12,24,"")		'my own function to
change the font, size & props.
  DLG FILL 31,RGB(0,255,255)				'colour the dialog
  ~SetFocus(DLGITEM(31,310))				'set focus on editbox
  ~SetSysModalWindow(DLG(31))				'dialog takes control here
  e&=FALSE
  result$=""						'string that will hold password
  REPEAT						'main loop
    PEEKEVENT						'get Windows message
    IF _Mess=WM_COMMAND
      SELECT _wParam
      CASE IDOK						'OK button pressed, pick up password
        result$=_WIN$(DLGITEM(31,310))
        e&=TRUE
      CASE IDCANCEL					'Cancel button pressed
        result$=""
        e&=TRUE
      ENDSELECT
    ENDIF
    EXIT IF MENU(1)=4 OR e&=TRUE			'exit if button pressed or window
closed
  LOOP
  zfreefont(ft&)					'release font
  CLOSEDIALOG #31					'close dialog
  GOSUB clearevents					'function that clears message que
  RETURN result$					'return the string
ENDFUNC

 
---------------------------------------------------------------------------
Dean Hodgson
BookMark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8226-1541  fax 0011-61-8-8410-2856
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Feb 04 21:37:55 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m108FPV-00NLCBC>; Thu, 4 Feb 1999 04:24:57 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA29339; Thu, 4 Feb 1999 03:54:59 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B91CCC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990204025442.BNSK20681@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 4 Feb 1999 02:54:42 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 4 Feb 1999 02:54:42 +0000
Subject: Re: [GFA] GFAWHELP
X-UIDL: 21fdd70063b86f87225b6ce8a6180d23

Thank you, Dale.
<G>
TomR.


At 11:34 AM 03/02/99 -0800, you wrote:
>A new version of GFAWHELP is available for down load from the web site
>below. The new version is compiled for Win3.x and not WIn95.  Also a few
>routines have been added to the help file.
>Dale
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net/adbryant
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Feb 04 21:37:56 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m108Jrj-00NPH5C>; Thu, 4 Feb 1999 09:10:23 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA29883; Thu, 4 Feb 1999 08:41:34 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36B95FEF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 4 Feb 1999 02:41:02 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="31cf2191-bbfe-11d2-aaef-00805fea3ca9"
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: 592ecbf9a04af3001953e8bfd6ccc89c

My interpreter also hangs on _hread, etc. I believe these are unimplemented
reserved words.
But I'm not sure.

However, I added my own version of OOPS to some code I got from John and
Eberhart, and the result is 
attached in HUGEOPS.LST.

Thanks all.
BD



 

Attachment Converted: "c:\programme\eudora\attach\HUGEOPS.LST"
From ???@??? Mon Feb 08 18:05:01 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m108itC-00NPgFC>; Fri, 5 Feb 1999 11:53:34 +0100 (MET)
Received: from aachen.linux.de ([198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA32531; Fri, 5 Feb 1999 11:33:05 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BAD9F0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 5 Feb 1999 11:37:21 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Error 112?
X-UIDL: 2fb0b99fd6dc9b5012c1c80a42ad5c79


Do you have huge procedures ?
If yes, try to split them into parts

Michael


> ----------
> Von: 	Michael Weigand[SMTP:michael@bonbit.org]
> Gesendet: 	Mittwoch, 03. Februar 1999 19:07
> An: 	gfabasic@aachen.linux.de
> Betreff: 	[GFA] Error 112?
> 
> Hi!
> 
> Am am getting Errors 112 when I am writing code in my program. The source
> has now 375 kB. Is there any limit?
> 
> 
> M!chael
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 08 18:05:13 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m108vTQ-00NPdBC>; Sat, 6 Feb 1999 01:19:48 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA01394; Sat, 6 Feb 1999 00:50:03 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BB9477.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 5 Feb 1999 12:02:01 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: 488cbaae0b15e5ca44c1deae74906c2d

Did anyone get this to work?

----- Original Message -----
From: Roland Walter <alibaba@zedat.fu-berlin.de>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, February 03, 1999 12:53 PM
Subject: Re: [GFA] BLOAD and BGET


>At 05:32 02.02.1999 -0500, you wrote:
>>>> Was there a reason you used &h7FFF rather than &h8000 bocks? <<
>
>There is a good way using huge functions (see listing below).
>Bye, Roland Walter
>-------------------------------------------------------
>'BIGFILE.GFW - How to load and save files bigger then 64KB
>'Roland Walter, Berlin Feb. 1999
>'Just since Windows 3.1 there are some API functions for easy handling
files bigger then 64KB,
>'You simply have to use them. This example program copys a file wich can be
so big if You
>'have memory.
>'If You want to make changes in a part of the memory block it is important
not to forget
>'we have to work with Segment+Offset addresses. The GFA Basic functions
_HUGE can help
>'to handle this problem relatively simple.
>
>InFile$="c:\command.com"  'source file wich is to copy (with each size if
You have enough free memory)
>OutFile$="d:\command.com"   'destination filename + path
>
>DLL #1,"kernel"  'declare functions not just declared in GFA Basic 4.38
>  DECL LONG _hread(W,L,L)  'load files bigger then 64KB into memory (exists
since Windows 3.1)
>  DECL LONG _hwrite(W,L,L)  'write files bigger then 64KB from memory
(exists since Windows 3.1)
>  //DECL BYTE hmemcpy(L,L,L) 'copy memory blocks bigger then 64KB (exists
since Windows 3.1)
>ENDDLL
>
>hFile&=_lopen(InFile$,OF_READ) 'The file can be so big as You have free
memory
>lenFile%=@LOF(hFile&) 'because we use Windows file handles we cannot use
the GFA LOF command
>hMem&=GlobalAlloc(GMEM_FIXED,lenFile%)  'get a memory block
>lpMem%=GlobalLock(hMem&) ' fix the memory block and get back the address
>~@@_hread(hFile&,lpMem%,lenFile%) 'read the complete file into the memory
block
>~_lclose(hFile&)  'after closing the file handle is invalid
>IF EXIST(OutFile$)
>  hFile&=_lopen(OutFile$,OF_WRITE) 'open the destination file and set
length to zero
>ELSE
>  hFile&=_lcreat(OutFile$,0) 'create and open the destination file
>ENDIF
>~@@_hwrite(hFile&,lpMem%,lenFile%)  'write the file from memory to hard
disk
>~_lclose(hFile&)  ' close the destination file
>~GlobalUnlock(hMem&) 'don't forget to unlock the memory block before free
it
>~GlobalFree(hMem&) 'free the memory block
>
>FREEDLL 1
>
>FUNCTION LOF(hFile&) 'replacement for GFA's LOF using "real"  file handles
>  $FUNC%
>  LOCAL CurrentPos%=_llseek(hFile&,0,0)  'return the current position in
file
>  LOCAL LOF%=_llseek(hFile&,0,2) 'set file pointer to end of file and get
position
>  ~_llseek(hFile&,CurrentPos%,0) 'reset to the current position
>  RETURN LOF% 'return length of file or -1 if error
>ENDFUNC
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 08 18:05:15 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m108yO0-00NOAXC>; Sat, 6 Feb 1999 04:26:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA01709; Sat, 6 Feb 1999 03:57:36 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BBC065.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990206025718.DBLD15154@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 6 Feb 1999 02:57:18 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 6 Feb 1999 02:57:18 +0000
Subject: [GFA] re: did anybody get this to work...
X-UIDL: 377e03a14cbf7ad20247cc43a12b730c

  '=>>  DECL LONG _hread(W,L,L)  'load files bigger then 64KB into memory
(exists since Windows 3.1)
  '=>>  DECL LONG _hwrite(W,L,L)  'write files bigger then 64KB from memory
(exists since Windows 3.1)
  '=>>~@@_hread(hFile&,lpMem%,lenFile%) 'read the complete file into the
memory block
  '=>>~@@_hwrite(hFile&,lpMem%,lenFile%)  'write the file from memory to
hard disk

Well, on my P100, running Win95 v4.00.950a, the editor refuses the four
lines above repeatedly.  The GFA-W version is 4.38, the editor is
gfawin37.exe, 309K, 25/02/98.

It isn't as if I could say Windows is the culprit since the O/S never sees them.

Personally, I could use such a fine means of copying files.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 08 18:05:19 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109u1C-00NIpmC>; Mon, 8 Feb 1999 17:58:42 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1092Li-00ZnfnC>; Sat, 6 Feb 1999 08:40:18 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA02187; Sat, 6 Feb 1999 07:57:30 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BBF8A0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 20:49:17(GMT) on February 05, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Fri, 05 Feb 1999 19:11:55 +0100
In-Reply-To: <36BAD9F0.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re: AW: [GFA] Error 112?
X-UIDL: 1445084d1199cbf89b42cafea42dfa6e

At 11:37 05.02.99 +0100, Vogel Michael wrote:
>
>Do you have huge procedures ?
>If yes, try to split them into parts

My procedures are as compact as they should be, I think. What exactly does
Error 112 mean?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 08 18:05:21 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109u1P-00NOXbC>; Mon, 8 Feb 1999 17:58:55 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1092M6-00ZnfvC>; Sat, 6 Feb 1999 08:40:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA02189; Sat, 6 Feb 1999 07:57:31 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BBF8A7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 20:49:17(GMT) on February 05, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Fri, 05 Feb 1999 19:11:55 +0100
In-Reply-To: <36BAD9F0.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re: AW: [GFA] Error 112?
X-UIDL: d0563b9850780e5163022f1e1da03d9e

At 11:37 05.02.99 +0100, Vogel Michael wrote:
>
>Do you have huge procedures ?
>If yes, try to split them into parts

My procedures are as compact as they should be, I think. What exactly does
Error 112 mean?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:15:57 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109uRj-00NPdAC>; Mon, 8 Feb 1999 18:26:07 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10967c-00amW8C>; Sat, 6 Feb 1999 12:42:00 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA02773; Sat, 6 Feb 1999 11:59:17 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BC3157.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Feb 1999 05:57:59 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="07a80a2a-bd9d-11d2-877f-00805feabc89"
Subject: [GFA] re: did anybody get this to work...
X-UIDL: de6ea341dc0e4addc1b455b88c6be164

Tom,

>Personally, I could use such a fine means of copying files.<

My GFA editor does not like DECL LONG _hwrite(W,L,L) either, I think it's
the
'_' that starts that it doesn't like.

You can use the other method; I sent a listing some days ago.

Attached is the same listing; Hugew1.lst


John

Attachment Converted: "c:\programme\eudora\attach\Hugew11.lst"
From ???@??? Fri Feb 12 15:15:59 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109uiY-00NPgiC>; Mon, 8 Feb 1999 18:43:30 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109Tsh-00aqoOC>; Sun, 7 Feb 1999 14:04:11 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA05255; Sun, 7 Feb 1999 13:17:33 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BD953F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 09:43:44(GMT) on February 07, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 06 Feb 1999 21:05:11 +0100
In-Reply-To: <36BC67A0.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: [GFA] More troubles with Error 112!
X-UIDL: e91dc894f30176346773981d1fdad004

Hi!

First I just got errors 112 when I was adding any code to my program. Now I
get an error "Peek/Poke/Call adress error" when I load the source into the
interpreter!

Is there anybody out there who can help?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:00 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109ulb-00NPgwC>; Mon, 8 Feb 1999 18:46:39 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m1099jP-00anMZC>; Sat, 6 Feb 1999 16:33:15 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA03155; Sat, 6 Feb 1999 15:51:09 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BC67A0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990206145053.GSJV15154@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 6 Feb 1999 14:50:53 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Sat, 6 Feb 1999 14:50:53 +0000
Subject: [GFA] correction   0602xx1-
X-UIDL: eb8ffd14ecca4e074f17e90401bcc6be

06/02/99 08:24:37 AM   correction   0602xx1-

Sir John of Findlay put his finger on the problem.....
Four lines have an underscore that must NOT be there.  It works like a champ
without'em, bombs w/'em.

'BIGFILE.GFW - How to load and save files bigger then 64KB
'Roland Walter, Berlin Feb. 1999
'Just since Windows 3.1 there are some API functions for easy handling files
bigger then 64KB,
'You simply have to use them. This example program copys a file wich can be
so big if You
'have memory.
'If You want to make changes in a part of the memory block it is important
not to forget
'we have to work with Segment+Offset addresses. The GFA Basic functions
_HUGE can help
'to handle this problem relatively simple.

InFile$ = "d:\z\040299\as4-020.jpg"  'source file wich is to copy (with each
size if You have enough free memory)
OutFile$ = "e:\as4-020.jpg"   'destination filename + path

DLL #1,"kernel"  'declare functions not just declared in GFA Basic 4.38
  DECL LONG hread(W,L,L)  'load files bigger then 64KB into memory (exists
since Windows 3.1)
  DECL LONG hwrite(W,L,L)  'write files bigger then 64KB from memory (exists
since Windows 3.1)
/* neither of the 2 above wants an underscore ~_hread... or ~_hwrite...
  //DECL BYTE hmemcpy(L,L,L) 'copy memory blocks bigger then 64KB (exists
since Windows 3.1)
/* works without the above... should it be in for some reason?
ENDDLL

hFile& = _lopen(InFile$,OF_READ) 'The file can be so big as You have free memory
lenFile% = @LOF(hFile&) 'because we use Windows file handles we cannot use
the GFA LOF command
hMem& = GlobalAlloc(GMEM_FIXED,lenFile%)  'get a memory block
lpMem% = GlobalLock(hMem&) ' fix the memory block and get back the address
~@@hread(hFile&,lpMem%,lenFile%) 'read the complete file into the memory block
/* above does NOT want an underscore ~@@_hread...
~_lclose(hFile&)  'after closing the file handle is invalid
IF EXIST(OutFile$) /* *I* found this moved by wordwrap... gotta be here!
  hFile& = _lopen(OutFile$,OF_WRITE) 'open the destination file and set
length to zero
ELSE
  hFile& = _lcreat(OutFile$,0) 'create and open the destination file
ENDIF
~@@hwrite(hFile&,lpMem%,lenFile%)  'write the file from memory to hard disk
/* again, above does NOT want an underscore ~@@_hwrite...
~_lclose(hFile&)  ' close the destination file
~GlobalUnlock(hMem&) 'don't forget to unlock the memory block before free it
~GlobalFree(hMem&) 'free the memory block

FREEDLL 1

FUNCTION LOF(hFile&) 'replacement for GFA's LOF using "real"  file handles
  $FUNC%
  LOCAL CurrentPos%=_llseek(hFile&,0,0)  'return the current position in file
  LOCAL LOF%=_llseek(hFile&,0,2) 'set file pointer to end of file and get
position
  ~_llseek(hFile&,CurrentPos%,0) 'reset to the current position
  RETURN LOF% 'return length of file or -1 if error
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:06 1999
Return-Path: <Ciraten13@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109vUp-00NLKjC>; Mon, 8 Feb 1999 19:33:23 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109daP-00atrWC>; Mon, 8 Feb 1999 00:25:57 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA06347; Sun, 7 Feb 1999 23:43:23 +0100
From: Ciraten13@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BE27D3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Feb 1999 17:41:43 EST
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 3.0.i  for Windows sub 74
Subject: [GFA] listing
X-UIDL: e90e4031b75ee67dd8a9f8b4ab5b4d20

Bitte um eintragung in der mailinglist

Danke. M.K.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:07 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109vYe-00NOB5C>; Mon, 8 Feb 1999 19:37:20 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA08553; Mon, 8 Feb 1999 19:07:37 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BF38B2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 17:11:10(GMT) on February 08, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 07 Feb 1999 21:26:49 +0100
In-Reply-To: <36BDB288.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re: [GFA] More troubles with Error 112!
X-UIDL: e924cdd4ffa33f8b41518a7c828214a9

At 09:21 07.02.99 -0500, John Findlay wrote:

>>> My procedures are as compact as they should be, I think. <<
>
>As you have large source code, an apropriate question is how big is your
>biggest PROCEDURE or FUNCTION?

I now solved the problem by splitting the procedure which sets up the
dialogs used in my program. Everything seems to work fine now!

>Did you know that there is a limit to how big a procedure can be. Can't
>remember, but it's either 32k or 64k.

I didn't know about any limits in GfA Basic. 


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:08 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109vYj-00NOXJC>; Mon, 8 Feb 1999 19:37:25 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA08551; Mon, 8 Feb 1999 19:07:37 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BF38B2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 17:11:10(GMT) on February 08, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 07 Feb 1999 21:26:49 +0100
In-Reply-To: <36BDB288.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re: [GFA] More troubles with Error 112!
X-UIDL: ee4cf8bd6b05fce722102e09e9091829

At 09:21 07.02.99 -0500, John Findlay wrote:

>>> My procedures are as compact as they should be, I think. <<
>
>As you have large source code, an apropriate question is how big is your
>biggest PROCEDURE or FUNCTION?

I now solved the problem by splitting the procedure which sets up the
dialogs used in my program. Everything seems to work fine now!

>Did you know that there is a limit to how big a procedure can be. Can't
>remember, but it's either 32k or 64k.

I didn't know about any limits in GfA Basic. 


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:09 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109vc0-00NKwUC>; Mon, 8 Feb 1999 19:40:48 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109VlQ-00arByC>; Sun, 7 Feb 1999 16:04:48 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA05473; Sun, 7 Feb 1999 15:23:04 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BDB288.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Feb 1999 09:21:32 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] More troubles with Error 112!
X-UIDL: 268839570ca7237eaa02e4fcdde317f6

M!chael,

>Is there anybody out there who can help?<

You wrote;

>> My procedures are as compact as they should be, I think. <<

As you have large source code, an apropriate question is how big is your
biggest PROCEDURE or FUNCTION?

Did you know that there is a limit to how big a procedure can be. Can't
remember, but it's either 32k or 64k.

If that's not the problem I don't know.



John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:26 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109wCd-00NOYzC>; Mon, 8 Feb 1999 20:18:39 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109Wjj-00arXmC>; Sun, 7 Feb 1999 17:07:07 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA05624; Sun, 7 Feb 1999 16:25:17 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BDC124.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990207152459.DOVI8151@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 7 Feb 1999 15:24:59 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 7 Feb 1999 15:24:59 +0000
Subject: Re: [GFA] More troubles with Error 112!
X-UIDL: d8336d243a3dc78b63dfbbb5e1996dc0

My two cents' worth... I think the limit is 32K.  I don't know why
just loading into the interpretor would pull a peek/poke - that's
kind of like SYNTAX errors - who the heck knows?

<G>
TomR.


At 09:21 AM 07/02/99 -0500, you wrote:
>M!chael,
>
>>Is there anybody out there who can help?<
>
>You wrote;
>
>>> My procedures are as compact as they should be, I think. <<
>
>As you have large source code, an apropriate question is how big is your
>biggest PROCEDURE or FUNCTION?
>
>Did you know that there is a limit to how big a procedure can be. Can't
>remember, but it's either 32k or 64k.
>
>If that's not the problem I don't know.
>
>
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:29 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109wlO-00NIpmC>; Mon, 8 Feb 1999 20:54:34 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109nW6-00awfyC>; Mon, 8 Feb 1999 11:02:10 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA07455; Mon, 8 Feb 1999 10:31:37 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BEBFDE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Feb 1999 10:26:31 +0100
References: <36BDB288.BeroList-2.5.9@aachen.linux.de>
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: [GFA] Procedures...

X-UIDL: 13808538b525c9a5dc66d34a2c7574cf


At the last line ( where the time is ), there is a number, showing you the 
size of your procedure ( or function ). It can't become greater then 31.
 
M.f.G.
Wilhelm Bckmann
Email Bueckmann.W@T-Online.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:33 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109x1D-00NOZaC>; Mon, 8 Feb 1999 21:10:55 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109pi8-00axkVC>; Mon, 8 Feb 1999 13:22:44 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA07687; Mon, 8 Feb 1999 12:37:49 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BEDD4F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Feb 1999 12:42:34 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: AW: [GFA] Error 112?
X-UIDL: f9530a1f6298b55cb00b7ed050cd2708

Sorry, I do not know - I think all this 1xx Errors have something to do with
memory,
If you have endless DATA lines you will receive a 122 for instance.

So I would try just things, you will have already done:
- Save as Text ... New ... Add Text file (to clean all unnecessary variable
names, etc.)
- Split the programmm into parts (just to see if it's problem of one
procedure or just the combination of all parts)

Good Luck

Michael

PS.: If it's a file you are able to forward, you can email to me
(vo@schoeller.at), I'll have a look at it..

> ----------
> Von: 	Michael Weigand[SMTP:michael@bonbit.org]
> Gesendet: 	Freitag, 05. Februar 1999 19:11
> An: 	gfabasic@aachen.linux.de
> Betreff: 	Re: AW: [GFA] Error 112?
> 
> At 11:37 05.02.99 +0100, Vogel Michael wrote:
> >
> >Do you have huge procedures ?
> >If yes, try to split them into parts
> 
> My procedures are as compact as they should be, I think. What exactly does
> Error 112 mean?
> 
> 
> M!chael
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:38 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m109xC6-00NPdqC>; Mon, 8 Feb 1999 21:22:10 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109qp8-00aySHC>; Mon, 8 Feb 1999 14:34:02 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA07860; Mon, 8 Feb 1999 13:49:34 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BEEE44.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990208124916.IRV25839@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 8 Feb 1999 12:49:16 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 8 Feb 1999 12:49:16 +0000
Subject: [GFA] re: error 112
X-UIDL: 4803c43f5b7b4267a0497b71669dde3c

/* Sample program Showing a method to report GFA errors

OPENW #10,0,0,400,400,~15
TITLEW #10,"Sample Error Trapping"
@BadMAth
@BadRedimension
END

//--------------------------------------------------/

PROCEDURE BadMAth
  /* Can't divide by zero, its a no no
  TRY
    FOR kx&=-5 TO 5
      PRINT kx&
      y=5/kx&
    NEXT kx&
  CATCH
  @GeneralErrorMessage
RETURN


PROCEDURE BadRedimension
  /* Can't Redimension and array
  TRY
    $Abig a()
    DIM a(2000)
    FOR kx&=1 TO 2000
      a(kx&)=kx&
    NEXT kx&
    DIM a(5000)
  CATCH
  @GeneralErrorMessage
RETURN


PROCEDURE GeneralErrorMessage
  /* Here is a partial list of
  LOCAL a$
  SWITCH ERR
  CASE -127
    a$ = "Function Call not possible in Standard Version"
  CASE -126 TO -100
    a$ = "Error Undefined" + STR$(ERR)
  CASE -99
    a$ = "Share missing, Network error"
  CASE -98
    a$ = "Lock violation, Network error"
  CASE -97
    a$ = "Sharing buffer exceeded, Network error"
  CASE -96 TO -37
    a$ = "Error Undefined"
  CASE -36
    a$ = "Resource Deadlock"
  CASE -35
    a$ = "Error -035"
  CASE -34
    a$ = "Result too large"
  CASE -29 TO -33
    a$ = "Error Undefined" + STR$(ERR)
  CASE -28
    a$ = "No space left on device"
  CASE -27 TO -25
    a$ = "Error Undefined" + STR$(ERR)
  CASE -24
    a$ = "Too many open files"
  CASE -23
    a$ = "Error -023"
  CASE -22
    a$ = "Invalid argument"
  CASE -21 TO -19
    a$ = "Error Undefined" + STR$(ERR)
  CASE -18
    a$ = "Cross-device link"
  CASE -17
    a$ = "File exists"
  CASE -16 TO -14
    a$ = "Error Undefined" + STR$(ERR)
  CASE -13
    a$ = "Access denied"
  CASE -12
    a$ = "Out of Memory"
  CASE -11
    a$ = "No more processes"
  CASE -10
    a$ = "No child processes"
  CASE -9
    a$ = "Bad File Number"
  CASE -8
    a$ = "Exec format error"
  CASE -7
    a$ = "Arg list too long"
  CASE -6 TO -3
    a$ = "Error Undefined" + STR$(ERR)
  CASE -2
    a$ = "No such file or directory"
  CASE -1
    a$ = "Invalid function"
  CASE 0
    a$ = "Error  000"
  CASE 1
    a$ = "Divide by zero"
  CASE 2
    a$ = "Overflow"
  CASE 3
    a$ = "Range error"
  CASE 4
    a$ = "Negative square root"
  CASE 5
    a$ = "SINGLE{} overflow"
  CASE 6
    a$ = "Error Undefined" + STR$(ERR)
  CASE 7
    a$ = "Redimension"
  CASE 8
    a$ = "Array not one dimension"
  CASE 9
    a$ = "Array index too big"
  CASE 10
    a$ = "Dim too big"
  CASE 11
    a$ = "Number of dimensions wrong"
  CASE 12
    a$ = "Error  012"
  CASE 13
    a$ = "String too long"
  CASE 14
    a$ = "Expression too complex"
  CASE 15 TO 19
    a$ = "Error Undefined" + STR$(ERR)
  CASE 20
    a$ = "Array too small"
  CASE 21
    a$ = "Wrong File#"
  CASE 22
    a$ = "File allready opened"
  CASE 23
    a$ = "Open mode illegal"
  CASE 24
    a$ = "File not opened"
  CASE 25 TO 28
    a$ = "Error Undefined" + STR$(ERR)
  CASE 29
    a$ = "Poly too complex"
  CASE 30
    a$ = "ArrTypeErr"
  CASE 31
    a$ = "Type redefinition"
  CASE 32
    a$ = "Type undefined"
  CASE 33
    a$ = "Type mismatch"
  CASE 34
    a$ = "Element redefinition"
  CASE 35
    a$ = "Array too big"
  CASE 36 TO 39
    a$ = "Error Undefined" + STR$(ERR)
  CASE 40
    a$ = "Procedure undefined"
  CASE 41
    a$ = "Parameter mismatch"
  CASE 42
    a$ = "Too many parameter"
  CASE 43
    a$ = "Missing parameter"
  CASE 44
    a$ = "MatrixErr"
  CASE 45
    a$ = "Bound error"
  CASE 46
    a$ = "Out of DATA"
  CASE 47
    a$ = "Data not numeric"
  CASE 48
    a$ = "Wrong window #"
  CASE 49
    a$ = "Window not open"
  CASE 50 TO 51
    a$ = "Error Undefined" + STR$(ERR)
  CASE 52
    a$ = "Matrix not square"
  CASE 53
    a$ = "Matrix product undefined"
  CASE 54 TO 55
    a$ = "Error Undefined" + STR$(ERR)
  CASE 56
    a$ = "Not in proc or for"
  CASE 57
    a$ = "LPT error"
  CASE 58
    a$ = "COM error"
  CASE 59
    a$ = "Illegale drive no"
  CASE 60
    a$ = "PUT string error"
  CASE 61
    a$ = "Error  061"
  CASE 62
    a$ = "End of File"
  CASE 63
    a$ = "Dll-Function undefined"
  CASE 64
    a$ = "Dll-Library not found"
  CASE 65
    a$ = "Dll-Parameter Error"
  CASE 66
    a$ = "Max. 10 SaveDC/RestoreDC"
  CASE 67
    a$ = "Cannot Open Clipboard"
  CASE 68
    a$ = "Clipboard Format not available"
  CASE 69 TO 76
    a$ = "Error Undefined" + STR$(ERR)
  CASE 77
    a$ = "Peek/Poke/Call Address Error"
  CASE 78
    a$ = "Meta File Error"
  CASE 79
    a$ = "Old Feature ON/ERROR - Resume "
  CASE 80
    a$ = "CallBack Error"
  CASE 81
    a$ = "PLAY: MMSystem Missing"
  CASE  82 TO 87
    a$ = "Error Undefined" + STR$(ERR)
  CASE 88
    a$ = "BSAVE/BLOAD Error"
  CASE 89
    a$ = "GOTO error"
  CASE 90
    a$ = "Random I/O-Error"
  CASE 91 TO 98
    a$ = "Error Undefined" + STR$(ERR)
  CASE 99
    a$ = "Stack Overflow"
  CASE 100
    a$ = "Error  100 v: 4.36"
  CASE 101 TO 122
    a$ = "Error Undefined" + STR$(ERR)
  CASE 123
    a$ = "FUNCTION undefined"
  CASE 124
    a$ = "ENDFUNC executed"
  CASE 125
    a$ = "Error  125"
  CASE 126
    a$ = "Load Error"
  CASE 127
    a$ = "Math Error"
  CASE 128
    a$ = "Stopped"
  CASE ELSE
    a$ = "The Error Code Encountered is: " + CHR$(10)+CHR$(10) + STR$(ERR)
  ENDSWITCH
  DLG 3D ON
  MESSAGE "Error Encounterd: "+CHR$(10)+CHR$(10)+a$,"SAMPLE ERROR",MB_YESNO
| MB_ICONINFORMATION,xx&
  DLG 3D OFF
RETURN






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:45 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109yZr-00NPH4C>; Mon, 8 Feb 1999 22:50:47 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA08914; Mon, 8 Feb 1999 22:21:39 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BF662C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Feb 1999 16:20:34 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] More troubles with Error 112!
X-UIDL: f94bb014ae09b7d2cab5b03db06a576c

M!chael,

>I now solved the problem by splitting the procedure which sets up the
dialogs used in my program. Everything seems to work fine now! <

Fine.

>I didn't know about any limits in GfA Basic. <

Life's full of surprises!

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:47 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m109z9S-00NPH0C>; Mon, 8 Feb 1999 23:27:34 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA08988; Mon, 8 Feb 1999 22:58:46 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BF6ECF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Feb 1999 16:57:55 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="d0bd51e5-bf9d-11d2-9cc0-00805feacc26"
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: 4c2c6c63f6fb712358b0c4d2b1041cce

Hello,

13 years ago I bought my Motorola-based ST. Indexing into a big chunk of
memory was a simple matter of adding an offset to a base. Its hard to
believe that in 1999, on Intel equipment, we are still struggling with 
addressing issues.

Here's my best effort so far to do huge memory moves, saves and loads.

Renaming _hread and _hwrite in BIGFILE.GFW allows them to work in the
interpreter, but they then will not compile.

My Hugeop() function is unreliable. Apparently, multiple functions using
multiple parameter types cannot be wrapped in a single prototype function. 

I have found that a combination of BMOVE, Roland's  ~@@hmemcpy(), and
John's  HugeRead() and HugeWrite(), works best.

Roland, is there a reason for using BYTE vs WORD declaration of  ( VOID )
hmemcpy() in PROCEDURE biginit ?
It seems to work Ok either way.


Best Regards,
Brent

Attachment Converted: "c:\programme\eudora\attach\HUGEOPS2.ZIP"
From ???@??? Fri Feb 12 15:16:56 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10A8Ak-00NOZuC>; Tue, 9 Feb 1999 09:05:30 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA09998; Tue, 9 Feb 1999 08:37:24 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BFF678.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 22:14:30(GMT) on February 08, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Mon, 08 Feb 1999 21:23:01 +0100
In-Reply-To: <36BEBFDE.BeroList-2.5.9@aachen.linux.de>
References: <36BDB288.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re: [GFA] Procedures...
X-UIDL: 6a90fb3ba033e74694924b4aae833416

At 10:26 08.02.99 +0100, Bueckmann.W wrote:
>
>At the last line ( where the time is ), there is a number, showing you the 
>size of your procedure ( or function ). It can't become greater then 31.

How could I know? Funny, I still have a procedure where the number says
-24! I think I'll have to split this one also, although it works fine...


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:16:58 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10A8Aq-00NPa6C>; Tue, 9 Feb 1999 09:05:36 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA10000; Tue, 9 Feb 1999 08:37:25 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36BFF678.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 22:14:30(GMT) on February 08, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Mon, 08 Feb 1999 21:23:01 +0100
In-Reply-To: <36BEBFDE.BeroList-2.5.9@aachen.linux.de>
References: <36BDB288.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re: [GFA] Procedures...
X-UIDL: bb755843067069bbf59f790701867aee

At 10:26 08.02.99 +0100, Bueckmann.W wrote:
>
>At the last line ( where the time is ), there is a number, showing you the 
>size of your procedure ( or function ). It can't become greater then 31.

How could I know? Funny, I still have a procedure where the number says
-24! I think I'll have to split this one also, although it works fine...


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:05 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10ACFp-00NPiaC>; Tue, 9 Feb 1999 13:27:01 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA10458; Tue, 9 Feb 1999 12:55:31 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C0330A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Feb 1999 06:54:39 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="18aafd69-c00d-11d2-877f-00805feabc89"
Subject: [GFA] HUGE & HUGE
X-UIDL: de6aafe2ca1f153ca8feb0f29e2408ea

Brent,

Well done. While we are messin' with huge stuff, here's a huge string
search routine.

It's not been extensivly tested but I think it's OK.

Regards,

John

Attachment Converted: "c:\programme\eudora\attach\Teststr.lst"
From ???@??? Fri Feb 12 15:17:13 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AFGi-00NPdlC>; Tue, 9 Feb 1999 16:40:08 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA10771; Tue, 9 Feb 1999 16:01:58 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C05ED1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 9 Feb 1999 15:00:57 -0000
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Text Cursor Position
X-UIDL: 5877799dce87b567fdd0cd4e80a94621

------=_NextPart_000_0031_01BE543C.FFC62820
Content-Type: text/plain;
	charset="iso-8859-1"


Hi Everybody

From ???@??? Fri Feb 12 15:17:15 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AFMd-00NPgmC>; Tue, 9 Feb 1999 16:46:15 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA10802; Tue, 9 Feb 1999 16:16:51 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C0621C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Feb 1999 10:16:05 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="7cb160d6-c02f-11d2-b8f5-00805ffe6ed5"
Subject: [GFA] HUGE & HUGE 2nd
X-UIDL: a03c9907ccea6c1c2272f5830910110d

Second version of huge string search, the first did not deal with non alpha
chars.

Feel free to improve it, fix any other bugs etc. If you do improve it, send
me a copy.

John

Attachment Converted: "c:\programme\eudora\attach\Teststr1.lst"
From ???@??? Fri Feb 12 15:17:18 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AHII-00NPgwC>; Tue, 9 Feb 1999 18:49:54 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA11040; Tue, 9 Feb 1999 18:21:01 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C07F3C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990209172051.FTVT2079@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 9 Feb 1999 17:20:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 9 Feb 1999 17:20:51 +0000
Subject: [GFA] urgent help request
X-UIDL: 81983a9cdeed59b891981a77581cdeaa

New BitmapInfoHeader entry...

IF bmih.biCompression = 0 THEN IsIt$ = "RGB, not compressed"
IF bmih.biCompression = 1 THEN IsIt$ = "RLE-8, compressed, % is another
discussion!"
IF bmih.biCompression = 2 THEN IsIt$ = "RLE-4, compressed, % is another
discussion!"
IF bmih.biCompression = 3 THEN IsIt$ = "?? new, '3', no idea yet ??"
PRINT "Compression : ";IsIt$

Can someone please tell me what the "3" represents?  It comes up in a 32-bit
image.

Thanks
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:25 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10ALGy-00NPgIC>; Tue, 9 Feb 1999 23:04:48 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA11434; Tue, 9 Feb 1999 22:22:30 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C0B7D8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Feb 1999 16:22:00 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] very urgent help
X-UIDL: 1127401b50d2ec0a2c4236ac8167628d

Tom,

>Can someone please tell me what the "3" represents?  It comes up in a
32-bit
image.<

It means that there are three masks following the BITMAPINFOHEADER:
structure. 

The value is represented by the constant BI_BITFIELDS, used as you would
use
BI_RGB but the value is 3 meaning there are three masks.

bi.biCompression = BI_BITFIELDS = 3


Here is an MS extract, I've sent it before;

Regards,

John

-------------------------------------------------------------------

SUMMARY
=======

Windows NT supports the same bitmap formats as Microsoft Windows version
3.1, but includes two new formats: 16 and 32 bits-per-pel.


MORE INFORMATION
================

For DIBs (device independent bitmaps), the 16 and 32-bit formats contain
three DWORD masks in the bmiColors member of the BITMAPINFO structure.
These masks specify which bits in the pel correspond to which color.

The three masks must have contiguous bits, and their order is assumed to be
R, G, B (high bits to low bits). The order of the three masks in the color
table must also be first red, then green, then blue (RGB). In this manner,
the programmer can specify a mask indicating how many shades of each RGB
color will be available for bitmaps created with CreateDIBitmap(). For
16-bits-per-pixel DIBs, CreateDIBitmap() defaults to the RGB555 format. For
32-bits-per-pixel DIBs, CreateDIBitmap() defaults to an RGB888 format.

NOTE: The DIB engine in Windows 95 supports only RGB555 and RGB565 for
16-bit DIBs and only RGB888 for 32-bit DIBs.

Example
-------

The RGB555 format masks would look like:

   0x00007C00  red   (0000 0000 0000 0000 0111 1100 0000 0000)
   0x000003E0  green (0000 0000 0000 0000 0000 0011 1110 0000)
   0x0000001F  blue  (0000 0000 0000 0000 0000 0000 0001 1111)

NOTE: For 16 bits-per-pel, the upper half of the DWORDs are always zeroed
From ???@??? Fri Feb 12 15:17:27 1999
Return-Path: <rroriolo@redestb.es>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AMOp-00NPgnC>; Wed, 10 Feb 1999 00:16:59 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA11591; Tue, 9 Feb 1999 23:47:34 +0100
From: rroriolo@redestb.es
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C0CBC8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by tinet0.redestb.es (Post.Office MTA v3.1 release PO203a
          ID# 0-0U10L2S100) with ESMTP id AAA182
          for <gfabasic@linux.net.eu.org>; Tue, 9 Feb 1999 23:47:29 +0100
          (Post.Office MTA v3.1.2 release (PO205-101c) ID# 0-0U10L2S100)
          with SMTP id AAA134 for <gfabasic@linux.net.eu.org>;
          Tue, 9 Feb 1999 23:57:42 +0100
X-Sender: rroriolo@pop3.redestb.es
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Tue, 09 Feb 1999 23:46:30 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Menu and right mouse button
X-UIDL: ed1569f2b420735206ad6257f4b59df5

Hello from Spain!

How could I get a menu reaction to mouse's right button? I'need it for a
popup menu.
Thanx in advance.

Roberto R. Oriolo
rroriolo@redestb.es



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:28 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AP2X-00NPgaC>; Wed, 10 Feb 1999 03:06:09 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA11869; Wed, 10 Feb 1999 02:24:14 +0100
From: DaveRecord@aol.com (by way of Tom Record <tiger.genealogical.rescue@worldnet.att.net>)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C0F074.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210012405.JJAN20285@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 01:24:05 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 01:24:05 +0000
Sender: tiger.genealogical.rescue@worldnet.att.net
Subject: [GFA] Things you don't really need to know.......
X-UIDL: 8db3e2302977af1f2ff843f119e255a8

     THINGS YOU DON'T REALLY NEED TO KNOW...........
 
     1.  Polar bears are left handed.
 
     2. The venom in a Daddy Long-Legs spider is more poisonous than
        a BlackWidow's or a Brown Recluse, but they cannot bite humans
        because their jaws won't open wide enough.
 
     3. On average, people fear spiders more than they do death.
 
     4. The strongest muscle in the body is the tongue.
 
     5. If you toss a penny 10,000 times, it will not be heads 5,000
        times, but more like 4950. The heads picture weighs more,
        so it ends up on the bottom.
 
     6. Only one person in two billion will live to be 116 or older.
 
     7. Mel Blanc (the voice of Bugs Bunny) was allergic to carrots.
 
     8. Humans and Dolphins are the only species that have sex for
        pleasure.
 
     9. The pop you get when you crack your knuckles is actually a
        bubble of gas bursting.
 
     10. 101 Dalmatians and Peter Pan (Wendy) are the only two
         Disney cartoons that feature both parents and they don't
         die throughout the movie.
 
     11. The winter of 1932 was so cold that Niagara Falls froze
         completely solid.
 
     12. There's no Betty Rubble in Flintstone Chewables
 
     13. It's impossible to get water out of a rimless tire.
 
     14. Banging your head against a wall uses 150 calories an hour.
 
     15. Did you know that you are more likely to be killed by a
         champagne cork than by a poisonous spider?
 
     16. In Minnesota it is illegal to cross state lines with a duck
         on your head.
 
     17. In Indiana it is illegal to ride public transportation for
         at least 30 minutes after eating garlic.
 
     18. Right-handed people live, on average, nine years longer
         than left-handed people do.
 
     19. A crocodile cannot stick its tongue out.
 
     20.  A pig's orgasm lasts for 30 minutes.
 
     21. A cockroach will live nine days without its head, before it
         starves to death.
 
     22. Some lions mate over 50 times a day
 
 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:29 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AP3L-00NPh4C>; Wed, 10 Feb 1999 03:06:59 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA11863; Wed, 10 Feb 1999 02:24:01 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C0F071.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210012357.JIYG20285@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 01:23:57 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 01:23:57 +0000
Subject: Re: [GFA] very urgent help
X-UIDL: 44076f9808f9eb46d2862051b6266444

Thank you, John.  I'm a bit under the weather.  There's little or none
for info on the compression number.  I didn't understand there to be
any explanation of it specifically.  I forgot the bitfields charactoristic
& wouldn't have looked for it anyway - the bits/pixel came up 32 & I
*thot* that was for 16-bit.  But I'm in a stupor, borfering on a daze.

None of my editors will load this image, I think.

Thanks.
TomR.


At 04:22 PM 09/02/99 -0500, you wrote:
>Tom,
>
>>Can someone please tell me what the "3" represents?  It comes up in a
>32-bit
>image.<
>
>It means that there are three masks following the BITMAPINFOHEADER:
>structure. 
>
>The value is represented by the constant BI_BITFIELDS, used as you would
>use
>BI_RGB but the value is 3 meaning there are three masks.
>
>bi.biCompression = BI_BITFIELDS = 3
>
>
>Here is an MS extract, I've sent it before;
>
>Regards,
>
>John
>
>-------------------------------------------------------------------
>
>SUMMARY
>=======
>
>Windows NT supports the same bitmap formats as Microsoft Windows version
>3.1, but includes two new formats: 16 and 32 bits-per-pel.
>
>
>MORE INFORMATION
>================
>
>For DIBs (device independent bitmaps), the 16 and 32-bit formats contain
>three DWORD masks in the bmiColors member of the BITMAPINFO structure.
>These masks specify which bits in the pel correspond to which color.
>
>The three masks must have contiguous bits, and their order is assumed to be
>R, G, B (high bits to low bits). The order of the three masks in the color
>table must also be first red, then green, then blue (RGB). In this manner,
>the programmer can specify a mask indicating how many shades of each RGB
>color will be available for bitmaps created with CreateDIBitmap(). For
>16-bits-per-pixel DIBs, CreateDIBitmap() defaults to the RGB555 format. For
>32-bits-per-pixel DIBs, CreateDIBitmap() defaults to an RGB888 format.
>
>NOTE: The DIB engine in Windows 95 supports only RGB555 and RGB565 for
>16-bit DIBs and only RGB888 for 32-bit DIBs.
>
>Example
>-------
>
>The RGB555 format masks would look like:
>
>   0x00007C00  red   (0000 0000 0000 0000 0111 1100 0000 0000)
>   0x000003E0  green (0000 0000 0000 0000 0000 0011 1110 0000)
>   0x0000001F  blue  (0000 0000 0000 0000 0000 0000 0001 1111)
>
>NOTE: For 16 bits-per-pel, the upper half of the DWORDs are always zeroed


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:31 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AP3U-00NPgwC>; Wed, 10 Feb 1999 03:07:08 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA11865; Wed, 10 Feb 1999 02:24:07 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C0F071.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210012402.JIZG20285@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 01:24:02 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 01:24:02 +0000
Subject: Re: [GFA] Menu and right mouse button
X-UIDL: 2ae9b97a04d4ffdb98576ef25cb30ed9

if mousek & 2
or
mousekey = 2

or something like that.
<G>
TomR.

At 11:46 PM 09/02/99 +0100, you wrote:
>Hello from Spain!
>
>How could I get a menu reaction to mouse's right button? I'need it for a
>popup menu.
>Thanx in advance.
>
>Roberto R. Oriolo
>rroriolo@redestb.es
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:32 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AQDP-00NPgsC>; Wed, 10 Feb 1999 04:21:27 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA12077; Wed, 10 Feb 1999 03:52:01 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1050C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210025151.HTT28455@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 02:51:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 02:51:51 +0000
Subject: [GFA] Help, please
X-UIDL: b5506b3f1a7d93cbd12cd52a8c568521

The following won't compile.  It just hangs up in the link stage.
Compiler is wgen.exe v1.07, dated 14 Nov 1996
Can someone point out what I've done wrong, please.
----------------- cut here ----------------------------------

'  bmph(23).lst  bitmaph()  TomR.
cx& = GETDEVCAPS(HORZRES)
cy& = GETDEVCAPS(VERTRES)
dv&  = _DRIVE
dr$ = DIR$(0)
'
TYPE BITMAPFILEHEADER:  /* bmfh */
- WORD    bfType
- DWORD   bfSize
- WORD    bfReserved1
- WORD    bfReserved2
- DWORD   bfOffBits
ENDTYPE
DIM BITMAPFILEHEADER: bmfh.
'
TYPE BITMAPINFOHEADER:   /* bmih */
- DWORD  biSize
- LONG   biWidth
- LONG   biHeight
- WORD   biPlanes
- WORD   biBitCount
- DWORD  biCompression
- DWORD  biSizeImage
- LONG   biXPelsPerMeter
- LONG   biYPelsPerMeter
- DWORD  biClrUsed
- DWORD  biClrImportant
ENDTYPE
DIM BITMAPINFOHEADER: bmih.
'
FILESELECT #"Bitmap","*.bmp","",file$
TITLEW #1, "bitmaph(), bitmap file info retrieval."
OPENW #1, 0,0,cx&,cy&,16

OPEN "i", #1, file$
BGET #1, *bmfh., LEN (bmfh.)
BGET #1, *bmih., LEN (bmih.)
CLOSE #1
'
CHDRIVE dv&
CHDIR dr$

PRINT "File: ";file$
PRINT "BitmapFileHeader   ";
PRINT "Bitmap Type: ";MKI$(bmfh.bfType)
PRINT "Saved File Size: ";
PRINT USING "#,###,###",bmfh.bfSize;
PRINT " bytes  (or";
PRINT USING "#######.##",bmfh.bfSize / 1024;
PRINT " Kb)"
PRINT "Data Offset (bmfh. + bmih.): ";bmfh.bfOffBits;" bytes"
PRINT
PRINT "BitmapInfoHeader    Size: ";bmih.biSize;" bytes"
PRINT "Image Width: ";bmih.biWidth;" pixels"
PRINT "Image Height: ";bmih.biHeight;" pixels"
PRINT "Planes: ";bmih.biPlanes
PRINT "Color depth: ";bmih.biBitCount;
PRINT "-bit or ";
PRINT USING "##,###,###,###",2 ^ bmih.biBitCount;
PRINT " colors (the only reliable colors indicator)"
IF bmih.biCompression = 0 THEN IsIt$ = "RGB, not compressed"
IF bmih.biCompression = 1 THEN IsIt$ = "RLE-8, compressed,  % is another
discussion!  "
IF bmih.biCompression = 2 THEN IsIt$ = "RLE-4, compressed,  % is another
discussion!  "
IF bmih.biCompression = 3 && bmih.biBitCount = 15 THEN IsIt$ = "BITFIELDS,
RGB555, not compressed"
IF bmih.biCompression = 3 && bmih.biBitCount = 16 THEN IsIt$ = "BITFIELDS,
RGB565, not compressed"
IF bmih.biCompression = 3 && bmih.biBitCount = 32 THEN IsIt$ = "BITFIELDS,
RGB888, not compressed"
PRINT "Compression : ";IsIt$
PRINT "Image Data Size: ";
PRINT USING "#,###,###",bmih.biSizeImage;
PRINT " bytes  (or";
PRINT USING "#######.##",bmih.biSizeImage / 1024;
PRINT " Kb)"
PRINT "Horz Resolution : ";INT(bmih.biXPelsPerMeter / 39.36);" dpi"
PRINT "Vert Resolution : ";INT(bmih.biYPelsPerMeter / 39.36);" dpi"
PRINT "Number of colors  (0 if > 256, pallet info): ";bmih.biClrUsed
PRINT "Important colors  (0 if above is 0): ";bmih.biClrImportant
PRINT
PRINT "Press LEFT mouse button or <Esc> to close"
DO
  t$ = INKEY$
  EXIT IF ASC(t$) = 27/* terminates when ESC is pressed
  SWITCH MOUSEK
  CASE 1
    GOTO Thats_It
  ENDSWITCH
LOOP
Thats_It:
CLOSEW #1
END



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:34 1999
Return-Path: <machoward@bigpond.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AQud-00NPiFC>; Wed, 10 Feb 1999 05:06:07 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA12169; Wed, 10 Feb 1999 04:37:54 +0100
From: "Malcolm Jack Howard" <machoward@bigpond.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C10FCB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 11:32:41 +0800
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2110.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] Help, please
X-UIDL: ade1942309f394b2b243cbd489861b9b

Windows 3.1 users are reporting a load click through the PC speaker whenever
the mouse button is pressedin one of my programs. It doesn't happen to begin
with but comes in after about 10 minutes of program use. It doesn't happen
with Win95/98 and there are no sound instructions whatsoever in the program.

Any ideas on how to stop this?

Mac Howard



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:35 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10ARMb-00NPgwC>; Wed, 10 Feb 1999 05:35:01 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA12238; Wed, 10 Feb 1999 05:05:58 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1165F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 05:04:59 +0100
References: <36BDB288.BeroList-2.5.9@aachen.linux.de> <36BFF678.BeroList-2.5.9@aachen.linux.de>
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: Re:  [GFA] Procedures... and something for the tiger.

X-UIDL: f0786d9115dcd5ac13e7f4a2c84abe67

Michael Weigand schrieb:

> How could I know? Funny, I still have a procedure where the number says
> -24! I think I'll have to split this one also, although it works fine...
>
>
> M!chael
>
>

A long time ago a had a problem with an Error (like 112) too. It was in the old 
GFA Basic for DOS, and the GFA says that this may be the problem. After I split 
it, there wasn't a problem anymore. But I don't remember what the Problem was. 
(Maybe somethink with saving or compiling, too). In the GFA Basic for Windows 
the same number stands at the same position, because of this I think it's equal.
(Maybe it's because of an old Processors can't RTS (jump) greater then 64K.) 
But I'm not sure.

Do you sometimes work with Malloc() ?

.......


Tom Record schrieb:
> The following won't compile.  It just hangs up in the link stage.
> Compiler is wgen.exe v1.07, dated 14 Nov 1996
> Can someone point out what I've done wrong, please.
> ----------------- cut here ----------------------------------
>

Sorry my Compiler was GFACOMP 1.07 (SEP 23 1996) , and he hasn't got any 
problems. My settings are FAST,WORD,ONLY 386,Clear Locals,Debug-Info and Check 
Arrays.


Regards 
 
M.f.G.

Wilhelm Bckmann
Email Bueckmann.W@T-Online.de



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:37 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10ATxk-00NPigC>; Wed, 10 Feb 1999 08:21:32 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA12624; Wed, 10 Feb 1999 07:53:57 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C13DBB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 07:58:40 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Help, please
X-UIDL: 185f0ced2a9bf5366e3b9a47ef62c572


Do you use INPUT, GETKEY, MOUSEKEY and such functions ?
If yes, that's it (You have to use Windows Events to create a long term
running, stabel program)
If no, try to shorten your program to the essential parts and mail it to
us...


> ----------
> Von: 	Malcolm Jack Howard[SMTP:machoward@bigpond.com]
> Gesendet: 	Mittwoch, 10. Februar 1999 04:32
> An: 	gfabasic@aachen.linux.de
> Betreff: 	Re: [GFA] Help, please
> 
> Windows 3.1 users are reporting a load click through the PC speaker
> whenever
> the mouse button is pressedin one of my programs. It doesn't happen to
> begin
> with but comes in after about 10 minutes of program use. It doesn't happen
> with Win95/98 and there are no sound instructions whatsoever in the
> program.
> 
> Any ideas on how to stop this?
> 
> Mac Howard
> 
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:38 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AToy-00NPdlC>; Wed, 10 Feb 1999 08:12:28 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA12588; Wed, 10 Feb 1999 07:42:40 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C13B1E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 07:47:36 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Menu and right mouse button
X-UIDL: ed7345fac20a7fb3396f529d472ec235

Hi

Tom's answer is correct, but I prefer the Event-Message solution...
DO

    GETEVENT
    SELECT _Mess
    :
    CASE WM_RBUTTONDOWN                         // ------------------ //
        @MainPopup
    :
LOOP

procedure MainPopup
local quit&=0
   :
    DO
      GETEVENT
      ~TrackPopupMenu(XMnu&,0,MOUSEX,MOUSEY,0,DLG(10),0)
      quit& = _wParam
    LOOP UNTIL quit&
   :
return

> ----------
> Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
> Gesendet: 	Mittwoch, 10. Februar 1999 02:24
> An: 	gfabasic@aachen.linux.de
> Betreff: 	Re: [GFA] Menu and right mouse button
> 
> if mousek & 2
> or
> mousekey = 2
> 
> or something like that.
> <G>
> TomR.
> 
> At 11:46 PM 09/02/99 +0100, you wrote:
> >Hello from Spain!
> >
> >How could I get a menu reaction to mouse's right button? I'need it for a
> >popup menu.
> >Thanx in advance.
> >
> >Roberto R. Oriolo
> >rroriolo@redestb.es
> >
> >
> >
> >---
> >This mailing list is currently running BeroList v2.5.6
> >Report problems to bero@bero-online.ml.org
> >
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:39 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10ATvU-00NPaOC>; Wed, 10 Feb 1999 08:19:12 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA12614; Wed, 10 Feb 1999 07:51:32 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C13D2A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 07:56:33 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Help, please
X-UIDL: 3d3f1748251e155839fab696938709cd

Just reboot windows and try it once more...
My compiler shows 1.07W (Mar 25 1996) !!!!!
and there was no problem to compile the code

> ----------
> Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
> Gesendet: 	Mittwoch, 10. Februar 1999 03:51
> An: 	gfabasic@aachen.linux.de
> Betreff: 	[GFA] Help, please
> 
> The following won't compile.  It just hangs up in the link stage.
> Compiler is wgen.exe v1.07, dated 14 Nov 1996
> Can someone point out what I've done wrong, please.
> ----------------- cut here ----------------------------------
> 
> '  bmph(23).lst  bitmaph()  TomR.
	:
	:


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:41 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AUmg-00NPdrC>; Wed, 10 Feb 1999 09:14:10 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA12781; Wed, 10 Feb 1999 08:45:46 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C149E7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210074542.DQTJ21329@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 07:45:42 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 07:45:42 +0000
Subject: Re: AW: [GFA] Menu and right mouse button
X-UIDL: 0d4d75a8ebe03b53059b916d47670766

Michael
<GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG>
Gentleman & Scholar <G>
I did well to even answer, & even better to be right (sorta).
Your response is far better, Sir.
<G>
TomR.


At 07:47 AM 10/02/99 +0100, you wrote:
>Hi
>
>Tom's answer is correct, but I prefer the Event-Message solution...
>DO
>
>    GETEVENT
>    SELECT _Mess
>    :
>    CASE WM_RBUTTONDOWN                         // ------------------ //
>        @MainPopup
>    :
>LOOP
>
>procedure MainPopup
>local quit&=0
>   :
>    DO
>      GETEVENT
>      ~TrackPopupMenu(XMnu&,0,MOUSEX,MOUSEY,0,DLG(10),0)
>      quit& = _wParam
>    LOOP UNTIL quit&
>   :
>return
>
>> ----------
>> Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>> Gesendet: 	Mittwoch, 10. Februar 1999 02:24
>> An: 	gfabasic@aachen.linux.de
>> Betreff: 	Re: [GFA] Menu and right mouse button
>> 
>> if mousek & 2
>> or
>> mousekey = 2
>> 
>> or something like that.
>> <G>
>> TomR.
>> 
>> At 11:46 PM 09/02/99 +0100, you wrote:
>> >Hello from Spain!
>> >
>> >How could I get a menu reaction to mouse's right button? I'need it for a
>> >popup menu.
>> >Thanx in advance.
>> >
>> >Roberto R. Oriolo
>> >rroriolo@redestb.es
>> >
>> >
>> >
>> >---
>> >This mailing list is currently running BeroList v2.5.6
>> >Report problems to bero@bero-online.ml.org
>> >
>> 
>> 
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>> 
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:42 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AUmi-00NPaLC>; Wed, 10 Feb 1999 09:14:12 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA12783; Wed, 10 Feb 1999 08:45:50 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C149E7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210074547.DQTS21329@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 07:45:47 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 07:45:47 +0000
Subject: Re: AW: [GFA] Help, please
X-UIDL: 91464368348366b80e9f8c999d4455a6

Michael
After several years of Windows, REBOOT is almost 2nd nature.
I'll try re-installing.  It is possible I've picked up
something from the internet again.  I got contaminated by BO
one time & lost a whole harddrive because I couldn't find
where the actual infection was to get rid of it.  It was
eating up c:\windows\system one *.dll after another.
Thanks for responding.
<G>
TomR.


At 07:56 AM 10/02/99 +0100, you wrote:
>Just reboot windows and try it once more...
>My compiler shows 1.07W (Mar 25 1996) !!!!!
>and there was no problem to compile the code
>
>> ----------
>> Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
>> Gesendet: 	Mittwoch, 10. Februar 1999 03:51
>> An: 	gfabasic@aachen.linux.de
>> Betreff: 	[GFA] Help, please
>> 
>> The following won't compile.  It just hangs up in the link stage.
>> Compiler is wgen.exe v1.07, dated 14 Nov 1996
>> Can someone point out what I've done wrong, please.
>> ----------------- cut here ----------------------------------
>> 
>> '  bmph(23).lst  bitmaph()  TomR.
>	:
>	:
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:43 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AUZu-00NPaGC>; Wed, 10 Feb 1999 09:00:58 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA12727; Wed, 10 Feb 1999 08:33:24 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C146FC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210073318.EHBR28455@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 07:33:18 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Wed, 10 Feb 1999 07:33:18 +0000
Subject: Re:  [GFA] Procedures... and something for the tiger.
X-UIDL: 0e3cad2042e75b46734b6732bf2583ea

Re:  [GFA] Procedures... and something for the tiger.

Tom Record schrieb:
> The following won't compile.  It just hangs up in the link stage.
> Compiler is wgen.exe v1.07, dated 14 Nov 1996
> Can someone point out what I've done wrong, please.
> ----------------- cut here ----------------------------------
>

Sorry my Compiler was GFACOMP 1.07 (SEP 23 1996) , and he hasn't got any 
problems. My settings are FAST,WORD,ONLY 386,Clear Locals,Debug-Info and
Check Arrays.

Regards 
 
M.f.G.

Wilhelm Bckmann
Email Bueckmann.W@T-Online.de

-----------------------------------------
10/02/99 01:28:41 AM, Oklahoma, U.S.
Wilhelm
Only 2 differences in our settings... I was BYTE & no Debug-Info.

I went thru, trying *all* settings.  No change.  Compiles other
projects w/o trouble.

I can try to re-install the compiler, the only thing I know to try.

Thanks for responding.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:45 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AWGe-00NQXXC>; Wed, 10 Feb 1999 10:49:12 +0100 (MET)
Received: from aachen.linux.de (TNG.linux.net.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA13001; Wed, 10 Feb 1999 10:20:38 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C16029.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210092035.EQBG28455@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 09:20:35 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 09:20:35 +0000
Subject: Re:  [GFA] Procedures... and something for the tiger
X-UIDL: 436e86fb78782727193fcba6d1e82d77

The appl that won't compile...

Deleted all compiler files & re-installed.  That file still won't
compile, but others seem to compile slightly faster than before.

I'll move it over to the 486 tomorrow & see if it will compile
there.  That one is Win3.1.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:49 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AZZE-00NQZbC>; Wed, 10 Feb 1999 14:20:36 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA13349; Wed, 10 Feb 1999 13:48:42 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C190EB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 13:53:44 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Procedures... and something for the tiger
X-UIDL: ced249639616c44bb7f5d8f236fbcdb1

Hi Tom -

try it with Win 3.1 - It was the last (nearly) reliable software product of
microsoft.
And for all loving the features of Win 95, etc. Try Calmira
(http://www.calmira.org) !

Isn't it interesting that there are different dates on all the Compilers we
have (and all say 1.07) ?
What's about the file size of Wgen.Exe...

WGEN     EXE       291,792 03-25-96  10:00p
GFALNK   EXE        64,112 01-06-93   4:58p
GFALNK0  EXE         8,917 12-06-93  10:33a
GFAWIN3  EXE       316,800 06-30-96   3:53p
GLIB     LIB       356,352 03-07-96  10:26a
GFA32API DLL        21,584 05-20-98   3:26p
GFALNK   EXE        64,112 01-06-93   4:58p
GFARCS   DLL        50,432 01-25-95   1:07p
GFARUN10 436       169,536 03-14-95   4:20p
GFALNK0  EXE         8,917 12-06-93  10:33a
GFALNK0  PIF           545 05-26-95  10:26a
GOLINK   BAT            24 12-21-94   1:56p
GFARUN10 DLL       163,968 02-13-96   1:15p
GFAWIN3  EXE       316,800 06-30-96   3:53p

- Michael

> ----------
> Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
> Gesendet: 	Mittwoch, 10. Februar 1999 10:20
> An: 	gfabasic@aachen.linux.de
> Betreff: 	Re:  [GFA] Procedures... and something for the tiger
> 
> The appl that won't compile...
> 
> Deleted all compiler files & re-installed.  That file still won't
> compile, but others seem to compile slightly faster than before.
> 
> I'll move it over to the 486 tomorrow & see if it will compile
> there.  That one is Win3.1.
> 
> <G>
> TomR.
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:50 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AaPM-00NQdPC>; Wed, 10 Feb 1999 15:14:28 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA13461; Wed, 10 Feb 1999 14:45:29 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C19E33.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 10 Feb 1999 13:42:45 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Windows 95 Functions
X-UIDL: d0d36d3c5dd3cef583e98b510d43c275

I've found a way to get the caret position but I need to access a Windows 95
function and it wont do it. This isn't working:

DLL #1,"USER"
    DECL BOOL AttachThreadInput(L,L,W)
ENDDLL

It says "DLL Function Undefined" but it's definitely in USER32.DLL. Can
anyone help?

Preemptive thanks,
Russell Hayward

Websites:    http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:54 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AcC6-00NQZbC>; Wed, 10 Feb 1999 17:08:54 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA13825; Wed, 10 Feb 1999 16:36:51 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1B86F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 09:10:01 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36C146FC.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Procedures... and something for the tiger.
X-UIDL: 775bf4065b245bbfe28e0e51a20ae03f

Hi Tom!

>Sorry my Compiler was GFACOMP 1.07 (SEP 23 1996) , and he hasn't got
any

Is there a newer version (> 1.07W) of the compiler available?

Thanks
Thomas



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:55 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AcCD-00NQZbC>; Wed, 10 Feb 1999 17:09:01 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA13839; Wed, 10 Feb 1999 16:40:34 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1B929.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 10:39:49 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Windows 95 Functions
X-UIDL: 54400603fb1d61d66dfe951d5c5da50a

>
DLL #1,"USER"
    DECL BOOL AttachThreadInput(L,L,W)
ENDDLL

It says "DLL Function Undefined" but it's definitely in USER32.DLL. Can
anyone help?
<

Russell,

There is a way to call 32 bit dll functions, but not with a GFA DLL #1
statement;

However, I think you are barking up the wrong tree, excuse the metaphor.
Someone will correct this if I'm wrong, but a 16 bit app cannot use API
AttachThreadInput().

Possibly you need to create a hook callback function. I have no experience
with hooks so I can't help you with it, sorry.


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:57 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AcmW-00NQddC>; Wed, 10 Feb 1999 17:46:32 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA13931; Wed, 10 Feb 1999 17:16:25 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1C197.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 08:16:01 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Help, please
X-UIDL: 9bbee2799ba51447e5918c0d6cfa8f6b

Hi Tom,
It compiled fine for me.
Dale

----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Tuesday, February 09, 1999 6:51 PM
Subject: [GFA] Help, please


>The following won't compile.  It just hangs up in the link stage.
>Compiler is wgen.exe v1.07, dated 14 Nov 1996
>Can someone point out what I've done wrong, please.
>----------------- cut here ----------------------------------
>
>'  bmph(23).lst  bitmaph()  TomR.
>cx& = GETDEVCAPS(HORZRES)
>cy& = GETDEVCAPS(VERTRES)
>dv&  = _DRIVE
>dr$ = DIR$(0)
>'
>TYPE BITMAPFILEHEADER:  /* bmfh */
>- WORD    bfType
>- DWORD   bfSize
>- WORD    bfReserved1
>- WORD    bfReserved2
>- DWORD   bfOffBits
>ENDTYPE
>DIM BITMAPFILEHEADER: bmfh.
>'
>TYPE BITMAPINFOHEADER:   /* bmih */
>- DWORD  biSize
>- LONG   biWidth
>- LONG   biHeight
>- WORD   biPlanes
>- WORD   biBitCount
>- DWORD  biCompression
>- DWORD  biSizeImage
>- LONG   biXPelsPerMeter
>- LONG   biYPelsPerMeter
>- DWORD  biClrUsed
>- DWORD  biClrImportant
>ENDTYPE
>DIM BITMAPINFOHEADER: bmih.
>'
>FILESELECT #"Bitmap","*.bmp","",file$
>TITLEW #1, "bitmaph(), bitmap file info retrieval."
>OPENW #1, 0,0,cx&,cy&,16
>
>OPEN "i", #1, file$
>BGET #1, *bmfh., LEN (bmfh.)
>BGET #1, *bmih., LEN (bmih.)
>CLOSE #1
>'
>CHDRIVE dv&
>CHDIR dr$
>
>PRINT "File: ";file$
>PRINT "BitmapFileHeader   ";
>PRINT "Bitmap Type: ";MKI$(bmfh.bfType)
>PRINT "Saved File Size: ";
>PRINT USING "#,###,###",bmfh.bfSize;
>PRINT " bytes  (or";
>PRINT USING "#######.##",bmfh.bfSize / 1024;
>PRINT " Kb)"
>PRINT "Data Offset (bmfh. + bmih.): ";bmfh.bfOffBits;" bytes"
>PRINT
>PRINT "BitmapInfoHeader    Size: ";bmih.biSize;" bytes"
>PRINT "Image Width: ";bmih.biWidth;" pixels"
>PRINT "Image Height: ";bmih.biHeight;" pixels"
>PRINT "Planes: ";bmih.biPlanes
>PRINT "Color depth: ";bmih.biBitCount;
>PRINT "-bit or ";
>PRINT USING "##,###,###,###",2 ^ bmih.biBitCount;
>PRINT " colors (the only reliable colors indicator)"
>IF bmih.biCompression = 0 THEN IsIt$ = "RGB, not compressed"
>IF bmih.biCompression = 1 THEN IsIt$ = "RLE-8, compressed,  % is another
>discussion!  "
>IF bmih.biCompression = 2 THEN IsIt$ = "RLE-4, compressed,  % is another
>discussion!  "
>IF bmih.biCompression = 3 && bmih.biBitCount = 15 THEN IsIt$ = "BITFIELDS,
>RGB555, not compressed"
>IF bmih.biCompression = 3 && bmih.biBitCount = 16 THEN IsIt$ = "BITFIELDS,
>RGB565, not compressed"
>IF bmih.biCompression = 3 && bmih.biBitCount = 32 THEN IsIt$ = "BITFIELDS,
>RGB888, not compressed"
>PRINT "Compression : ";IsIt$
>PRINT "Image Data Size: ";
>PRINT USING "#,###,###",bmih.biSizeImage;
>PRINT " bytes  (or";
>PRINT USING "#######.##",bmih.biSizeImage / 1024;
>PRINT " Kb)"
>PRINT "Horz Resolution : ";INT(bmih.biXPelsPerMeter / 39.36);" dpi"
>PRINT "Vert Resolution : ";INT(bmih.biYPelsPerMeter / 39.36);" dpi"
>PRINT "Number of colors  (0 if > 256, pallet info): ";bmih.biClrUsed
>PRINT "Important colors  (0 if above is 0): ";bmih.biClrImportant
>PRINT
>PRINT "Press LEFT mouse button or <Esc> to close"
>DO
>  t$ = INKEY$
>  EXIT IF ASC(t$) = 27/* terminates when ESC is pressed
>  SWITCH MOUSEK
>  CASE 1
>    GOTO Thats_It
>  ENDSWITCH
>LOOP
>Thats_It:
>CLOSEW #1
>END
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:17:59 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AdQw-00NQZJC>; Wed, 10 Feb 1999 18:28:18 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA14039; Wed, 10 Feb 1999 17:59:23 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1CBB7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Feb 1999 08:58:59 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Procedures... and something for the tiger.
X-UIDL: 303dc0a464a00059d2822ebdd848eceb

That is  a very good question.  Why dose my copy compile the code and Toms'
version will not?  I think this deserves an answer form GFA
Dale Bryant

----- Original Message -----
From: Thomas Gonschor <vph-bensberg@t-online.de>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, February 10, 1999 12:10 AM
Subject: AW: [GFA] Procedures... and something for the tiger.


>Hi Tom!
>
>>Sorry my Compiler was GFACOMP 1.07 (SEP 23 1996) , and he hasn't got
>any
>
>Is there a newer version (> 1.07W) of the compiler available?
>
>Thanks
>Thomas
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:03 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AgDx-00NQZLC>; Wed, 10 Feb 1999 21:27:05 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA14355; Wed, 10 Feb 1999 20:57:42 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1F580.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 18:21:56(GMT) on February 10, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Wed, 10 Feb 1999 18:06:08 +0100
In-Reply-To: <36C1165F.BeroList-2.5.9@aachen.linux.de>
References: <36BDB288.BeroList-2.5.9@aachen.linux.de>
 <36BFF678.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re:  [GFA] Procedures... and something for the tiger.
X-UIDL: 19abe3e3f92b3ac741feac7787e0c15a

At 05:04 10.02.99 +0100, Bueckmann.W wrote:

>> How could I know? Funny, I still have a procedure where the number says
>> -24! I think I'll have to split this one also, although it works fine...

>Do you sometimes work with Malloc() ?

No, I don't. And I think it doesn't matter as the error showed up when I
loaded the source into the interpreter.


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:04 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AgEK-00NPgnC>; Wed, 10 Feb 1999 21:27:28 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA14353; Wed, 10 Feb 1999 20:57:33 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1F580.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 18:21:56(GMT) on February 10, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Wed, 10 Feb 1999 18:06:08 +0100
In-Reply-To: <36C1165F.BeroList-2.5.9@aachen.linux.de>
References: <36BDB288.BeroList-2.5.9@aachen.linux.de>
 <36BFF678.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@freeside.cls.net
Subject: Re:  [GFA] Procedures... and something for the tiger.
X-UIDL: 410f93ba7d0f66942a50e979f26bf502

At 05:04 10.02.99 +0100, Bueckmann.W wrote:

>> How could I know? Funny, I still have a procedure where the number says
>> -24! I think I'll have to split this one also, although it works fine...

>Do you sometimes work with Malloc() ?

No, I don't. And I think it doesn't matter as the error showed up when I
loaded the source into the interpreter.


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:06 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Agm8-00NQdDC>; Wed, 10 Feb 1999 22:02:24 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA14440; Wed, 10 Feb 1999 21:33:32 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1FDD9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210203325.KMNU28455@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 20:33:25 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 20:33:25 +0000
Subject: Re: [GFA] Help, please
X-UIDL: adc1d86bb0f04f814d8b9a934305bd62

Thanks to the several who did this for me.  Apparently there is something
else wrong w/ this computer.  I'll try the 486 later today.  I've done
a delete/re-install of all the compiler files.  No soap on that file, but
it does seem to compile other things a little faster.  Jeeze!  Life & it's
little mysteries!
Thanks
<G>
TomR.


At 08:16 AM 10/02/99 -0800, you wrote:
>Hi Tom,
>It compiled fine for me.
>Dale
>
>----- Original Message -----
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>To: <gfabasic@aachen.linux.de>
>Sent: Tuesday, February 09, 1999 6:51 PM
>Subject: [GFA] Help, please
>
>
>>The following won't compile.  It just hangs up in the link stage.
>>Compiler is wgen.exe v1.07, dated 14 Nov 1996
>>Can someone point out what I've done wrong, please.
>>----------------- cut here ----------------------------------
>>
>>'  bmph(23).lst  bitmaph()  TomR.
>>cx& = GETDEVCAPS(HORZRES)
>>cy& = GETDEVCAPS(VERTRES)
>>dv&  = _DRIVE
>>dr$ = DIR$(0)
>>'
>>TYPE BITMAPFILEHEADER:  /* bmfh */
>>- WORD    bfType
>>- DWORD   bfSize
>>- WORD    bfReserved1
>>- WORD    bfReserved2
>>- DWORD   bfOffBits
>>ENDTYPE
>>DIM BITMAPFILEHEADER: bmfh.
>>'
>>TYPE BITMAPINFOHEADER:   /* bmih */
>>- DWORD  biSize
>>- LONG   biWidth
>>- LONG   biHeight
>>- WORD   biPlanes
>>- WORD   biBitCount
>>- DWORD  biCompression
>>- DWORD  biSizeImage
>>- LONG   biXPelsPerMeter
>>- LONG   biYPelsPerMeter
>>- DWORD  biClrUsed
>>- DWORD  biClrImportant
>>ENDTYPE
>>DIM BITMAPINFOHEADER: bmih.
>>'
>>FILESELECT #"Bitmap","*.bmp","",file$
>>TITLEW #1, "bitmaph(), bitmap file info retrieval."
>>OPENW #1, 0,0,cx&,cy&,16
>>
>>OPEN "i", #1, file$
>>BGET #1, *bmfh., LEN (bmfh.)
>>BGET #1, *bmih., LEN (bmih.)
>>CLOSE #1
>>'
>>CHDRIVE dv&
>>CHDIR dr$
>>
>>PRINT "File: ";file$
>>PRINT "BitmapFileHeader   ";
>>PRINT "Bitmap Type: ";MKI$(bmfh.bfType)
>>PRINT "Saved File Size: ";
>>PRINT USING "#,###,###",bmfh.bfSize;
>>PRINT " bytes  (or";
>>PRINT USING "#######.##",bmfh.bfSize / 1024;
>>PRINT " Kb)"
>>PRINT "Data Offset (bmfh. + bmih.): ";bmfh.bfOffBits;" bytes"
>>PRINT
>>PRINT "BitmapInfoHeader    Size: ";bmih.biSize;" bytes"
>>PRINT "Image Width: ";bmih.biWidth;" pixels"
>>PRINT "Image Height: ";bmih.biHeight;" pixels"
>>PRINT "Planes: ";bmih.biPlanes
>>PRINT "Color depth: ";bmih.biBitCount;
>>PRINT "-bit or ";
>>PRINT USING "##,###,###,###",2 ^ bmih.biBitCount;
>>PRINT " colors (the only reliable colors indicator)"
>>IF bmih.biCompression = 0 THEN IsIt$ = "RGB, not compressed"
>>IF bmih.biCompression = 1 THEN IsIt$ = "RLE-8, compressed,  % is another
>>discussion!  "
>>IF bmih.biCompression = 2 THEN IsIt$ = "RLE-4, compressed,  % is another
>>discussion!  "
>>IF bmih.biCompression = 3 && bmih.biBitCount = 15 THEN IsIt$ = "BITFIELDS,
>>RGB555, not compressed"
>>IF bmih.biCompression = 3 && bmih.biBitCount = 16 THEN IsIt$ = "BITFIELDS,
>>RGB565, not compressed"
>>IF bmih.biCompression = 3 && bmih.biBitCount = 32 THEN IsIt$ = "BITFIELDS,
>>RGB888, not compressed"
>>PRINT "Compression : ";IsIt$
>>PRINT "Image Data Size: ";
>>PRINT USING "#,###,###",bmih.biSizeImage;
>>PRINT " bytes  (or";
>>PRINT USING "#######.##",bmih.biSizeImage / 1024;
>>PRINT " Kb)"
>>PRINT "Horz Resolution : ";INT(bmih.biXPelsPerMeter / 39.36);" dpi"
>>PRINT "Vert Resolution : ";INT(bmih.biYPelsPerMeter / 39.36);" dpi"
>>PRINT "Number of colors  (0 if > 256, pallet info): ";bmih.biClrUsed
>>PRINT "Important colors  (0 if above is 0): ";bmih.biClrImportant
>>PRINT
>>PRINT "Press LEFT mouse button or <Esc> to close"
>>DO
>>  t$ = INKEY$
>>  EXIT IF ASC(t$) = 27/* terminates when ESC is pressed
>>  SWITCH MOUSEK
>>  CASE 1
>>    GOTO Thats_It
>>  ENDSWITCH
>>LOOP
>>Thats_It:
>>CLOSEW #1
>>END
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:08 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AgmD-00NQdGC>; Wed, 10 Feb 1999 22:02:29 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA14438; Wed, 10 Feb 1999 21:33:24 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C1FDD6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990210203320.KMNF28455@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Feb 1999 20:33:20 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Feb 1999 20:33:20 +0000
Subject: Re: AW: [GFA] Procedures... and something for the tiger.
X-UIDL: aadaa1098a30a5dc32f8a8f8966cdc6a

Hey
Had to go fire up gen.exe because wgen.exe doesn't say anything about
it's version.  gen.exe says it's 1.07W, 23 Sop 1996 altho the file
itself (doesn't really mean anything) bears the date 14/11/1996.

I suppose that is the latest (or nearly so).
<G>
TomR.


At 09:10 AM 10/02/99 +0100, you wrote:
>Hi Tom!
>
>>Sorry my Compiler was GFACOMP 1.07 (SEP 23 1996) , and he hasn't got
>any
>
>Is there a newer version (> 1.07W) of the compiler available?
>
>Thanks
>Thomas
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:14 1999
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AkNS-00NRHJC>; Thu, 11 Feb 1999 01:53:10 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA14880; Thu, 11 Feb 1999 01:23:43 +0100
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C233E2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 11 Feb 1999 09:51:05 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <36C190EB.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: AW: [GFA] Procedures... and something for the tiger
X-UIDL: 3b6174facfb642ba8a03675a29be0892

Vogel Michael wrote:
> 

> Isn't it interesting that there are different dates on all the Compilers we
> have (and all say 1.07) ?
> What's about the file size of Wgen.Exe...
> 
> WGEN     EXE       291,792 03-25-96  10:00p

Hmmm. My version has 291,920 bytes and is dates 6-10-97.
 
---------------------------------------------------------------------------
Dean Hodgson
BookMark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8226-1541  fax 0011-61-8-8410-2856
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:17 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10ApVR-00NQXVC>; Thu, 11 Feb 1999 07:21:45 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id GAA15395; Thu, 11 Feb 1999 06:39:38 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C27DDE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 11 Feb 1999 00:38:54 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: AW: [GFA] Procedures... and something for the tiger
X-UIDL: 28683f1bdeec2a09ec0bc5d65ad7dee5

>> WGEN     EXE       291,792 03-25-96  10:00p

>Hmmm. My version has 291,920 bytes and is dates 6-10-97.
 
My      WGEN.EXE 1.07w is 291,664 dated 3/21/96.
        GEN.EXE id   276,345 3/21/96

The program compiled OK on my machine.


Brent.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:18 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Ar0I-00NRIAC>; Thu, 11 Feb 1999 08:57:42 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA15655; Thu, 11 Feb 1999 08:15:56 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C2946D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 11 Feb 1999 08:20:49 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: [GFA] Working with Data-resources from Exe-File
X-UIDL: 9cc0392efe21a9f0923d485dcc877cbc

Hi,
 Sometimes I have to create a install-program for dummies. So that it can be
startet as an attachment from an email, etc.
 Therefore I put everything into one exe file, where also routine for
copying resist (see code below). This worked fine, until the data gets to
big (first troubles appeared with files > 64k), in the meantime I made
portions with smaller blocksizes.
 Sometimes this works, sometime my install.exe crashes - and if I start the
Install.Exe program very often, I get out of memory...

Has anyone an idea, how to put about 3 or 4 BIG files (program.exe,
program.hlp,...) into one install.exe without problems ?

Michael.


    puffer$ = SPACE$(blocksize&)
    ExeHandle& = GetModuleHandle(_INSTANCE)
    error& = 0
    OPEN "o",#1,"test.exe"
    for i&=0 to n&
   handle& = FindResource(ExeHandle&,"exe"+str$(i&),"exe")
   adrhandle& = LoadResource(ExeHandle&,Handle&)
   Adress% = LockResource(adrhandle&)
if i&<n&
   Bput #1,Adress%,50000
else
   Bput #1,Adress%,lastbytes%
endif
      ~UnlockResource(adrhandle&)
      ~FreeResource(Handle&)
      NEXT i&
      CLOSE #1


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:23 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10As0J-00NNjJC>; Thu, 11 Feb 1999 10:01:47 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA15796; Thu, 11 Feb 1999 09:32:56 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C2A67F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990211083242.GBTA19644@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 11 Feb 1999 08:32:42 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 11 Feb 1999 08:32:42 +0000
Subject: [GFA] Re:  Something from the tiger.
X-UIDL: c752972cb4d280c28e2a282b86975507

Well.......

The un-compileable *is* compileable!  The trick is to eliminate one
by one the things that can get involved.

I suppose now I must re-install the interpretor/editor, v4.38, gfawin37.exe,
309K, & for some reason, dated 25/02/1998!

I attempted to compile that bmph().lst on the 486 (Win3.1, gfawin3.exe).
It froze up!  Took 7 sec to reach the link stage instead of the .08sec
it took on the P-100.  The 486 is an SX25.

Decided to try something else on the P-100.  I ran wgen.exe directly, no
going thru gfawin37.exe.  Surprise!  It compiled just fine in millisecs,
BUT... it did NOT assume the filename as *.exe that is on the *.gfw!  It
did NOT drop the *.exe it made in the same dir w/ the *.gfw!  The *.exe 
it made had the name test.exe & was left in the same dir with wgen.exe!
NO compiler instruction lines are in this particular *.gfw.

OK - new question for the wizards.  What can be common between a P-100
running gfawin37.exe & a 486SX25 running gfawin3.exe that would hang the
interpretors/editors in the link stage???????  The 487 hasn't been online
for 3 years, so it isn't infected with anything that came in off the net.
I have transferred files from the 486 to the P-100, NOT the other way.

They're both Packard Bell, but have entirely different O/S, sound, video.

They're on opposite sides of the room, about 4 meters apart.  They *are*
on the same electrical circuit & movement between'em is via 1.44M floppy
or ZIP100 (each has it's own ZIP drive).

There must be some charactoristic about these two computers that effects
the interpretor/editor regardless of the O/S... a common charactoristic
that has no flashing neon sign on it to make it easy to spot.  The only
other difficulty I've had compiling lately was a stupid mistake on my part
of not taking notice of a path in the compiler instructions that leads
nowhere on my computer in some source code written by another.  *THIS* is
the first file I've had this problem with & have tested others just to
be certain.

Just tho't I'd appraise the group of my findings.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:24 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AsRE-00NNjMC>; Thu, 11 Feb 1999 10:29:36 +0100 (MET)
Received: from aachen.linux.de (K5.D-VHS.COM [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA15839; Thu, 11 Feb 1999 09:54:12 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C2AB72.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990211085403.GDAD19644@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 11 Feb 1999 08:54:03 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 11 Feb 1999 08:54:03 +0000
Subject: Re: [GFA] Working with Data-resources from Exe-File
X-UIDL: 90ed2e34adb0d63633bc3310330eba70

At 08:20 AM 11/02/99 +0100, you wrote:
>Hi,
> Sometimes I have to create a install-program for dummies. So that it can be
>startet as an attachment from an email, etc.
> Therefore I put everything into one exe file, where also routine for
>copying resist (see code below). This worked fine, until the data gets to
>big (first troubles appeared with files > 64k), in the meantime I made
>portions with smaller blocksizes.
> Sometimes this works, sometime my install.exe crashes - and if I start the
>Install.Exe program very often, I get out of memory...
>
>Has anyone an idea, how to put about 3 or 4 BIG files (program.exe,
>program.hlp,...) into one install.exe without problems ?
>
>Michael.
>
>
>    puffer$ = SPACE$(blocksize&)
>    ExeHandle& = GetModuleHandle(_INSTANCE)
>    error& = 0
>    OPEN "o",#1,"test.exe"
>    for i&=0 to n&
>   handle& = FindResource(ExeHandle&,"exe"+str$(i&),"exe")
>   adrhandle& = LoadResource(ExeHandle&,Handle&)
>   Adress% = LockResource(adrhandle&)
>if i&<n&
>   Bput #1,Adress%,50000
>else
>   Bput #1,Adress%,lastbytes%
>endif
>      ~UnlockResource(adrhandle&)
>      ~FreeResource(Handle&)
>      NEXT i&
>      CLOSE #1
>

Michael
I am an amateur at this, so forgive me if I don't really answer your
question properly.

I am supposing that you've made some sort of file to hold everything
but the installer, itself.  Every MS-equiped computer has lzexpand.dll
on it & you can use it to copy files directly without any compression
or extension renaming.  lzexpand.dll will handle monster files.

OR... If John will share, his huge2 will quickly copy files to anywhere
of any size - large or small & it's small & lightning fast!

One other suggestion... All Win95+ computers can uncab, so you can put
all of your files but the installer in a *.cab file using cabarc.exe &
let your installer call for the uncabing to the location you want to
put the program by telling it where.

There are several unzippers available that are free & I suspect they
can be told where to unzip to.

If I missed your question, I apologize.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:29 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m10B3Jj-00NNjuC>; Thu, 11 Feb 1999 22:06:35 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AwmU-00anX8C>; Thu, 11 Feb 1999 15:07:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA16280; Thu, 11 Feb 1999 13:49:45 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C2E302.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 11 Feb 1999 07:48:22 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Working with Data-resources from Exe-File
X-UIDL: df6546b9ae38e2623ed6aa0134d37bcf

Michael

BPUT is buggy. It has problems at 64 K boundaries and at file end.

Use John's huge2 program from Dales files page.

Brent. 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:30 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m10B3KR-00NNjuC>; Thu, 11 Feb 1999 22:07:19 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AwsY-00anb8C>; Thu, 11 Feb 1999 15:14:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA16340; Thu, 11 Feb 1999 14:05:44 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C2E663.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 11 Feb 1999 08:04:03 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Re:  Something from the tiger.
X-UIDL: 107fd0d233214f7e8c9acb74db985000

>>>>>>>
OK - new question for the wizards.  What can be common between a P-100
running gfawin37.exe & a 486SX25 running gfawin3.exe that would hang the
interpretors/editors in the link stage???????  
<<<<<

It compiled on my 486DX WIN3.1.

I presume file was written in gfawin3.exe, and compiled without the 387.

Beats me.

Brent.







---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:31 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m10B3Mu-00NNjqC>; Thu, 11 Feb 1999 22:09:52 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AxbV-00ao1UC>; Thu, 11 Feb 1999 16:00:33 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA16387; Thu, 11 Feb 1999 14:31:44 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C2EC7C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990211133140.CMQQ8774@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 11 Feb 1999 13:31:40 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 11 Feb 1999 13:31:40 +0000
Subject: Re: [GFA] Re:  Something from the tiger.
X-UIDL: 5429fa969a770337d34606d8908cc590

Brent
Written on the P-100 w/ gfawin37.exe.
Am set to compile 386 only so it will run on just about
anything that is running Windows.  I feel like I am getting
into "The Twilight Zone" <G>

Given that both computers locked up during the link stage
when running in the interpretor/editor, I doubt re-installing
it would make any difference.

My experience:  Compile 386 only & use no CONTROLs (buttons
in particular), then Win3.1, Win95b & Win98 UpGrade over
Win95 will allow it to run OK.  Those mentioned above, where
the OS is upgraded *over* another O/S, will *not* show the
CONTROLs properly & consistantly *IF* at all.  Win95, Win95a
& Win98 EOM seem tp be OK.
<G>
TomR.


At 08:04 AM 11/02/99 -0500, you wrote:
>>>>>>>>
>OK - new question for the wizards.  What can be common between a P-100
>running gfawin37.exe & a 486SX25 running gfawin3.exe that would hang the
>interpretors/editors in the link stage???????  
><<<<<
>
>It compiled on my 486DX WIN3.1.
>
>I presume file was written in gfawin3.exe, and compiled without the 387.
>
>Beats me.
>
>Brent.
>
>
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:32 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m10B3TC-00NNiTC>; Thu, 11 Feb 1999 22:16:22 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10AyWw-00aoXHC>; Thu, 11 Feb 1999 16:59:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA16532; Thu, 11 Feb 1999 15:37:59 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C2FC1A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 11 Feb 1999 15:11:55 +0100
References: <36BDB288.BeroList-2.5.9@aachen.linux.de>
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: Re:   [GFA] Procedures... and something for the tiger.

X-UIDL: a6534aa243e8d1d2bdb526430bcca3e8

Michael Weigand schrieb:
> At 05:04 10.02.99 +0100, Bueckmann.W wrote:
>
> >Do you sometimes work with Malloc() ?
>
> No, I don't. And I think it doesn't matter as the error showed up when I
> loaded the source into the interpreter.
>
>
> M!chael
>

Yes, that's right, but once I had a lot of trouble with malloc() and saving.
I sometimes can't load the file after saving and got an error, too. May be you 
have an similar Problem...

Regards

M.f.G.

Wilhelm Bckmann
Email Bueckmann.W@T-Online.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:36 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BEdv-00NNjaC>; Fri, 12 Feb 1999 10:12:11 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA18370; Fri, 12 Feb 1999 09:39:11 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C3F996.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 12 Feb 1999 09:44:21 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Working with Data-resources from Exe-File
X-UIDL: 721837e729457ef2a3685f6e2f2f9d28

Thanks, Tom and Brent.

Which file do you mean ? CTRLZIP by John Findlay ?

Michael

> ----------
> Von: 	BDD[SMTP:BrentDeck@compuserve.com]
> Gesendet: 	Donnerstag, 11. Februar 1999 13:48
> An: 	gfabasic@aachen.linux.de
> Betreff: 	[GFA] Working with Data-resources from Exe-File
> 
> Michael
> 
> BPUT is buggy. It has problems at 64 K boundaries and at file end.
> 
> Use John's huge2 program from Dales files page.
> 
> Brent. 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Feb 12 15:18:37 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BFvC-00NNk8C>; Fri, 12 Feb 1999 11:34:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA18566; Fri, 12 Feb 1999 11:04:42 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C40D80.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 12 Feb 1999 05:04:06 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="ec6b7754-c25c-11d2-aaef-00805fea3ca9"
Subject: AW: [GFA] Working with Data-resources from Exe-File
X-UIDL: 0f31b7e44c097ea219e6e72855f7c641

Heres a sample of some huge functions.

Attachment Converted: "c:\programme\eudora\attach\HUGEOPS3.LST"
From ???@??? Mon Feb 15 18:17:14 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BKr5-00NNjFC>; Fri, 12 Feb 1999 16:50:11 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA19095; Fri, 12 Feb 1999 16:20:23 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C4578D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 12 Feb 1999 16:14:11 -0100
In-Reply-To: <36BF6ECF.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: a7d84a6d414a6522f63421b95b2e03a6

At 16:57 08.02.1999 -0500, you wrote:

[...]
>I have found that a combination of BMOVE, Roland's  ~@@hmemcpy(), and
>John's  HugeRead() and HugeWrite(), works best.
>
>Roland, is there a reason for using BYTE vs WORD declaration of  ( VOID )
>hmemcpy() in PROCEDURE biginit ?
>It seems to work Ok either way.

I think You could use what ever You like because VOID means nothing ;-)

But by the way: There is a problem in Your declaration. You have renamed
the functions. My be the Interpreter corrects this problem automaticly.
But compiled this must result a problem. The Windows Kernel exports
_hread and _hwrite, not hread and hwrite. If You want to use an other
name inside GFA Basic You must import the API function by their Ordinal
Number. In this case Your EXE (DLL) header does not contain the function
names, only the numbers. For determining the valid Ordinal Numbers
You can download my small program "Exports" from:
http://userpage.fu-berlin.de/~alibaba/gfabasic/
The sources are inside also. The tool was exactly written to determine
the Ordinal numbers as comfortable as possible. Also it is possible
to "spy" undocumented Windows functions.

Second: As DLL name You should use "kernel", not "kernel.dll",
"krnl386.exe" or "krnl286.exe". "kernel" is the internal name for
the Kernel module.

Use the following code:

DLL #1,"kernel"
 DECL LONG hread(W,L,L) AS 349
 DECL LONG hwrite(W,L,L) AS 350
 DECL BYTE hmemcpy(L,L,L) AS 348
ENDDLL

Bye, Roland

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:15 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BKs7-00NNieC>; Fri, 12 Feb 1999 16:51:15 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA19107; Fri, 12 Feb 1999 16:23:09 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C45816.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 12 Feb 1999 15:46:19 -0100
In-Reply-To: <36B8B33E.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: 611029e825802b828c625b34b535cb6a

At 11:19 03.02.1999 -0800, you wrote:
>Hi Roland,
>I tried to run your code but get syntax errors on the following
>>  DECL LONG _hread(W,L,L)  
>>  DECL LONG _hwrite(W,L,L) 
>my gfa editor does not like these and I wondered if you knew why?

Try this:

DLL #1,"kernel"
  DECL LONG hread(W,L,L) AS 349
  DECL LONG hwrite(W,L,L) AS 350
ENDDLL

Remark, there are TWO differences. The first is we call the
functions by Ordinal Number. This is more quickly then by name
end makes a little bit smaller code (some bytes only).
The second difference is we can use another function name for
the internal use in GFA Basic (the "_" is missing). Any other
function name would work also as long as You declare with the
correct Ordinal Number.
Did this solve Your problem?

Bye, Roland



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:17 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BKsD-00NNieC>; Fri, 12 Feb 1999 16:51:21 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA19106; Fri, 12 Feb 1999 16:23:08 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C45815.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 12 Feb 1999 15:53:59 -0100
In-Reply-To: <36BBC065.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] re: did anybody get this to work...
X-UIDL: b18f9c36983bf8011d9a034fed03e2ec

At 02:57 06.02.1999 +0000, you wrote:
>  '=>>  DECL LONG _hread(W,L,L)  
>  '=>>  DECL LONG _hwrite(W,L,L) 
>  '=>>~@@_hread(hFile&,lpMem%,lenFile%) 
>  '=>>~@@_hwrite(hFile&,lpMem%,lenFile%)
>
>Well, on my P100, running Win95 v4.00.950a, the editor refuses the four
>lines above repeatedly.  The GFA-W version is 4.38, the editor is
>gfawin37.exe, 309K, 25/02/98.
>It isn't as if I could say Windows is the culprit since the O/S never sees them.
>Personally, I could use such a fine means of copying files.

I use GFA Basic 4.38 (professional version) and gfawin37.exe (22.11.98, 316.9KB)

The Windows version and the CPU type may not be responsible for this
problem - I think there is an editor problem (small bug?). The trick
described in my last mail should normally solve the problem (I hope so).

Bye, Roland


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:26 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BNTC-00NNk3C>; Fri, 12 Feb 1999 19:37:42 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA19523; Fri, 12 Feb 1999 19:07:02 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C47E97.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 12 Feb 1999 10:06:36 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: face35f089e8513d64ae3a0eb8d7073f

Hi Roland,
Yes, your solution works fine.
Dale Bryant
----- Original Message -----
From: Roland Walter <alibaba@zedat.fu-berlin.de>
To: <gfabasic@aachen.linux.de>
Sent: Friday, February 12, 1999 8:46 AM
Subject: Re: [GFA] BLOAD and BGET


>At 11:19 03.02.1999 -0800, you wrote:
>>Hi Roland,
>>I tried to run your code but get syntax errors on the following
>>>  DECL LONG _hread(W,L,L)
>>>  DECL LONG _hwrite(W,L,L)
>>my gfa editor does not like these and I wondered if you knew why?
>
>Try this:
>
>DLL #1,"kernel"
>  DECL LONG hread(W,L,L) AS 349
>  DECL LONG hwrite(W,L,L) AS 350
>ENDDLL
>
>Remark, there are TWO differences. The first is we call the
>functions by Ordinal Number. This is more quickly then by name
>end makes a little bit smaller code (some bytes only).
>The second difference is we can use another function name for
>the internal use in GFA Basic (the "_" is missing). Any other
>function name would work also as long as You declare with the
>correct Ordinal Number.
>Did this solve Your problem?
>
>Bye, Roland
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:28 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BPxF-00NNieC>; Fri, 12 Feb 1999 22:16:53 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA19802; Fri, 12 Feb 1999 21:47:25 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C4A431.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 12 Feb 1999 15:46:46 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] BLOAD and BGET
X-UIDL: 2ba34ad5d2cc3b3f66a70ba94701c13c

>>>>>
DLL #1,"kernel"
  DECL LONG hread(W,L,L) AS 349
  DECL LONG hwrite(W,L,L) AS 350
ENDDLL
<<<<<<<


Roland, Thanks for help with this. It didn't occur to me to try the ordinal
number. It works great.

Without the ordinal number the functions will not link when compiled,
because of the name change
required by the interpreter.


Best Regards,

Brent



  

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:31 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BbBd-00NNj8C>; Sat, 13 Feb 1999 10:16:29 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA21058; Sat, 13 Feb 1999 09:46:15 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C54CB4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990213084610.DKGS18723@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 13 Feb 1999 08:46:10 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Sat, 13 Feb 1999 08:46:10 +0000
Subject: [GFA] Info, Please   1302xx1-
X-UIDL: 831989057d907cd308c299afc116acb5

13/02/99 02:38:19 AM   Info, Please   1302xx1-

2 questions this trip...

1) char$(164) () is often used to denote tab.  Is there an 
explanation of this that would allow translating it's 
existance into spaces when a device won't recognize it & 
perform a tab?

2) Once upon a time I saw something that went directly to 
the section of an executable file & extracted the version 
info, the company or author info, version date, etc.  Does 
someone know of this?  I'm not having any success trying to 
isolate this information in code & I can't find the goodie 
I had that does.

All help is much appreciated!
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:32 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BbC2-00NNj8C>; Sat, 13 Feb 1999 10:16:54 +0100 (MET)
Received: from aachen.linux.de (aachen.linux.de [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA21057; Sat, 13 Feb 1999 09:46:14 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C54CB4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990213084557.DKGL18723@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 13 Feb 1999 08:45:57 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 13 Feb 1999 08:45:57 +0000
Subject: Re: [GFA] re: did anybody get this to work...
X-UIDL: 18eb5ecfd2ddc8295dc7c097398d7800

More mystery crawls out of the wood work.  More bugs(?) to fight.

So... what does it cost to upgrade to 16-bit Pro & escape all this?

TomR.


At 03:53 PM 12/02/99 -0100, you wrote:
>At 02:57 06.02.1999 +0000, you wrote:
>>  '=>>  DECL LONG _hread(W,L,L)  
>>  '=>>  DECL LONG _hwrite(W,L,L) 
>>  '=>>~@@_hread(hFile&,lpMem%,lenFile%) 
>>  '=>>~@@_hwrite(hFile&,lpMem%,lenFile%)
>>
>>Well, on my P100, running Win95 v4.00.950a, the editor refuses the four
>>lines above repeatedly.  The GFA-W version is 4.38, the editor is
>>gfawin37.exe, 309K, 25/02/98.
>>It isn't as if I could say Windows is the culprit since the O/S never sees
them.
>>Personally, I could use such a fine means of copying files.
>
>I use GFA Basic 4.38 (professional version) and gfawin37.exe (22.11.98,
316.9KB)
>
>The Windows version and the CPU type may not be responsible for this
>problem - I think there is an editor problem (small bug?). The trick
>described in my last mail should normally solve the problem (I hope so).
>
>Bye, Roland
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:42 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BgXD-00NNiWC>; Sat, 13 Feb 1999 15:59:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA21700; Sat, 13 Feb 1999 15:29:06 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C59D04.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 13 Feb 1999 14:27:52 -0000
MIME-Version: 1.0
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Content-Type: multipart/mixed;
Subject: [GFA] AttachThreadInput
X-UIDL: e66af052a806e76bd533d2608eba8af1

------=_NextPart_000_0043_01BE575D.0A125060
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

I'm sure John's right about not being able to use AttachThreadInput but I've
had a few goes. I can find the Caret in the editor window with no problems
but unfortunately that's the only window it works in. I've attached my 2
best attempts, if anyone has any ideas I'd love to hear them.Russell HaywardWebsite:    http://www.baphead.freeserve.co.uk/
The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub------=_NextPart_000_0043_01BE575D.0A125060
Content-Type: application/octet-stream;
	name="getcaretpos.gfw"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
	filename="getcaretpos.gfw"dEN1cnJlbnRUaHJlYWRJZBhHZXRXaW5kb3dUaHJlYWRQcm9jZXNzSWQRQXR0YWNoVGhyZWFkSW5w
dXQAAAAAAAAAAAAAAABOQwIAEAABZgNmaWQQAAEAEAAQAAEATkQVAHAAAWIBeAJ4MQJ5MQF3AWgE
c2NyeARzY3J5AXkCd2wCY3gCY3kDd25kAWEBbilHZXRXaW5kb3dUaHJlYWRQcm9jZXNzSWRHZXRX
aW5kb3dUaHJlYWRJZANmaWQBcANmZ3cEb2ZndwNjaWQAAAAAAAAAAE5FAAAAAE5GAAAAAE5HAAAA
AE5IAAAAAE5JAAAAAE5KBABQAAR3cG9zD2VudW13aW5kb3dzcHJvYxhHZXRXaW5kb3dUaHJlYWRQ
cm9jZXNzSWQRQXR0YWNoVGhyZWFkSW5wdXQAAAAAAAAAAAAAAAAAAAAATksAAAAATkwAAAAATk0H
AFAABUhlbGxvD2VudW13aW5kb3dzcHJvYwtFbnVtV2luZG93cwNETEwLR2V0Q2FyZXRQb3MEV09S
RBFBdHRhY2hUaHJlYWRJbnB1dAAAAAAAAABOTgEAEAAFcG9pbnQAAAAAAAAAAAAATk8CABAAAXgB
eWMoYik9MCBBTkQgSU5QAAAAAE5RAAAAAE5SAQAQAAFwAAAAAAAAAAAAAAAAAABOUwAAAABOVAAA
AABOVQAAAABOVgAAAABOVwQAYAAYR2V0V2luZG93VGhyZWFkUHJvY2Vzc0lkEkdldEN1cnJlbnRU
aHJlYWRJZBFBdHRhY2hUaHJlYWRJbnB1dBNHZXRGb3JlZ3JvdW5kV2luZG93AABqAx8WWgAAAAAA
CgZEVAMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDTUsQAP///////////////wcABwD//xYAFwBQ
Uj4AgAFOBBUBcAIAABUBcwIAABUBcwIIABUBcQIVAX0CAAAAABUBWgKUAQQAVVNFUt0GFQFwA9wG
IAADAAAAACAAAAIAFQFdAtwGMAAAAAAAAAAAAAIAFQHgBhUBWgIQAMgAEADIABAAyAAQAMgAXQKo
AhUBWgLEBooFJAAMAAAAFQHbBjAAAAChACQAAAAVAaAAJAAAAIoFJAAQAAAAFQFZAAwAAABZABAA
AABdAtsGIAADAJACFQHpABUB2AAkAAAAJgAAABUBhwMVAdsGMAAAAKEAJAAAABUBoAAkAAAAoAAm
AAAAhQDrAPwGFQFZAAwAAABZABAAAABZAtsGIAADAJACFQGgACQAAACKBSQAEAAAABUBWQAMAAAA
WQAQAAAAXQLbBiAAAwCQAhUB7gAVAZMCAAASBZACFQEtAnoCAAAAAP0A/gB6AgAACAD9AP8AFQFa
AkYD8wAEAAAA6gCGBhUBWQAMAAAAWQAQAAAAWQLbBiAAAwCQAhUBWgI8AxUBWgLeBkRFRldSRAEi
YS16IlRZUEUB7QAAOgAtAVdPUkQB7gAALQFXT1JEAe4IAEVORFRZUEUB7QAAOvEAAC5ETEwBIzEs
IlVTRVIiAERFQ0wBQk9PTAH2IAAoTCxMLFcpAUFTATgAREVDTAFXT1JEAfYwACgpAEVORERMTC8v
QXR0YWNoVGhyZWFkSW5wdXQlAT0BR2V0UHJvY0FkZHJlc3MoR2V0TW9kdWxlSGFuZGxlKCJVU0VS
IiksIkF0dGFjaFRocmVhZElucHV0KERXT1JELERXT1JELEJPT0wpIilPUEVOVwEjMSwyMDAsMjAw
LDIwMCwyMDAsLTEALy9fQ0IBKDExKT1lbnVtd2luZG93c3Byb2MoV0wp4QwAPUdldFdpbmRvd1Rh
c2soV0lOKDEpKQDjJAA9XvYwACgp4RAAPUdldFdpbmRvd1Rhc2so4yQAKX5e9iAAKOEMACzhEAAs
LTEpACdBdHRhY2gAUkVQRUFU4yYAPeMkAABQRUVLRVZFTlQA4yQAPV72MAAoKS8vAklGAWZpZCU9
MAFUSEVOAX5FbnVtV2luZG93cyhfQ0IoMTEpLDApAC8vAklGAWZpZCUhPTAASUYBKOMkADw+4yYA
KQAnVW5hdHRhY2gAfl72IAAo4QwALOEQACwwKeEQAD1HZXRXaW5kb3dUYXNrKOMkACl+XvYgACjh
DAAs4RAALC0xKQAnQXR0YWNoAEVORElGAH5HZXRDYXJldFBvcyhWOvEAAC4pPwHxAAAu7gAALPEA
AC7uCAAALy8CPwFjaWQlLGZpZCUnJ2ZndwBVTlRJTAFNRU5VKDEpPTQAfl72IAAo4QwALOEQACww
KUNMT1NFVwEjMQBGUkVFRExMATEAJwFQUk9DRURVUkUBZW51bXdpbmRvd3Nwcm9jKHduZCxhJSkA
JwNmaWQlPTAnA0lGAShHZXRQYXJlbnQod25kKT09MAEmJgFJc1dpbmRvd1Zpc2libGUod25kKSE9
MAEmJgFJc0ljb25pYyh3bmQpPT0wKQAnBWZpZCU9R2V0V2luZG93VGFzayh3bmQpACcFQXR0YWNo
VGhyZWFkSW5wdXQoY2lkLGZpZCxUUlVFKQAnBUlGAShHZXRGb2N1cygpIT0wKScHJz0+PkNIRUNL
AUZPQ1VTAUhBUwFDVVJTT1IuAUlGAU5PVAFNQUtFAWZpZCU9MCcHZiE9U2hvd0NhcmV0KDApACcH
SUYBZiEAJwl+SGlkZUNhcmV0KDApACcHRUxTRScJZmlkJT0wJwdFTkRJRgAnBUVMU0UnB35BdHRh
Y2hUaHJlYWRJbnB1dChjaWQsZmlkLEZBTFNFKQAnB2ZpZCU9MCcFRU5ESUYAJwNFTkRJRgAnA0lG
AShmaWQlIT0wKQFUSEVOAVJFVFZBTAFGQUxTRScDSUYBKGZpZCU9PTApAVRIRU4BUkVUVkFMAVRS
VUUAJwFSRVRVUk4AAAAAAQAAAAwAAQAGABYAAQAMACAAAQASACoAAQAWADIAAQAeADoAAQAeADoA
AgAsAEgAAQA+AGIAAQBQAHIAAwBUAHgAAQBUANwAAQBUANwAAQBsAPgAAQBsABYBAQB6ADABAQCI
ADoBAQCYAFABAQCwAGIBAQCwAGoBAgC0AHABAQDAAHgBAQDEAIIBAQDSAIwBAQDSALYBAQDSAMQB
AgDmANIBAQDmANwBAQD+AOwBAQAOAQICAQAmARQCAQAmARwCAwAqASICAQA0ATYCAQBMAUgCAQBM
AVwCAwBcAWwCAQB0AXwCAQB6AYYCAQCAAZACAQCAAZACAQCAAbQCAQCAAbwCAQCAAQQDAQCAAR4D
AQCAAUADAQCAAVQDAQCAAYQDAQCAAZYDAQCAAZ4DAQCAAa4DAQCAAbQDAQCAAbwDAQCAAcQDAQCA
AcoDAQCAAe4DAQCAAfYDAQCAAf4DAQCAAQYEAQCAASYEAQCAAUYEAQCAAU4EAQBFUA==------=_NextPart_000_0043_01BE575D.0A125060
Content-Type: application/octet-stream;
	name="getcaretpos2.gfw"

Content-Disposition: attachment;
	filename="getcaretpos2.gfw"

Attachment Converted: "c:\programme\eudora\attach\getcaretpos2.gfw"
------=_NextPart_000_0043_01BE575D.0A125060--
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:45 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BiYv-00NNicC>; Sat, 13 Feb 1999 18:09:01 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA21973; Sat, 13 Feb 1999 17:39:38 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C5BB8D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 13 Feb 1999 08:39:08 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] version
X-UIDL: 26505bc9a113a2a79661fb592bb3562d

Is the GFA Basic 4.38 extended version the professional version?

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:46 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Bjw1-00NNjpC>; Sat, 13 Feb 1999 19:36:57 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA22136; Sat, 13 Feb 1999 18:42:28 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C5CA48.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 13 Feb 1999 12:40:57 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] AttachThreadInput
X-UIDL: 2d4039a2aceffa858d4ad79032128816

Russell,

>I've attached my 2 best attempts, if anyone has any ideas I'd love to hear
them.<

Didn't get the two 'attempts'! Send them as an attachment if you can.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:47 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BlOG-00NNjwC>; Sat, 13 Feb 1999 21:10:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA22349; Sat, 13 Feb 1999 20:41:32 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C5E62C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 13 Feb 1999 11:40:59 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] AttachThreadInput
X-UIDL: 1123a398bb0e1c3fd64ef0dbbd11d715

Hi John,
I got them.They are not in  zip but base 64 in the message body. I can zip
them up and send them to you if you desire.
dale

----- Original Message -----
From: John Findlay <Jayef@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Saturday, February 13, 1999 9:40 AM
Subject: [GFA] AttachThreadInput


Russell,

>I've attached my 2 best attempts, if anyone has any ideas I'd love to hear
them.<

Didn't get the two 'attempts'! Send them as an attachment if you can.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:48 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Bmkn-00NNjzC>; Sat, 13 Feb 1999 22:37:33 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA22515; Sat, 13 Feb 1999 22:09:27 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C5FAC4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 13 Feb 1999 21:08:17 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Sorry about that
X-UIDL: b6f13ebebbca5a24b62a9953c839bf55

Sorry everybody, I well and truely mucked up my last message, I've got to
remember that plain text mode, it's meant to be automatic but it seems
Outlook doesn't make it that simple. This time I hope the attachments come
through okay, as I said I'd love to hear any ideas anyone has.

Sorry
Russell Hayward

Website:    http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:49 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Bmp2-00NOZbC>; Sat, 13 Feb 1999 22:41:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA22535; Sat, 13 Feb 1999 22:13:45 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C5FBC1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 13 Feb 1999 13:13:01 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Sorry about that
X-UIDL: 0b496dd91f417aa1a195f4ac0b4de3c8

Hi Russell,
Nothing attached to this message. The best way for attachments is to put it
in a zip file and attach the zip.
Dale

----- Original Message -----
From: Russell Hayward <tarquin@baphead.freeserve.co.uk>
To: <gfabasic@aachen.linux.de>
Sent: Saturday, February 13, 1999 1:08 PM
Subject: [GFA] Sorry about that


>Sorry everybody, I well and truely mucked up my last message, I've got to
>remember that plain text mode, it's meant to be automatic but it seems
>Outlook doesn't make it that simple. This time I hope the attachments come
>through okay, as I said I'd love to hear any ideas anyone has.
>
>Sorry
>Russell Hayward
>
>Website:    http://www.baphead.freeserve.co.uk/
>
>The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:50 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BmpW-00NOZaC>; Sat, 13 Feb 1999 22:42:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA22531; Sat, 13 Feb 1999 22:12:27 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C5FB72.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 13 Feb 1999 21:11:11 -0000
MIME-Version: 1.0
Content-Type: multipart/mixed;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] I'm dumb
X-UIDL: 3e0fd4b9fa9889558cb61374145ce84a

------=_NextPart_000_005F_01BE5795.61B5CA80
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

It's been a long day. This time the files are definately attached.Russell Hayward

Websites:    http://www.baphead.freeserve.co.uk/The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub 
------=_NextPart_000_005F_01BE5795.61B5CA80
Content-Type: application/octet-stream;
	name="getcaretpos.gfw"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
	filename="getcaretpos.gfw"dEN1cnJlbnRUaHJlYWRJZBhHZXRXaW5kb3dUaHJlYWRQcm9jZXNzSWQRQXR0YWNoVGhyZWFkSW5w
dXQAAAAAAAAAAAAAAABOQwIAEAABZgNmaWQQAAEAEAAQAAEATkQVAHAAAWIBeAJ4MQJ5MQF3AWgE
c2NyeARzY3J5AXkCd2wCY3gCY3kDd25kAWEBbilHZXRXaW5kb3dUaHJlYWRQcm9jZXNzSWRHZXRX
aW5kb3dUaHJlYWRJZANmaWQBcANmZ3cEb2ZndwNjaWQAAAAAAAAAAE5FAAAAAE5GAAAAAE5HAAAA
AE5IAAAAAE5JAAAAAE5KBABQAAR3cG9zD2VudW13aW5kb3dzcHJvYxhHZXRXaW5kb3dUaHJlYWRQ
cm9jZXNzSWQRQXR0YWNoVGhyZWFkSW5wdXQAAAAAAAAAAAAAAAAAAAAATksAAAAATkwAAAAATk0H
AFAABUhlbGxvD2VudW13aW5kb3dzcHJvYwtFbnVtV2luZG93cwNETEwLR2V0Q2FyZXRQb3MEV09S
RBFBdHRhY2hUaHJlYWRJbnB1dAAAAAAAAABOTgEAEAAFcG9pbnQAAAAAAAAAAAAATk8CABAAAXgB
eWMoYik9MCBBTkQgSU5QAAAAAE5RAAAAAE5SAQAQAAFwAAAAAAAAAAAAAAAAAABOUwAAAABOVAAA
AABOVQAAAABOVgAAAABOVwQAYAAYR2V0V2luZG93VGhyZWFkUHJvY2Vzc0lkEkdldEN1cnJlbnRU
aHJlYWRJZBFBdHRhY2hUaHJlYWRJbnB1dBNHZXRGb3JlZ3JvdW5kV2luZG93AABqAx8WWgAAAAAA
CgZEVAMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDTUsQAP///////////////wcABwD//xYAFwBQ
Uj4AgAFOBBUBcAIAABUBcwIAABUBcwIIABUBcQIVAX0CAAAAABUBWgKUAQQAVVNFUt0GFQFwA9wG
IAADAAAAACAAAAIAFQFdAtwGMAAAAAAAAAAAAAIAFQHgBhUBWgIQAMgAEADIABAAyAAQAMgAXQKo
AhUBWgLEBooFJAAMAAAAFQHbBjAAAAChACQAAAAVAaAAJAAAAIoFJAAQAAAAFQFZAAwAAABZABAA
AABdAtsGIAADAJACFQHpABUB2AAkAAAAJgAAABUBhwMVAdsGMAAAAKEAJAAAABUBoAAkAAAAoAAm
AAAAhQDrAPwGFQFZAAwAAABZABAAAABZAtsGIAADAJACFQGgACQAAACKBSQAEAAAABUBWQAMAAAA
WQAQAAAAXQLbBiAAAwCQAhUB7gAVAZMCAAASBZACFQEtAnoCAAAAAP0A/gB6AgAACAD9AP8AFQFa
AkYD8wAEAAAA6gCGBhUBWQAMAAAAWQAQAAAAWQLbBiAAAwCQAhUBWgI8AxUBWgLeBkRFRldSRAEi
YS16IlRZUEUB7QAAOgAtAVdPUkQB7gAALQFXT1JEAe4IAEVORFRZUEUB7QAAOvEAAC5ETEwBIzEs
IlVTRVIiAERFQ0wBQk9PTAH2IAAoTCxMLFcpAUFTATgAREVDTAFXT1JEAfYwACgpAEVORERMTC8v
QXR0YWNoVGhyZWFkSW5wdXQlAT0BR2V0UHJvY0FkZHJlc3MoR2V0TW9kdWxlSGFuZGxlKCJVU0VS
IiksIkF0dGFjaFRocmVhZElucHV0KERXT1JELERXT1JELEJPT0wpIilPUEVOVwEjMSwyMDAsMjAw
LDIwMCwyMDAsLTEALy9fQ0IBKDExKT1lbnVtd2luZG93c3Byb2MoV0wp4QwAPUdldFdpbmRvd1Rh
c2soV0lOKDEpKQDjJAA9XvYwACgp4RAAPUdldFdpbmRvd1Rhc2so4yQAKX5e9iAAKOEMACzhEAAs
LTEpACdBdHRhY2gAUkVQRUFU4yYAPeMkAABQRUVLRVZFTlQA4yQAPV72MAAoKS8vAklGAWZpZCU9
MAFUSEVOAX5FbnVtV2luZG93cyhfQ0IoMTEpLDApAC8vAklGAWZpZCUhPTAASUYBKOMkADw+4yYA
KQAnVW5hdHRhY2gAfl72IAAo4QwALOEQACwwKeEQAD1HZXRXaW5kb3dUYXNrKOMkACl+XvYgACjh
DAAs4RAALC0xKQAnQXR0YWNoAEVORElGAH5HZXRDYXJldFBvcyhWOvEAAC4pPwHxAAAu7gAALPEA
AC7uCAAALy8CPwFjaWQlLGZpZCUnJ2ZndwBVTlRJTAFNRU5VKDEpPTQAfl72IAAo4QwALOEQACww
KUNMT1NFVwEjMQBGUkVFRExMATEAJwFQUk9DRURVUkUBZW51bXdpbmRvd3Nwcm9jKHduZCxhJSkA
JwNmaWQlPTAnA0lGAShHZXRQYXJlbnQod25kKT09MAEmJgFJc1dpbmRvd1Zpc2libGUod25kKSE9
MAEmJgFJc0ljb25pYyh3bmQpPT0wKQAnBWZpZCU9R2V0V2luZG93VGFzayh3bmQpACcFQXR0YWNo
VGhyZWFkSW5wdXQoY2lkLGZpZCxUUlVFKQAnBUlGAShHZXRGb2N1cygpIT0wKScHJz0+PkNIRUNL
AUZPQ1VTAUhBUwFDVVJTT1IuAUlGAU5PVAFNQUtFAWZpZCU9MCcHZiE9U2hvd0NhcmV0KDApACcH
SUYBZiEAJwl+SGlkZUNhcmV0KDApACcHRUxTRScJZmlkJT0wJwdFTkRJRgAnBUVMU0UnB35BdHRh
Y2hUaHJlYWRJbnB1dChjaWQsZmlkLEZBTFNFKQAnB2ZpZCU9MCcFRU5ESUYAJwNFTkRJRgAnA0lG
AShmaWQlIT0wKQFUSEVOAVJFVFZBTAFGQUxTRScDSUYBKGZpZCU9PTApAVRIRU4BUkVUVkFMAVRS
VUUAJwFSRVRVUk4AAAAAAQAAAAwAAQAGABYAAQAMACAAAQASACoAAQAWADIAAQAeADoAAQAeADoA
AgAsAEgAAQA+AGIAAQBQAHIAAwBUAHgAAQBUANwAAQBUANwAAQBsAPgAAQBsABYBAQB6ADABAQCI
ADoBAQCYAFABAQCwAGIBAQCwAGoBAgC0AHABAQDAAHgBAQDEAIIBAQDSAIwBAQDSALYBAQDSAMQB
AgDmANIBAQDmANwBAQD+AOwBAQAOAQICAQAmARQCAQAmARwCAwAqASICAQA0ATYCAQBMAUgCAQBM
AVwCAwBcAWwCAQB0AXwCAQB6AYYCAQCAAZACAQCAAZACAQCAAbQCAQCAAbwCAQCAAQQDAQCAAR4D
AQCAAUADAQCAAVQDAQCAAYQDAQCAAZYDAQCAAZ4DAQCAAa4DAQCAAbQDAQCAAbwDAQCAAcQDAQCA
AcoDAQCAAe4DAQCAAfYDAQCAAf4DAQCAAQYEAQCAASYEAQCAAUYEAQCAAU4EAQBFUA==------=_NextPart_000_005F_01BE5795.61B5CA80
Content-Type: application/octet-stream;
	name="getcaretpos2.gfw"

Content-Disposition: attachment;
	filename="getcaretpos2.gfw"

Attachment Converted: "c:\programme\eudora\attach\getcaretpos21.gfw"
------=_NextPart_000_005F_01BE5795.61B5CA80--
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:54 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BnPc-00NNjzC>; Sat, 13 Feb 1999 23:19:44 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA22649; Sat, 13 Feb 1999 22:51:50 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C604AE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 13 Feb 1999 16:49:56 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] I'm dumb
X-UIDL: 61ca846e04d14effe364abc5525e718e

Well, something isn't right. No attachments my end.

Dale, if you have them, send me a copy. What's base 64? I'm dumb as well,
too. :)

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:55 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Bo1H-00NNicC>; Sat, 13 Feb 1999 23:58:39 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA22747; Sat, 13 Feb 1999 23:29:26 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C60D82.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 13 Feb 1999 22:28:07 -0000
MIME-Version: 1.0
Content-Type: multipart/mixed;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Me again
X-UIDL: e264c8d01c3ed9a07f997d29bcac6fa0

------=_NextPart_000_004D_01BE57A0.21497A40
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

This is my last attempt. :-)Russell Hayward

------=_NextPart_000_004D_01BE57A0.21497A40
Content-Type: application/octet-stream;
	name="getcaretpos2.gfw"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
	filename="getcaretpos2.gfw"V0FMTFBBUEVSElNQSUZfVVBEQVRFSU5JRklMRQFhB2ZXaW5JbmkHcHZQYXJhbQd1aVBhcmFtCHVp
QWN0aW9uA2Fkcgd0aHJlYWQyB3RocmVhZDEDZmlkA2NpZBFBdHRhY2hUaHJlYWRJbnB1dAAAAAAA
AAAAAABOQwIAEAAGYXR0YWNoA2Znd29mdCBXTkQCABAAA2ZndwRvZmd3ayhmZ3cpDU5FAAAAAE5G
AQAQAAR3YWxse+9773vve+9773tORwAAAABOSAAAAABOSQAAAABOSgAAAABOSwAAAABOTAAAAABO
TQEAEAADZmlu+gIw9zT3Qvc19zT3Tk4BABAABXBvaW507v+L8IX27v+L8E5PAgAQAAF4AXkAAAAA
AAAAAAAAAABOUAAAAABOUQAAAABOUgEAEAABcI1EJBSNTCRAUGoAahjoTlMAAAAATlQCADAAFlN5
c3RlbVBhcmFtZXRlcnNJbmZvMzIRQXR0YWNoVGhyZWFkSW5wdXQAAAAAAAAATlUAAAAATlYAAAAA
TlcEAFAAEExvYWRMaWJyYXJ5RXgzMlcORnJlZUxpYnJhcnkzMlcRR2V0UHJvY0FkZHJlc3MzMlcT
R2V0Rm9yZWdyb3VuZFdpbmRvdwAAAAAAAAAAAABEVAMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMD
TUsjAP///////////////xcAMgAPAP////9QUicA9AHkAhUBcAIAABUBcwIAABUBcwIIABUBcQIV
AX0CAAAAABUBWgKnAhUBWwKUAQYAa2VybmVs3QYVAV0C3AYAAAMAAAAAAAAAAQAVAV0C3AYQAAEA
AAAAAAAAAgAVAV0C3AYgAAIAAAAAAAAAAQAVAeAGFQFaApQBBABVU0VS3QYVAV0C3AYwAAAAAAAA
AAAAAgAVAeAGFQGUAQYAa2VybmVsZARPBZQBCwBDYWxsUHJvYzMyVwBkBF8FJAAAAAAAFQGUAQoA
dXNlcjMyLmRsbGQEWQJZAtsGAAADACQABAAAABUBWgLEBooFJAA0AAAAFQHbBjAAAAChAAAAAACg
AAAAAACKBSQAMAAAABUBzQA0AAAAWgLNADAAAABaAtsB8L9dAsgDBAADAJACFQHpABUB2AAAAAAA
AgAAABUBhwMVAdsGMAAAAKEAAAAAABUBoAAAAAAAoAACAAAAhQDrAJ4FFQEtAs0ANAAAAFoCzQAw
AAAAWgLbAQAAXQLIAwQAAwD8AP8AFQGgAAAAAACKBSQAMAAAABUBLQLNADQAAABaAs0AMAAAAFoC
2wHwv10CyAMEAAMA/AD/ABUB7gAVAZMCAAASBZACFQEtAnoCAAAAAP0A/gB6AgAACAD9AP8AFQFa
AkYD8wAEAAAA6gAQBRUBOgIAAAAAREVGV1JEASJhLXoiVFlQRQHtAAA6AC0BV09SRAHuAAAtAVdP
UkQB7ggARU5EVFlQRQHtAAA68QAALk9QRU5XASMxRExMASMyLCJrZXJuZWwiACcBLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0AJwFEZWNsYXJlAVdPVwFmdW5jdGlvbnMBZnJvbQF0aGUBMTYtYml0AWtlcm5lbCcBLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0AREVDTAFEV09SRAH2AAAoTCxMLEwpAERFQ0wBQk9PTAH2EAAoTClERUNMAURX
T1JEAfYgAChMLEwpAEVORERMTERMTAEjMSwiVVNFUiIAREVDTAFXT1JEAfYwACgpAEVORERMTOEA
AAE9AUdldFByb2NBZGRyZXNzKEdldE1vZHVsZUhhbmRsZSgia2VybmVsIiksIkNhbGxQcm9jMzJX
IikA4QQAAT0BXvYAAAEoInVzZXIzMi5kbGwiLAEwLAEwKQDhNAA9R2V0V2luZG93VGFzayhXSU4o
MSkpAOMAAD1e9jAAKCksA+EwAD1HZXRXaW5kb3dUYXNrKOMAACl+QPMEACjhNAAs4TAALC0xKQBS
RVBFQVTjAgA94wAAAFBFRUtFVkVOVADjAAA9XvYwACgpSUYBKOMAADw+4wIAKQA/AUDzBAAo4TQA
LOEwACwwKQDhMAA9R2V0V2luZG93VGFzayjjAAApPwFA8wQAKOE0ACzhMAAsLTEpRU5ESUYBfkdl
dENhcmV0UG9zKFY68QAALik/AfEAAC7uAAAs8QAALu4IAAAvLwI/AWNpZCUsZmlkJScnZmd3JycA
VU5USUwBTUVOVSgxKT00AOwAAAAAAAAAAQAAAAwAAQAGABYAAQAMACAAAQASACoAAQAWADIAAQAe
ADoAAQAkAEIAAgA0AFIAAQA0AJwAAQA0AMoAAQA0ABQBAQBGACoBAQBYADoBAQBqAE4BAwBuAFQB
AgB8AGIBAQCOAHIBAwCSAHgBAQC8ALYBAQDeANYBAQDeANYBAQDsAPABAQAIARICAQAoASQCAgAs
ASoCAQA4ATICAQA8ATwCAQBKAUYCAgBeAVQCAQCCAWYCAQCSAXwCAQC2AY4CAwC6AZQCAQDEAagC
AQDcAboCAQDcAdACAwDsAeACAQD0AeQCAQD0AeQCAQBQUggANABAABUBPAIAAAAAAAAVAVkABAAA
ANsGEAABAJACFQFaAt4GFQFbAt4GFQFaAjwDFQGuAxUBPQJQUk9DRURVUkUB7AAAAH5e9hAAKOEE
AClGUkVFRExMATEARlJFRURMTAEyAENMT1NFVwEjMQBFRElUUkVUVVJOAAAAAAIACgAOAAEAGgAY
AAEAIAAiAAEAJgAsAAEALAA2AAEAMAA6AAMANABAAAEANABAAAEAUFIEAJQAfgAVAZIDBAADAPD/
UQMAAPz/UAMoAPb/UAMsAPD/FQFZAAQAAACUAREAQXR0YWNoVGhyZWFkSW5wdXQAZATbBiAAAgAk
ACQAAAAVAVkAAAAAALsCLADw/3AAmQO7AigA9v9wAJkDwwIAAPz/mANZACQAAABwAJkDBAAAAAIA
mQMEAAAABACZAxAAFgAEBAIAygMVAcIDRlVOQ1RJT04B8wQAKOEsACzhKAAs4gAAKQDhJAABPQFe
9iAAKOEEACwBIkF0dGFjaFRocmVhZElucHV0IilSRVRVUk4BUDoo4QAAKQEoTDrhLAAsAUw64SgA
LAHiAAAsAUw64SQALAFMOiUwMDEwLAFMOjQpAEVOREZVTkMBAAAAAAIAHAAaAAEASAA+AAEAkAB2
AAMAlAB+AAEARVA=------=_NextPart_000_004D_01BE57A0.21497A40
Content-Type: application/octet-stream;
	name="getcaretpos.gfw"

Content-Disposition: attachment;
	filename="getcaretpos.gfw"

Attachment Converted: "c:\programme\eudora\attach\getcaretpos.gfw"
------=_NextPart_000_004D_01BE57A0.21497A40--
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:57 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BrRQ-00NNjQC>; Sun, 14 Feb 1999 03:37:52 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA23128; Sun, 14 Feb 1999 03:08:30 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C640E5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 14 Feb 1999 02:07:23 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] I've given up
X-UIDL: 368345d746c37a00e9eaac029dd0436e

My attempts to attach the files have failed. I've posted them at
http://www.baphead.freeserve.co.uk/getcaret.zip. I hope someone can help
after all this. Thanks for the tip Dale.

Russell Hayward

Website:    http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub








---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:17:58 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BuHy-00NNjMC>; Sun, 14 Feb 1999 06:40:18 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id GAA23444; Sun, 14 Feb 1999 06:12:34 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C66BFD.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990214051230.BKHV21896@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 14 Feb 1999 05:12:30 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 14 Feb 1999 05:12:30 +0000
Subject: Re: [GFA] I'm dumb
X-UIDL: 376535fc5ac69fd1dab7e353333928b3

He's UUencoding - that's Base64.  That is what the wierd looking mess
at the bottom of his e-mails is.  UU is intended for sending binary data
as body in e-mail & is totally 7-bit text.  Many don't know or realize
that to UUencode something not binary in the first place means to expand
it to about 37% larger.  IF people would send *.lst files, they could
include as e-mail body w/o penalty unless larger than the limit imposed
on the GFA-W listy server.  GFA-W is binary, but would be better served 
by zipping & attaching.  Or, it could be UUed, also.  Either way, I am
convenced this'um doesn't understand "attachments".
<G>
TomR.


At 04:49 PM 13/02/99 -0500, you wrote:
>Well, something isn't right. No attachments my end.
>
>Dale, if you have them, send me a copy. What's base 64? I'm dumb as well,
>too. :)
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:01 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Byib-00NOZbC>; Sun, 14 Feb 1999 11:24:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA23991; Sun, 14 Feb 1999 10:55:38 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C6AE61.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 14 Feb 1999 04:55:22 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] I've given up
X-UIDL: 52996a8efececd4e3ec3741eda4a7373

Russell,

The listing below will get the caret for the GFA window. You are trying to
use a 'task' as a 'thread' with AttachThreadInput; to use this API you have
to use a thread which you can't do in 16 bit. I guess!

John

DEFWRD "a-z"
TYPE point:
- WORD x
- WORD y
ENDTYPE
point:p.
OPENW #1
REPEAT
  PEEKEVENT
  ~GetCaretPos(V:p.)
  ? p.x,p.y
UNTIL MENU(1) = 4
fin

PROCEDURE fin
  CLOSEW #1
  EDIT
RETURN



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:02 1999
Return-Path: <michael@bonbit.org>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10BzNo-00NOZeC>; Sun, 14 Feb 1999 12:06:40 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA24071; Sun, 14 Feb 1999 11:38:55 +0100
From: Michael Weigand <michael@bonbit.org>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C6B876.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-BlackMail: 192.168.1.201, default, <michael@bonbit.org>, 192.168.1.201
X-Authenticated-Timestamp: 22:46:14(GMT) on February 13, 1999
X-Sender: michael@bonbit.org
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 13 Feb 1999 22:00:38 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Sender: mail.bonbit.org!bonbit.org!michael@ka.bonbit.org
Subject: [GFA] How to subscribe to this list?
X-UIDL: 6f0548b1d0ca6fd9567087ad52014297

Hi!

Somebody asked me how to join this mailing list and I told him to write a
mail to gfabasic@bero-online.ml.org with the subject SUBSCRIBE. He told me
that the mail was returned to him. So how can he join this list?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:03 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10C1UH-00NPGqC>; Sun, 14 Feb 1999 14:21:29 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA24312; Sun, 14 Feb 1999 13:53:47 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C6D817.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990214125314.EBFG29880@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 14 Feb 1999 12:53:14 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 14 Feb 1999 12:53:14 +0000
Subject: [GFA] dumb question
X-UIDL: 71f98d9862cd87b804a01c0bcda07744

Have any of our esteemed members approached the idea of
displaying &/or converting images of the format *.cgi?
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:04 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10C3Ef-00NPGqC>; Sun, 14 Feb 1999 16:13:29 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA24509; Sun, 14 Feb 1999 15:44:45 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C6F21A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 14 Feb 1999 15:50:05 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Working with Data-resources from Exe-File
X-UIDL: 3c2e091f59111b5d13a7deacd67ec2f0

	Now I've tried everything, but it does still not work...
	The program can be started up to ten times, but then it hangs.
	Memory seems to be allocated, but not deallocated anymore.

	Maybe it's the permanently use of 
	Findresource / LoadResource / LockResource / UnlockResource /
FreeResource
	to be able to put the files from the running install.exe into
files...

	What I try to do is the following:
	I have the files (Cases.Hlp, Cases.Exe, XY.Dll, Cases.Xlm) which are
RC_DATAs in a Cases.Res file.
	This files is linked to a Install.Exe which creates files with the
contents of the DATA.
	This worked in earlier days, when the Cases.Exe was smaller and no
Cases.Hlp existed (The Install was about 100k big). But now the Install.Exe
works one time, the other time the files are not created, a GPF appear or
windows hangs.

	Maybe someone is able to give me a tip if it is possible to get my
program working...

> ----------
> Von: 	BDD[SMTP:BrentDeck@compuserve.com]
> Gesendet: 	Freitag, 12. Februar 1999 11:04
> An: 	gfabasic@aachen.linux.de
> Betreff: 	AW: [GFA] Working with Data-resources from Exe-File
> 
> <<Datei: HUGEOPS3.txt>>
> Heres a sample of some huge functions.
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:05 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10C3fS-00NPHcC>; Sun, 14 Feb 1999 16:41:10 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA24578; Sun, 14 Feb 1999 16:13:14 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C6F8C4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 14 Feb 1999 14:02:14 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] I've given up
X-UIDL: 958e685071b66f27b8675ee1355f43f7

The reason I'm using GetWindowTask is that I read in a help file that in
Windows 95 GetWindowTask just calls GetWindowThreadProcessId. I don't know
whether that's different for 16-Bit applications, it might be worth trying
to call GetWindowThreadProcessId.

Thanks
Russell Hayward

Website:    http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub


    -----Original Message-----
    From: John Findlay <Jayef@compuserve.com>
    To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
    Date: 14 February 1999 10:43am
    Subject: [GFA] I've given up


    Russell,

    The listing below will get the caret for the GFA window. You are trying
to
    use a 'task' as a 'thread' with AttachThreadInput; to use this API you
have
    to use a thread which you can't do in 16 bit. I guess!

    John

    DEFWRD "a-z"
    TYPE point:
    - WORD x
    - WORD y
    ENDTYPE
    point:p.
    OPENW #1
    REPEAT
      PEEKEVENT
      ~GetCaretPos(V:p.)
      ? p.x,p.y
    UNTIL MENU(1) = 4
    fin

    PROCEDURE fin
      CLOSEW #1
      EDIT
    RETURN



    ---
    This mailing list is currently running BeroList v2.5.6
    Report problems to bero@bero-online.ml.org



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:07 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10C3fS-00NPHDC>; Sun, 14 Feb 1999 16:41:10 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA24575; Sun, 14 Feb 1999 16:13:12 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C6F8C3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 14 Feb 1999 13:57:51 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] I'm dumb
X-UIDL: 2e497a5601d53d7b9c9e64763c806b8e

It wasn't my fault, it's Outlook Express. As you know the GFA Mailing list
only works with plain text but when I attach a file to plain text Outlook
changes it to a multi-part message in MIME format. So I can't attach
anything to my messages whatever I do. How do other people do it, do other
mail programs attach files differently?

Russell Hayward

Website:    http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub


    -----Original Message-----
    From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
    To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
    Date: 14 February 1999 5:54am
    Subject: Re: [GFA] I'm dumb


    He's UUencoding - that's Base64.  That is what the wierd looking mess
    at the bottom of his e-mails is.  UU is intended for sending binary data
    as body in e-mail & is totally 7-bit text.  Many don't know or realize
    that to UUencode something not binary in the first place means to expand
    it to about 37% larger.  IF people would send *.lst files, they could
    include as e-mail body w/o penalty unless larger than the limit imposed
    on the GFA-W listy server.  GFA-W is binary, but would be better served
    by zipping & attaching.  Or, it could be UUed, also.  Either way, I am
    convenced this'um doesn't understand "attachments".
    <G>
    TomR.


    At 04:49 PM 13/02/99 -0500, you wrote:
    >Well, something isn't right. No attachments my end.
    >
    >Dale, if you have them, send me a copy. What's base 64? I'm dumb as
well,
    >too. :)
    >
    >John
    >
    >---
    >This mailing list is currently running BeroList v2.5.6
    >Report problems to bero@bero-online.ml.org
    >


    ---
    This mailing list is currently running BeroList v2.5.6
    Report problems to bero@bero-online.ml.org



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:08 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10C4A1-00NNjQC>; Sun, 14 Feb 1999 17:12:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA24672; Sun, 14 Feb 1999 16:44:54 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C70030.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990214154451.EXTP29880@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 14 Feb 1999 15:44:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 14 Feb 1999 15:44:51 +0000
Subject: Re: [GFA] I'm dumb
X-UIDL: d5d2b006804e2ad15b102e4aa8e93696

Russell
If you zip your attachments before you attach'em, they should fare well.
You seem to be attaching text files.  Everything has to be encoded to
be sent on the net.  Binaries (images, *.exe, *.zip, etc) will be encoded
8-bit (entirely different because it uses all 256 char).  Text is encoded
7-bit, which is only text alpha-numeric-punctuation + linefeed & ENTER.

Try zipping whatever you send & it should get out OK.  If you can't get
around the problem, I'd suggest you drop Outlook Express & give something
like Eudora a try.  You can get it for free & i'ts something of a standard
for e-mail programs.  Almost *anybody* can write more sensibly than MS.
<G>
TomR,


At 01:57 PM 14/02/99 -0000, you wrote:
>It wasn't my fault, it's Outlook Express. As you know the GFA Mailing list
>only works with plain text but when I attach a file to plain text Outlook
>changes it to a multi-part message in MIME format. So I can't attach
>anything to my messages whatever I do. How do other people do it, do other
>mail programs attach files differently?
>
>Russell Hayward
>
>Website:    http://www.baphead.freeserve.co.uk/
>
>The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub
>
>
>    -----Original Message-----
>    From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>    To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>    Date: 14 February 1999 5:54am
>    Subject: Re: [GFA] I'm dumb
>
>
>    He's UUencoding - that's Base64.  That is what the wierd looking mess
>    at the bottom of his e-mails is.  UU is intended for sending binary data
>    as body in e-mail & is totally 7-bit text.  Many don't know or realize
>    that to UUencode something not binary in the first place means to expand
>    it to about 37% larger.  IF people would send *.lst files, they could
>    include as e-mail body w/o penalty unless larger than the limit imposed
>    on the GFA-W listy server.  GFA-W is binary, but would be better served
>    by zipping & attaching.  Or, it could be UUed, also.  Either way, I am
>    convenced this'um doesn't understand "attachments".
>    <G>
>    TomR.
>
>
>    At 04:49 PM 13/02/99 -0500, you wrote:
>    >Well, something isn't right. No attachments my end.
>    >
>    >Dale, if you have them, send me a copy. What's base 64? I'm dumb as
>well,
>    >too. :)
>    >
>    >John
>    >
>    >---
>    >This mailing list is currently running BeroList v2.5.6
>    >Report problems to bero@bero-online.ml.org
>    >
>
>
>    ---
>    This mailing list is currently running BeroList v2.5.6
>    Report problems to bero@bero-online.ml.org
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:13 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10C9qv-00NNjSC>; Sun, 14 Feb 1999 23:17:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA25293; Sun, 14 Feb 1999 22:49:24 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C755A6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 14 Feb 1999 16:48:40 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] I've given up
X-UIDL: 6bd7105a63571b2a90fce42af72003ea

Russell,

>The reason I'm using GetWindowTask is that I read in a help file that in
Windows 95 GetWindowTask just calls GetWindowThreadProcessId. I don't know
whether that's different for 16-Bit applications, it might be worth trying
to call GetWindowThreadProcessId.<

Give it a try then and see what happens.

John

 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 15 18:18:16 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10CQQN-00NPaOC>; Mon, 15 Feb 1999 16:59:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA27044; Mon, 15 Feb 1999 16:29:17 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C84E2A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 15 Feb 1999 16:34:53 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: [GFA] Simple Presentation program available...
X-UIDL: f8821722c46d401e5b6615e841acc9f0



	to download at...

	http://193.80.105.57/file/gfa/tmt/

	you need the tmt.exe and the demo.tmt file which should be the
command line parameter for tmt.exe.

	Michael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:57:53 1999
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10CWQX-00NLFeC>; Mon, 15 Feb 1999 23:23:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA27662; Mon, 15 Feb 1999 22:54:00 +0100
From: Reuben E Carlsen <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C8A845.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 16 Feb 1999 08:52:12 +1100
Organization: RMC
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <36C84E2A.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Simple Presentation program available...
X-UIDL: f23a7ae62b9297be5229c68be3308e3f

OK Michael, I'll bite!

What else can it do??????



Reuben Carlsen
Sydney
==========================================================================

          The secret of happiness is not in doing what one likes,
                      but in liking what one does!
==========================================================================




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:57:54 1999
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10CWcM-00NPacC>; Mon, 15 Feb 1999 23:35:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA27698; Mon, 15 Feb 1999 23:07:37 +0100
From: Reuben E Carlsen <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C8AB63.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 16 Feb 1999 09:06:03 +1100
Organization: RMC
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <36C84E2A.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Simple Presentation program available...
X-UIDL: 8f3a06b3f9b2ec6cad93efdded16797f

Hi Michael,

Why is the SOURCE.ZIP encrypted?

Could I please have the password?


Reuben Carlsen
Sydney Australia
==========================================================================

          The secret of happiness is not in doing what one likes,
                      but in liking what one does!
==========================================================================




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:57:55 1999
Return-Path: <shamstra@biotoop.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10CY6H-00NLIeC>; Tue, 16 Feb 1999 01:10:53 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA27891; Tue, 16 Feb 1999 00:41:58 +0100
From: "Sjouke Hamstra" <shamstra@biotoop.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C8C181.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 16 Feb 1999 00:40:17 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] BasiCpp Homepage
X-UIDL: 6c3aaba85863204a1d96b184da61839f

If you are interested: http://www.biotoop.com/basicpp/index.htm

Sjouke Hamstra




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:05 1999
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Csrt-00NNiyC>; Tue, 16 Feb 1999 23:21:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA30135; Tue, 16 Feb 1999 22:51:24 +0100
From: Reuben E Carlsen <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C9F928.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 17 Feb 1999 08:49:21 +1100
Organization: RMC
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <36C84E2A.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Simple Presentation program available...
X-UIDL: a15e4507d1e6100c062fb20d02f6452d

G'day from Sydney Michael.

Why is the source ZIP file encrypted, I would really appreciate the
password?

Reuben Carlsen
Sydney Oz'
==========================================================================

                      The youbg get the face they are born with.
                            The old get the face they deserve!
==========================================================================




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:06 1999
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Csrv-00NPh4C>; Tue, 16 Feb 1999 23:21:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA30133; Tue, 16 Feb 1999 22:51:23 +0100
From: Reuben E Carlsen <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C9F928.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Feb 1999 08:49:21 +1100
Organization: RMC
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <36C84E2A.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Simple Presentation program available...
X-UIDL: c6cc67727580fbd781b4847c8c65453a

G'day from Sydney Michael.

Why is the source ZIP file encrypted, I would really appreciate the
password?

Reuben Carlsen
Sydney Oz'
==========================================================================

                      The youbg get the face they are born with.
                            The old get the face they deserve!
==========================================================================




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:08 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10CtEq-00NPgvC>; Tue, 16 Feb 1999 23:45:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA30201; Tue, 16 Feb 1999 23:16:02 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36C9FEE6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 16 Feb 1999 22:14:22 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] GetWindowThreadProcessID
X-UIDL: b177866d1646a6595dcfa2fdb7d29423

Just in case anyone wondered GetWindowThreadProcessID didn't work from GFA
Basic. I really think it is impossible to get the position of the caret in
GFA Basic when it is outside your programs control. If anyone has any ideas
my code is still at http://www.baphead.freeserve.co.uk/getcaret.zip.

I was wondering why sometimes, not very often, the icon appears in the
title bar of dialog boxes. What causes it to be there one time and not the
next? I would like to know how to make it appear all the time so I can make
my programs completely in the Windows 95 style, it's the only thing that is
stopping me. It doesn't really matter but I am intrigued by the mystery.

I expect you all know this but I just found out you can stop ALL of GFA
Basic's
WM_PAINT interferance by putting this at the end of a WM_PAINT callback:

KILLEVENT
RETVAL DefWindowProc(win&,mess&,wparam&,lparam%)

That makes things a hell of a lot easier.

Ta'ra
Russell Hayward

Website: http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:09 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10CwPF-00NNiNC>; Wed, 17 Feb 1999 03:08:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA30565; Wed, 17 Feb 1999 02:39:54 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CA2EA5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 16 Feb 1999 20:39:17 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] lboxmax.lst
X-UIDL: 3b78d24b6adc221da2b4d1e6f90cc575

 This is a great little demo by O. Daneil from the newsletter.
 Did anyone else have similar results to my notes below?

/********************************************************
'NL121A
' lboxmax2.lst
' by Ophir Daniel, modified by B. Deck 2/99 for testing on Win 3.1

' how to overcome LISTBOX record limits
' creates 32000 strings and displays in ListBox

'My Win 3.1 system appears to store 32000 lines in the list box using LB_ADDSTRING,
'but using the LBS_OWNERDRAW* style and the callback, I can display and select only 8160 lines.
'Using LBS_HASSTRINGS and no callback, it can display and select a maximum of 5440 lines,
'but only if the strings are limited to 12 or fewer chars each (about 64K of data ).
'
'Is this different on other systems ?
'
'B. D.
'
FULLW #1
PRINT "Creating Strings"
$ABIG LisBoxCont$()
DIM LisBoxCont$(500000)//(max_string_length*max_number_of_strings)
DIALOG #0,(SYSMETRIC(0) / 2) - 300,(SYSMETRIC(1) / 2) - 200,600,400,"Listbox",0
  CB DLG(0),WM_DRAWITEM,ListBoxString() // delete this line when using LBS_HASSTRINGS
  DLG FILL 0,RGB(192,192,192)
  LISTBOX "",10,10,10,575,360,LBS_OWNERDRAWFIXED | WS_BORDER | WS_VSCROLL // use w /cb
  'LISTBOX "",10,10,10,575,360,WS_BORDER | WS_VSCROLL | LBS_HASSTRINGS // w/o cb *****
  BUTTON "IDOk",1,270,355,60,30
ENDDIALOG
FOR dummy& = 0 TO 10000
  LisBoxCont$(dummy&) = "String number : " + STR$(dummy&)
  ~SendMessage(DLG(0,10),LB_ADDSTRING,dummy&,0)//fill listbox with dummy strings //  w/ cb,  max 8159 records  *****
 ' ~SendMessage(DLG(0,10),LB_ADDSTRING,dummy&, LEFT$(LisBoxCont$(dummy&),20)) //  w/o cb,  max 5439 records*****
NEXT dummy&
~SendMessage(DLG(0,10),LB_SETCURSEL,8159,0) // highest number possible so far
SHOWDIALOG #0
~SetFocus(DLGITEM(0,IDOK))
@hndldlg

stl$ = LisBoxCont$(SendMessage(DLG(0,10),LB_GETCURSEL,0,0)) // sendmess returns selected line no

CLOSEDIALOG #0
~MessageBox(0,stl$,"String slctd:",MB_OK)
ERASE LisBoxCont$()

CLOSEW #1

END

PROCEDURE hndldlg
  DO
    PEEKEVENT
    SELECT MENU(11)
    CASE WM_COMMAND
      SELECT MENU(12)
      CASE IDOK
        finit2! = TRUE
        '     @ell
      ENDSELECT
    ENDSELECT
  LOOP UNTIL finit2!
RETURN
PROCEDURE ListBoxString(LB_h&,LB_m&,LB_w&,LB_l%)
  IF {LB_l% + 8} & ODS_SELECTED
    ~FillRect(WORD{LB_l% + 12},LB_l% + 14,GetStockObject(BLACK_BRUSH))

    ~SetTextColor(WORD{LB_l% + 12},RGB(255,255,255))
  ELSE
    ~FillRect(WORD{LB_l% + 12},LB_l% + 14,GetStockObject(WHITE_BRUSH))
    ~SetTextColor(WORD{LB_l% + 12},RGB(0,0,0))
  ENDIF
  ~SetBkMode(WORD{LB_l% + 12},TRANSPARENT)
  stl$ = LisBoxCont$(WORD{LB_l% + 4})
  ~DrawText(WORD{LB_l% + 12},stl$,LEN(stl$),LB_l% + 14,DT_LEFT | DT_SINGLELINE | DT_VCENTER)
  RETVAL TRUE
RETURN




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:10 1999
Return-Path: <afonsogustavo@abordo.com.br>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10CwtL-00NLFHC>; Wed, 17 Feb 1999 03:39:11 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA30634; Wed, 17 Feb 1999 03:09:44 +0100
From: "Afonso Gustavo B. Martins" <afonsogustavo@abordo.com.br>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CA35A3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 16 Feb 1999 22:07:40 -0300
X-Mailer: Mozilla 4.5 [en] (Win98; I)
X-Accept-Language: en
MIME-Version: 1.0
References: <36C6D817.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] dumb question
X-UIDL: 6d693e95108535d639ee9b4794b4459d

Hi,
I have dowloaded some animations in *.cgi format and it apears to be a
long sequence of .jpg pictures. I also want to display/convert such kind
of files...
[]s
Gustavo


Tom Record wrote:

> Have any of our esteemed members approached the idea of
> displaying &/or converting images of the format *.cgi?
> <G>
> TomR.
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:11 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10CwvD-00NNirC>; Wed, 17 Feb 1999 03:41:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA30650; Wed, 17 Feb 1999 03:13:08 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CA366E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 16 Feb 1999 18:12:24 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] dumb question
X-UIDL: 90b8179df3603603010299fd427ae3c2

This sounds like a project for Roland Walter .

----- Original Message -----
From: Afonso Gustavo B. Martins <afonsogustavo@abordo.com.br>
To: <gfabasic@aachen.linux.de>
Sent: Tuesday, February 16, 1999 5:07 PM
Subject: Re: [GFA] dumb question


>Hi,
>I have dowloaded some animations in *.cgi format and it apears to be a
>long sequence of .jpg pictures. I also want to display/convert such kind
>of files...
>[]s
>Gustavo
>
>
>Tom Record wrote:
>
>> Have any of our esteemed members approached the idea of
>> displaying &/or converting images of the format *.cgi?
>> <G>
>> TomR.
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:12 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D4Aj-00NPgaC>; Wed, 17 Feb 1999 11:25:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA31508; Wed, 17 Feb 1999 10:56:10 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CAA306.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Feb 1999 04:54:49 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] Working with Data-resources from Exe-File
X-UIDL: 01bfb9114883f6b023fc3653913bb6bf

Michael,

>Subject: AW: [GFA] Working with Data-resources from Exe-File

        Now I've tried everything, but it does still not work...
        The program can be started up to ten times, but then it hangs.
        Memory seems to be allocated, but not deallocated anymore.
<

I've put a large file (1.7meg) into a .dll and a .res. It works fine when
loading the data from the .dll when interpreted, and then saving the data
as a file. No memory loss.

I can't link the .res into the .exe though, the compiler complains;

=======================================
Error 73: Need larger/ALIGNMENT value
=======================================

Can't find my Compiler book, how to correct Error 73??? Have tried
ALIGNMENT's Byte/Word/Dword and Para, none of these work.


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:13 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D5Tt-00NPilC>; Wed, 17 Feb 1999 12:49:29 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA31671; Wed, 17 Feb 1999 12:25:49 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CAB851.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Feb 1999 12:31:11 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Working with Data-resources from Exe-File
X-UIDL: dc7d18e0fb7ad62e6beadc40f17f2bd9

> John
> 
As I found out in earlier days, the linker makes a lot of troubles when
adding complex *.res files !
So what I do is linking the *.res to the compiled *.exe with the Borland
Workshop which was included in Borland Pascal 7.0.
This helped a lot with some problems using *.res files with a lot of icons. 

On the other hand, when using your *.Dll solution, does the program works
also, when you start it more than one time (10-15 x) ?

Michael


> ----------
> Von: 	John Findlay[SMTP:Jayef@compuserve.com]
> Gesendet: 	Mittwoch, 17. Februar 1999 10:54
> An: 	gfabasic@aachen.linux.de
> Betreff: 	AW: [GFA] Working with Data-resources from Exe-File
> 
> Michael,
> 
> >Subject: AW: [GFA] Working with Data-resources from Exe-File
> 
>         Now I've tried everything, but it does still not work...
>         The program can be started up to ten times, but then it hangs.
>         Memory seems to be allocated, but not deallocated anymore.
> <
> 
> I've put a large file (1.7meg) into a .dll and a .res. It works fine when
> loading the data from the .dll when interpreted, and then saving the data
> as a file. No memory loss.
> 
> I can't link the .res into the .exe though, the compiler complains;
> 
> =======================================
> Error 73: Need larger/ALIGNMENT value
> =======================================
> 
> Can't find my Compiler book, how to correct Error 73??? Have tried
> ALIGNMENT's Byte/Word/Dword and Para, none of these work.
> 
> 
> John
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:16 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D89A-00NOYyC>; Wed, 17 Feb 1999 15:40:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA31949; Wed, 17 Feb 1999 15:08:56 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CADE3B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990217140841.ETSO14846@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 17 Feb 1999 14:08:41 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 17 Feb 1999 14:08:41 +0000
Subject: Re: [GFA] dumb question
X-UIDL: b21ed88794dd9e1400092f4803b5d308

Gustavo
I finally got another one to look at - I'd been deleting the cache w/o 
looking.  The one I caught was type87a *.gif.  Since you can make things
happen on a webpage using CGI... counters, scrollbarsm etc., that's 
probably what is happening.  The *.cgi we see may be a wrapper of some
sort altho I just changed *.cgi to *.gif & a very fussy editor loaded it.

If you set your program up to read the first 10 bytes you can identify
the graphics filetype easily.  I haven't seen the sequence of *.jpg yet
so I don't know what to suggest on that.  Until we get a real *.gif
decoder, you'll have to use a *.dll to read those.  I found an *.ocx that
reads/displays *.gif animations but it appears that there's yet no way
to handle *.ocx from 16-bit GFA-W.  Someone *could* write a *.dll that
would make it possible, but would have to be a lot smarter than I am.
<G>
TomR.

At 10:07 PM 16/02/99 -0300, you wrote:
>Hi,
>I have dowloaded some animations in *.cgi format and it apears to be a
>long sequence of .jpg pictures. I also want to display/convert such kind
>of files...
>[]s
>Gustavo
>
>
>Tom Record wrote:
>
>> Have any of our esteemed members approached the idea of
>> displaying &/or converting images of the format *.cgi?
>> <G>
>> TomR.
>>
>> ---
>> This mailing list is currently running BeroList v2.5.6
>> Report problems to bero@bero-online.ml.org
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:17 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D8D0-00NPgaC>; Wed, 17 Feb 1999 15:44:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA31954; Wed, 17 Feb 1999 15:09:15 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CADE45.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990217140911.ETWG14846@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 17 Feb 1999 14:09:11 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 17 Feb 1999 14:09:11 +0000
Subject: Re: AW: [GFA] Working with Data-resources from Exe-File
X-UIDL: 0e46485470e2112ff2329ea8b22f14b1

John
My compiler manual doesn't list error numbers nor the one you note.
I have gen.exe v1.07w.
My interpretor manual has some numbers, but 73 isn't among'em.
I have gfawin37.exe on here & gfawin3.exe on the 486.  Both v 4.38.
<G>
TomR.


At 04:54 AM 17/02/99 -0500, you wrote:
>Michael,
>
>>Subject: AW: [GFA] Working with Data-resources from Exe-File
>
>        Now I've tried everything, but it does still not work...
>        The program can be started up to ten times, but then it hangs.
>        Memory seems to be allocated, but not deallocated anymore.
><
>
>I've put a large file (1.7meg) into a .dll and a .res. It works fine when
>loading the data from the .dll when interpreted, and then saving the data
>as a file. No memory loss.
>
>I can't link the .res into the .exe though, the compiler complains;
>
>=======================================
>Error 73: Need larger/ALIGNMENT value
>=======================================
>
>Can't find my Compiler book, how to correct Error 73??? Have tried
>ALIGNMENT's Byte/Word/Dword and Para, none of these work.
>
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:18 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D87E-00NNj6C>; Wed, 17 Feb 1999 15:38:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA31950; Wed, 17 Feb 1999 15:08:56 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CADE3B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990217140852.ETTZ14846@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 17 Feb 1999 14:08:52 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 17 Feb 1999 14:08:52 +0000
Subject: Re: [GFA] dumb question
X-UIDL: 0e996d8ef24a2a1b44c6f4b6c1cc71fb

The only *.gif decoder I've seen for GFA-W is trashed for some reason & 
I've been unable to clean it up.  I have several *.dlls that read *.gif &
&.jpg.  *IF* the one contains multiple *.jpg, I have no idea how to get
them out of it but the one I loooked at was type87a *.gif & changing the
extension was sufficient to get a fussy editor to read it.

Gustavo, are you certain yours contained *.jpg?  Might it not have been a
standard type89a *.gif animation?  Both formats are identified within the
first 10 bytes of the files.
<G>
TomR.


At 06:12 PM 16/02/99 -0800, you wrote:
>This sounds like a project for Roland Walter .
>
>----- Original Message -----
>From: Afonso Gustavo B. Martins <afonsogustavo@abordo.com.br>
>To: <gfabasic@aachen.linux.de>
>Sent: Tuesday, February 16, 1999 5:07 PM
>Subject: Re: [GFA] dumb question
>
>
>>Hi,
>>I have dowloaded some animations in *.cgi format and it apears to be a
>>long sequence of .jpg pictures. I also want to display/convert such kind
>>of files...
>>[]s
>>Gustavo
>>
>>
>>Tom Record wrote:
>>
>>> Have any of our esteemed members approached the idea of
>>> displaying &/or converting images of the format *.cgi?
>>> <G>
>>> TomR.
>>>
>>> ---


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:19 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D8SW-00NNjzC>; Wed, 17 Feb 1999 16:00:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA32020; Wed, 17 Feb 1999 15:31:27 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CAE37E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990217143115.FPPJ20989@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 17 Feb 1999 14:31:15 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 17 Feb 1999 14:31:15 +0000
Subject: [GFA] read filetypes
X-UIDL: 025930c0700071b78202b684a1fe4d97

The following will extract the graphics type by reading the 1st 40 bytes
of any file.  I have other versions that go farther.  <G>  TomR.

DIM m&(255)

FOR i% = 32 TO 255
  m&(i%) = i%
NEXT i%
FOR i% = 0 TO 31
  m&(i%) = 46
NEXT i%
m&(155) = 46
OPENW #1
FILESELECT "*.*","",n$

OPEN "I",#1, n$
PRINT XLATE$(INPUT$(40,#1),m&())
CLOSE #1
KEYGET a%
CLOSEW #1


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:20 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D8X1-00NPj9C>; Wed, 17 Feb 1999 16:04:55 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA32036; Wed, 17 Feb 1999 15:35:25 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CAE468.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Feb 1999 09:33:05 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] Working with Data-resources from Exe-File
X-UIDL: a7222b86028f09b6053383a0ef4bbd07

Michael,

I use Borland's Workshop as well.

>So what I do is linking the *.res to the compiled *.exe with the Borland
Workshop>

I was trying to link the .res with; $LNK RES "e:\test\mytest.res", it
doesn't like it. As said before, Error 77

Linking with the resource workshop does work though.

>On the other hand, when using your *.Dll solution, does the program works
also, when you start it more than one time (10-15 x) ?<

Yes, ran it at least 20 times, compiled and interpreted. As far as I can
tell it's de-allocating memory OK.

So, my test was with one large file stored in the .res, not many files.

You could try the same thing just to see if that works.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:21 1999
Return-Path: <afonsogustavo@abordo.com.br>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D8li-00NPh2C>; Wed, 17 Feb 1999 16:20:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA32093; Wed, 17 Feb 1999 15:51:09 +0100
From: "Afonso Gustavo B. Martins" <afonsogustavo@abordo.com.br>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CAE818.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Feb 1999 10:49:12 -0300
X-Mailer: Mozilla 4.5 [en] (Win98; I)
X-Accept-Language: en
MIME-Version: 1.0
References: <36CAE37E.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=iso-8859-1
Subject: Re: [GFA] dumb question

X-UIDL: 97486551572e55e7330d6eb3134ae4ba

Hi,
   See a dump of the first bytes of a *.cgi animation file:

00000000  0A 2D 2D 54  68 69 73 52  61 6E 64 6F  6D 53 74 72
--ThisRandomStr
00000010  69 6E 67 0A  43 6F 6E 74  65 6E 74 2D  74 79 70 65
ingContent-type
00000020  3A 20 69 6D  61 67 65 2F  6A 70 65 67  0A 43 6F 6E  :
image/jpegCon
00000030  74 65 6E 74  2D 6C 65 6E  67 74 68 3A  20 39 39 35  tent-length:
995
00000040  37 0A 0A FF  D8 FF E0 00  10 4A 46 49  46 00 01 01
7JFIF
00000050  00 00 01 00  01 00 00 FF  DB 00 43 00  0B 08 08 0A
C
00000060  08 07 0B 0A  09 0A 0D 0C  0B 0D 11 1C  12 11 0F 0F

00000070  11 22 19 1A  14 1C 29 24  2B 2A 28 24  27 27 2D 32
")$+*($''-2
00000080  40 37 2D 30  3D 30 27 27  38 4C 39 3D  43 45 48 49
@7-0=0''8L9=CEHI
00000090  48 2B 36 4F  55 4E 46 54  40 47 48 45  FF DB 00 43
H+6OUNFT@GHEC
000000A0  01 0C 0D 0D  11 0F 11 21  12 12 21 45  2E 27 2E 45
!!E.'.E
000000B0  45 45 45 45  45 45 45 45  45 45 45 45  45 45 45 45
EEEEEEEEEEEEEEEE
000000C0  45 45 45 45  45 45 45 45  45 45 45 45  45 45 45 45
EEEEEEEEEEEEEEEE
000000D0  45 45 45 45  45 45 45 45  45 45 45 45  45 45 45 45
EEEEEEEEEEEEEEEE
000000E0  45 FF C0 00  11 08 00 F0  01 40 03 01  22 00 02 11
E@"
000000F0  01 03 11 01  FF C4 00 1F  00 00 01 05  01 01 01 01

00000100  01 01 00 00  00 00 00 00  00 00 01 02  03 04 05 06

00000110  07 08 09 0A  0B FF C4 00  B5 10 00 02  01 03 03 02

00000120  04 03 05 05  04 04 00 00  01 7D 01 02  03 00 04 11
}


If you dump any *.JPG file you will find the same JFIF prefix that I found
many times in this *.cgi animation.
(size of the full cgi file: 4,894,720 )
[]s
Gustavo


Tom Record wrote:

> The following will extract the graphics type by reading the 1st 40 bytes
> of any file.  I have other versions that go farther.  <G>  TomR.
>
> DIM m&(255)
>
> FOR i% = 32 TO 255
>   m&(i%) = i%
> NEXT i%
> FOR i% = 0 TO 31
>   m&(i%) = 46
> NEXT i%
> m&(155) = 46
> OPENW #1
> FILESELECT "*.*","",n$
>
> OPEN "I",#1, n$
> PRINT XLATE$(INPUT$(40,#1),m&())
> CLOSE #1
> KEYGET a%
> CLOSEW #1
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:22 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D9TR-00NPizC>; Wed, 17 Feb 1999 17:05:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA32249; Wed, 17 Feb 1999 16:36:36 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CAF2C1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990217153633.GJNN20989@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 17 Feb 1999 15:36:33 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 17 Feb 1999 15:36:33 +0000
Subject: [GFA] browser cache file identification
X-UIDL: 5e6909fb2a2be4b69d9cd277e3f9a53a

Ok - new info.

*.cgi can be type87a or type89a (animations) *.gif or *.jfif, which is *.jpg!

*.sml & *.xbm are html files (*.htm).

It would seem that merely changing the extension renders them useable.  The
object of these changes would appear to be just to thwart reusing the files
by the uninitiated.  Modern browsers apparently make the identification.

The xlate file I posted earlier will allow identification of the 5 filetypes
& the program it is in can effect the changing of the extensions by renaming.

Gustav, I suspect your multiple-*.jpg was actually a type89a *.gif animation.
I may be wrong, of course.  However... I've seen only one other instance of
getting multiple files into one for animation & it was a *.bmp.  The animation
is accomplished by reading each individual image & displaying it over the last
thereby creating animation.  I *think* this can be done by knowing the image's
length of each & counting bytes in the file for extraction & display.  This 
might work w/ *.jpg also, but requires having the source code for en/decoding 
them.  I have sought without success to find a *.jpg or *.gif decoder in GFA-W.

I have source code for decoding *.jpg, *.gif & *.tga, but it is in "C" & I can
NOT convert it.  I would sincerely welcome help on this.

To do much with this kind of trick requires code that reads the first 10 bytes 
of a file to identify it's type.  Relying on the extension blocks proper 
identification.

Life goes on.                       & then you die.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:23 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D9pL-00NQXYC>; Wed, 17 Feb 1999 17:27:55 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA32293; Wed, 17 Feb 1999 16:57:42 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CAF7C5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Feb 1999 10:57:16 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] RE: Working with Data-resources from Exe-File
X-UIDL: 72b2e78bf803e33b5abccc39b6d60164

Thanks Tom.

So, does anyone know how to overcome Error 73 when linking very large .res
files?

>Error 73: Need larger/ALIGNMENT value<

How to give it a larger/ALIGNMENT value?

John


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 17 18:58:24 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10D9tT-00NPj9C>; Wed, 17 Feb 1999 17:32:11 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA32312; Wed, 17 Feb 1999 17:04:10 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CAF935.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990217160407.SLE20199@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 17 Feb 1999 16:04:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 17 Feb 1999 16:04:07 +0000
Subject: Re: [GFA] dumb question
X-UIDL: 6705099cab3bbe3418e7ed00408f90a9

Okaaaaaaaaaaaaaayyyyyyyyyyyyyyyyyyy!
Evidently the browser can extract each one.  I haven't rec'd any that
are the size you indicate (I used to keep all on ZIP100s). So...

Master John Findlay... Can you translate your *.bmp animation to *.jpg?
Interesting note on this... the *.bmp animation routine always bombs
when I try to close it.  I haven't really looked at it yet.

I see something interesting here... store & retrieve a mess of small
images in/from a *.cgi file.  A neat trick to pull on the uninitiated!

Got me going, now!  Read each image's header in, read each image's data
in 1 line from each, etc.??????????  Read'em back out the same way, then
use standard image *.dlls to read & display'em???????

Given this, I'm gonna guess that there is a GCI function that reads these
things in the browsers.  Maybe found in the cgibin subdir of the site
from whense they came?

At 10:49 AM 17/02/99 -0300, you wrote:
>
>If you dump any *.JPG file you will find the same JFIF prefix that I found
>many times in this *.cgi animation. (size of the full cgi file: 4,894,720 )
>Gustavo
>

C'mon, fellers... let's get something new started.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Feb 18 20:36:17 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10DC4T-00NNjFC>; Wed, 17 Feb 1999 19:51:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA32577; Wed, 17 Feb 1999 19:12:33 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CB1759.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990217181231.IDQW20989@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 17 Feb 1999 18:12:31 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 17 Feb 1999 18:12:31 +0000
Subject: Re: [GFA] RE: Working with Data-resources from Exe-File
X-UIDL: 436a7d40626e0c767c6862723366131b

John

Just a thought...
In the compiler, you can set byte, word, dword, & paragraph.  Is *THIS*
what we want?  They're in a groupbox labled "Alignment".  The error
numbers are a mystery for me.
<G>
TomR.



At 10:57 AM 17/02/99 -0500, you wrote:
>Thanks Tom.
>
>So, does anyone know how to overcome Error 73 when linking very large .res
>files?
>
>>Error 73: Need larger/ALIGNMENT value<
>
>How to give it a larger/ALIGNMENT value?
>
>John
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Feb 18 20:36:18 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10DCG9-00NPgsC>; Wed, 17 Feb 1999 20:03:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA32620; Wed, 17 Feb 1999 19:34:42 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CB1C7D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990217183435.OAME28055@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 17 Feb 1999 18:34:35 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 17 Feb 1999 18:34:35 +0000
Subject: [GFA] *.cgi
X-UIDL: c60a328261085ed8df1bc344d2042c3c

Ok...
A concession... the *.cgi that contains multiple *.jpg files
may simply stack them... #1, #2, #3, etc., in sequence.  I don't
find one to play with, tho - so I'm having to guess.  I *am*
guessing that the files are actually complete, just appended
one to another with *.cgi tacked onto the whole thing as an
extension.  There *may* be some "marker" between them that 
the browsers pick up on.  In this case, the 1st 2 or 3 bytes
may contain a key that tells the software how many are in it.
The one that I have is a single image & I notice that it was 
generated by ULead software.

Different subject, but a cousin to it perhaps.

UniSys has a patent on the compression used in *.gif.  OK, that
]is fact.  I've seen several things that can read'em & spit out
a *.gif file that is uncompressed.  These files are larger, of
course.  But... what I've played with don't come out very much
larger.  What would be the possibility of using ZLIB to compress
them?  Zlib is free.  So is LHA.  Either would make smaller
files.  The conversion from 24-bit images to *.gif is normally
very good - not messed up or full of artifacts.

One trick could be to make the uncompressed files, then LZA-them
& use LZA to uncompress'em before load/display.  The common *.gif
decoders will still read & display them just fine.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 22 10:15:45 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10DbiG-00NQXqC>; Thu, 18 Feb 1999 23:14:28 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA02581; Thu, 18 Feb 1999 22:40:48 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CC99CE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990218214022.CHW15041@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 18 Feb 1999 21:40:22 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 18 Feb 1999 21:40:22 +0000
Subject: [GFA] Gustav, *.cgi discussion
X-UIDL: 434d6e718db5489e3148ee7bd4c6ef1a

Gustav

I stupidly did not keep your adrs.

Please send me your adrs... I'll send you some goodies to play with.
133k, includes 2 ways to display the images w/ included *.dll.  also
includes a means of identifying what file types are actually in a
*.cgi file (with what we know at the moment).

The *.dll is free & there does exist a 32-bit version - I have if 
you want it, too.  I stick w/ 16-bit - no thunking.

This stuff won't help - as is - but you might play with it & get a
bit more out of it.  I'd like to know how many images are in your
4M cgi/jpg.  If we can identify the length &/or the delimiter char
or chars, maybe we can come up with a way to display all of them.

Would be one at a time - not as an animation unless you call the
browser to display them.

I've found a translation of the UniSys patent restrictions... it
indicates that you aren't effected for free software as long as it
doesn't use the LZH compression in the same appl to write a *.gif.
You can read'em for free, but if you write'em also, $$$$$$$$$$$$$!

Have fun, & keep me posted, please.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 22 10:15:51 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10DlPR-00NPghC>; Fri, 19 Feb 1999 09:35:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA03696; Fri, 19 Feb 1999 09:08:05 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CD2CA2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 19 Feb 1999 03:07:36 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Error messages from Japan
X-UIDL: 25119cf82fe5465d6df948fc5612dab9

Amusing, thought you might like this - from a Compuserve forum;

COMPUTER HAIKU

Sony has announced its own computer operating system now available on
its hot new portable PC called the Vaio. Instead of producing the
cryptic error messages characteristic of Microsoft's Windows operating
systems, Sony's chairman Asai Tawara said, "We intend to capture the
high ground by putting a human, Japanese face on what has been - until
now - an operating system that reflects Western cultural hegemony. For
example, we have replaced the impersonal and unhelpful Microsoft error
messages with our own Haiku poetry." The chairman went on to give
examples of Sony's new error messages:

A file that big?
It might be very useful.
But now it is gone.


Chaos reigns within.
Reflect, repent, and reboot.
Order shall return.


Yesterday it worked
Today it is not working
Windows is like that.


First snow, then silence.
This thousand dollar screen dies
so beautifully.


With searching comes loss
and the presence of absence:
"My Novel.doc" not found.


The Tao that is seen
Is not the true Tao, until
You bring fresh toner.


Windows NT crashed.
I am the Blue Screen of Death.
No one hears your screams.


Stay the patient course
Of little worth is your ire
The network is down


A crash reduces
your expensive computer
to a simple stone.


Three things are certain:
Death, taxes, and lost data.
Guess which has occurred.


You step in the stream,
but the water has moved on.
This page is not here.


We wish to hold the whole sky,
But we never will.
We are out of memory


Serious error.
All shortcuts have disappeared.
Screen. Mind. Both are blank.

**********************************

CLAUDIO SLON

Microsoft announced today that the scheduled release
of Windows 2000 has been delayed, and will not be
available until Spring of 1901.


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 22 10:15:53 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10DlPR-00NPiLC>; Fri, 19 Feb 1999 09:35:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA03698; Fri, 19 Feb 1999 09:08:08 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CD2CA4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 19 Feb 1999 03:07:39 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Gustav, *.cgi discussion
X-UIDL: 19c958da313ad1839f84ab4636dca728

Tom,

> as long as it doesn't use the LZH compression in the same appl to write a
*.gif. You can read'em for free, but if you write'em also, $$$$$$$$$$$$$!<

Have you got a 'C' source listing for a gif loader/saver?

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 22 10:16:00 1999
Return-Path: <veichtlbauer@gmx.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10DxlA-00NNibC>; Fri, 19 Feb 1999 22:46:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA05185; Fri, 19 Feb 1999 22:17:57 +0100
From: Georg Veichtlbauer <veichtlbauer@gmx.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CDE5D2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 19 Feb 1999 22:17:55 +0100 (MET)
X-Authenticated-Sender: #0000638853@gmx.net
X-Authenticated-IP: [195.3.67.69]
X-Mailer: WWW-Mail 1.02a/b (Global Message Exchange)
Subject: [GFA] Saving 256- color icons
X-UIDL: f7dbc4d7a19714f0c5731be0b13b3797

I've got serious problems with saving 256- color icons. Has anyone got the
file format or even a routine to save such icons?
PLEASE help me!
---
Sent through Global Message Exchange - http://www.gmx.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 22 10:16:01 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10E1mt-00NNiiC>; Sat, 20 Feb 1999 03:04:59 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA05625; Sat, 20 Feb 1999 02:36:26 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CE226F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990220013359.CGIZ9644@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 20 Feb 1999 01:33:59 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 20 Feb 1999 01:33:59 +0000
Subject: Re: [GFA] Saving 256- color icons
X-UIDL: 86a4f0e9cc0237ccfb0ed8f171fa9dcb

Gorge
1st problem is probably that you aren't running a 256 color display.
Beyond that, I know little about 256-color icons except that they
are close cousins to *.bmps.  Perhaps a word w/ Eberhard would help.
<G>
TomR.



At 10:17 PM 19/02/99 +0100, you wrote:
>I've got serious problems with saving 256- color icons. Has anyone got the
>file format or even a routine to save such icons?
>PLEASE help me!
>---
>Sent through Global Message Exchange - http://www.gmx.net
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 22 10:16:01 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10E6kF-00NNiQC>; Sat, 20 Feb 1999 08:22:35 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA06216; Sat, 20 Feb 1999 07:54:41 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CE6CF2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990220065432.CWJW9358@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 20 Feb 1999 06:54:32 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 20 Feb 1999 06:54:32 +0000
Subject: [GFA] perplexing problem, need help
X-UIDL: fcb25a6652d9286f9ebce081ccd25057

dta% = FGETDTA()
e% = FSFIRST(n1$,%10001)
q& = {dta%}.fs_size

n1$ provided by FILESELECT.

Can read 3 0r 4 files, but can get filesize only for the last one.

Open "i", #1, .........
q& = LOF(#1)
perform other operations with this file...

Can read 3 or 4 files, but can get filesize only for the last one.


Am working with:  caz$ = XLATE$(INPUT$(42,#1),m&())

Using q& to determine how many bytes to read each pass based on filesize.  
This pesky project will occasionally perform properly & q& is correct, but 
it bombs for 40 or 50 runs for every run that it gets all of the files' sizes.
It doesn't appear to matter how I derive q& & it *never* gets the 1st file.

Am open to & begging for ideas.
<G>
TomR.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Feb 22 10:16:02 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10EDQH-00NQYzC>; Sat, 20 Feb 1999 15:30:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA07312; Sat, 20 Feb 1999 15:02:41 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36CED140.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990220140238.ECEX9358@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 20 Feb 1999 14:02:38 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 20 Feb 1999 14:02:38 +0000
Subject: [GFA] re: not reading file sizes properly
X-UIDL: d81bc12c26bde21695b482d254018d64

Problem lies in using q&... variable is too small in scope for larger files.

q% = {dta%}.fs_size works just fine.  Could also use q$ = STR$({dta%}.fs_size)
& VAL(q$) to get'em.  Learned something (donno what, but *something*).


<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 23 19:42:50 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10F0J2-00NQXeC>; Mon, 22 Feb 1999 19:42:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA12718; Mon, 22 Feb 1999 19:10:31 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D1AF04.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 22 Feb 1999 15:37:22 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Redrawing window contents
X-UIDL: 1cda88fa964a135b0af91d0f67c0bf32

Hi

Can you get a window to move without drawing anything inside the window (this
includes moving the pevious contents to the new position)? I still want it to
redraw where it has moved from but I don't want the client area of the window to
have anything drawn in it. Is this possible in GFA Basic?

Thanks
Russell Hayward

Websites:    http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 23 19:42:51 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10F1Oh-00NQYwC>; Mon, 22 Feb 1999 20:52:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA12869; Mon, 22 Feb 1999 20:23:56 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D1BFA3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Feb 1999 14:23:08 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Redrawing window contents
X-UIDL: 63eec655ab30fbad3f544fdccdbd749d

>>>>
Can you get a window to move without drawing anything inside the window
(this
includes moving the pevious contents to the new position)? I still want it
to
redraw where it has moved from but I don't want the client area of the
window to
have anything drawn in it. Is this possible in GFA Basic?
<<<<<

This is the default in GFA basic. 

GFA will not redraw anything in a window unless it is programmed to do so. 
GFA will, however, erase newly visible portions of the screen by default,
filling in the default background color, 
if you have not taken over that function in your program. (I'm not certain
if it is GFA or DefWindowsProc() that does this)

Resizing a window will result in erasure of the entire window.

B.D.




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 23 19:42:52 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10F2BA-00NQZNC>; Mon, 22 Feb 1999 21:42:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA12982; Mon, 22 Feb 1999 21:13:41 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D1CB4A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Feb 1999 20:11:33 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] Redrawing window contents
X-UIDL: 9183c05afdada72d42b2a812d3789d03

Thanks for your answer but I don't think you quite understood what I was getting
at. Say you open a window and then draw the letter A in the middle. If you then
use MOVEW to move the window to the other side of the screen the letter A will
then appear in the window on the other side of the screen. This picture must
have been drawn at some point, what I want to do is turn it off so when I move
the window you wont even see it at it's new position, It wont draw anything
inside the window at all. Sorry about my poor explanation, I hope I have made
myself clearer this time.

I hope someone can help,
Russell Hayward

Websites: http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub


-----Original Message-----
From: BDD <BrentDeck@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: 22 February 1999 7:54pm
Subject: [GFA] Redrawing window contents


>>>>
Can you get a window to move without drawing anything inside the window
(this
includes moving the pevious contents to the new position)? I still want it
to
redraw where it has moved from but I don't want the client area of the
window to
have anything drawn in it. Is this possible in GFA Basic?
<<<<<

This is the default in GFA basic.

GFA will not redraw anything in a window unless it is programmed to do so.
GFA will, however, erase newly visible portions of the screen by default,
filling in the default background color,
if you have not taken over that function in your program. (I'm not certain
if it is GFA or DefWindowsProc() that does this)

Resizing a window will result in erasure of the entire window.

B.D.




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 23 19:42:58 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10F47m-00NQdZC>; Mon, 22 Feb 1999 23:46:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA13211; Mon, 22 Feb 1999 23:18:24 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D1E891.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990222221804.JLFR5469@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 22 Feb 1999 22:18:04 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 22 Feb 1999 22:18:04 +0000
Subject: [GFA] Help, please.
X-UIDL: 8979f74279d731447f88819b72552312

dh&  = _DRIVE
ph$ = DIR$(0)
home$ = CHR$(dh&) + ":" + ph$ + "\"

TITLEW #1, "Experimentation window....  W95 closebox & SysMenu work."
OPENW #1,0,0,_X,70,48
PRINT "Change the path to reflect the location of *your* copy of quikview.exe."
FILESELECT #"Select executable to 'view'...","*.*","",n$
a% = EXEC("c:\windows\system\viewers\quikview.exe", n$)

DO
  SLEEP
UNTIL MENU(1) = 4
CHDRIVE dh&
CHDIR ph$
CLOSEW #1
END

---------------- end of code --------------------------

That works just fine.  So far!  quikview.exe has no means of printing or
writing to a file.  Any suggestions???

quikview.exe gets imports & exports, plus a few other things.  It doesn't
get all available info tho.  Roland's exports.gfw shows promise of getting
all that *this* does, but even so, his doesn't get the error codes, version,
etc.  Does anybody have suggestions of how to extend Roland's exports.gfw
to include *all* the information available in executables?

I can get *everything* using the xlate function but it also gets a ton of
trash I've not been able to filter out yet.

Advice & help greatly appreciated.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Feb 23 19:43:01 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FL7c-00NQdjC>; Tue, 23 Feb 1999 17:55:48 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA15325; Tue, 23 Feb 1999 17:26:03 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D2E79E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Feb 1999 11:24:32 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Redrawing window contents
X-UIDL: d2e64b93a9f2cdf11609246669744c3f

>>>>>
If you then
use MOVEW to move the window to the other side of the screen the letter A
will
then appear in the window on the other side of the screen. This picture
must
have been drawn at some point, what I want to do is turn it off so when I
move
the window you wont even see it at it's new position, It wont draw anything
inside the window at all

<<<<<

Hello,

Windows does that internally. This would be difficult to prevent, even in a
callback.
Look at the gfa help menu under CB. Also look at the Win SDK help mennu
unter WM_MOVE,
WM_ERASEBACKGRND, WM_PAINT, etc.

Rather than prevent the blit, it is easier to erase the screen after the
move.

Brent

**************************************************

OPENW #1
? "hit a key to exit"
kg1
CLOSEW #1
END

PROCEDURE kg1  // windows compatible replacement for keyget
LOCAL x&,x0&,y&,y0&,w&,h& 
 GETWINRECT 1,x0&,y0&,w&,h&
  DO
    GETEVENT
    GETWINRECT 1,x&,y&,w&,h&
    IF x& <> x0& || y& <> y0& THEN CLS
  LOOP UNTIL MENU(1) = 1 || MENU(1) = 4  // exit on keystroke or closebox 
RETURN

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:18:48 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FQIr-00NPgxC>; Tue, 23 Feb 1999 23:27:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA16270; Tue, 23 Feb 1999 22:56:55 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D33578.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990223215648.JZHG5516@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Feb 1999 21:56:48 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 23 Feb 1999 21:56:48 +0000
Subject: [GFA] On my knees, begging mercy!   2302zz1-
X-UIDL: 73610e6b0e908638c30cd94803d3d3b5

23/02/99 03:47:12 PM   On my knees, begging mercy!   2302zz1-

I want to print multi-page docs, ALL with the same font & fontsize.  I also 
want to print more than one copy.

This routine will give me the same font & size on all pages.

If even *2* is set in as number of copies to print, PrintMgr is loaded with 
something like 94 copies!

HELP! HELP! HELP! HELP! HELP! HELP! HELP! HELP! HELP! HELP! HELP!

<C!> (crying, loudly!, in GREAT pain!!)
TomR.


OPENW #1
DLG PRINT WIN(1),PD_ALLPAGES,dc&
? _DX '                   Manual says _EX but interpretor won't accept!
DLG FONT 1,dc&,CF_BOTH | CF_EFFECTS,0,0,0,""
FILESELECT #"Select file to print...","*.*","",np$
DIM printer_x_y&(1)
SETDC dc&
@Set_A_Font()
FOR CoPs = 1 TO _DX ' Want to allow printing more than one copy.  HA!!!
  STARTDOC "CHARTEST"
  @Stampa()
  SETFONT OEM_FIXED_FONT
  FREEFONT printfont&
  NEW FRAME
  ENDDOC
NEXT CoPs
SETDC _DC(1)
FREEDC dc&
CLOSEW #1
END


PROCEDURE Stampa()
  ChArLiE& = 1 ' Had to add so I could get fontsize the same all pages.
  @Set_A_Font()
  OPEN "i", #1, np$
  WHILE NOT EOF(#1)
    LINE INPUT #1, caz$
    caz% ++
    l% = caz% * 60
    TEXT 0,l%,caz$
    IF caz% = 60 THEN
      caz% = 0
      NEW FRAME
      @Set_A_Font()
    ENDIF
  WEND
  ChArLiE& = 0
  CLOSE #1
RETURN
'
'
PROCEDURE Set_A_Font()
  SETFONT printfont&
  ~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
  IF ChArLiE& = 1 THEN GOTO ScRuNcH ' had to add - 2nd page+ HUGE fontsize
  RFONT  WIDTH w&,HEIGHT h&
  neww& = w& / 2 * printer_x_y&(0) / _X
  newh& = h& / 2 * printer_x_y&(1) / _X
  ScRuNcH:
  RFONT ITALIC italic&
  RFONT UNDERLINE underline&
  RFONT STRIKEOUT strikeout&
  RFONT CHARSET charset&
  RFONT CLIPPRECISION clipprecision&
  RFONT QUALITY quality&
  RFONT PITCH pitch&
  RFONT FAMILY family&
  RFONT WEIGHT weight&
  RFONT ORIENTATION orientation&
  RFONT ESCAPEMENT escapement&
  FONT ITALIC italic&, UNDERLINE underline&, STRIKEOUT strikeout&
  FONT CHARSET charset&, CLIPPRECISION clipprecision&, QUALITY quality&
  FONT QUALITY quality&, PITCH pitch&, FAMILY family&, WEIGHT weight&
  FONT WIDTH neww&, HEIGHT newh&, ORIENTATION orientation&, ESCAPEMENT
escapement&
  FONT TO printfont&
RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:18:49 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FRYg-00NPieC>; Wed, 24 Feb 1999 00:48:10 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA16430; Wed, 24 Feb 1999 00:20:06 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D3487F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Feb 1999 18:19:31 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Text file to printer
X-UIDL: 35d2fc9d19099e3e4f22d18df87a2cda

Hello Tom,

Heres my first effort. The big problem appears to be the inititialization
of caz%.
It still needs work on font scaling for large fonts (ie 24 pt arial).
Let me know if you get that worked out .

Good work.

Brent.
********************************


OPENW #1
DLG PRINT WIN(1),PD_ALLPAGES,dc&
copies= _DX '    Manual says _EX but interpretor won't accept!

DLG FONT 1,dc&,CF_BOTH | CF_EFFECTS,0,0,0,""
FILESELECT #"Select file to print...","*.*","",np$
DIM printer_x_y&(1)
SETDC dc&
@Set_A_Font()
FOR CoPs = 1 TO copies // put in a variable to  preserve
  STARTDOC "CHARTEST"  // this syntax is not doocumented in gfa , where did
you find it ? ***
  @Stampa()
  SETFONT OEM_FIXED_FONT
  FREEFONT printfont&
  NEW FRAME
  ENDDOC
NEXT CoPs
SETDC _DC(1)
FREEDC dc&
CLOSEW #1
END


PROCEDURE Stampa()
  caz%=0   //  ******************* inititlized ************** This was the
problem
  ChArLiE& = 1 ' Had to add so I could get fontsize the same all pages.
  OPEN "i", #1, np$
  WHILE NOT EOF(#1)
    @Set_A_Font()
    LINE INPUT #1, caz$
    caz% ++
    l% = caz% * 60
    TEXT 0,l%,caz$
    IF caz% = 60 THEN
      caz% = 0
      NEW FRAME
      @Set_A_Font()
    ENDIF
  WEND
  ChArLiE& = 0
  CLOSE #1
RETURN
'
'
PROCEDURE Set_A_Font()
  ~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))

  SETFONT printfont&
  RFONT  WIDTH w&,HEIGHT h&   // initial values  ****************

  IF ChArLiE& = 1 THEN GOTO ScRuNcH ' had to add - 2nd page+ HUGE fontsize

  w& = w& / 2 *  printer_x_y&(0)/ _X
  h& = h& / 2 *  printer_x_y&(0) /_X  // changed  to (0) to preserve
scaling  *******


  ScRuNcH:
  RFONT ITALIC italic&
  RFONT UNDERLINE underline&
  RFONT STRIKEOUT strikeout&
  RFONT CHARSET charset&
  RFONT CLIPPRECISION clipprecision&
  RFONT QUALITY quality&
  RFONT  PITCH pitch&
  RFONT FAMILY family&
  RFONT WEIGHT weight&
  RFONT ORIENTATION orientation&
  RFONT ESCAPEMENT escapement&

  FONT ITALIC italic&, UNDERLINE underline&, STRIKEOUT strikeout&
  FONT CHARSET charset&, CLIPPRECISION clipprecision&, QUALITY quality&
  FONT QUALITY quality&, PITCH pitch&, FAMILY family&, WEIGHT weight&
  FONT WIDTH w&, HEIGHT h&, ORIENTATION orientation&, ESCAPEMENT
escapement&  // w&,h&
  FONT TO printfont&
RETURN
























---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:18:50 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FTXY-00NPgxC>; Wed, 24 Feb 1999 02:55:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA16658; Wed, 24 Feb 1999 02:27:22 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D36651.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990224012717.JYPQ5451@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Feb 1999 01:27:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Feb 1999 01:27:17 +0000
Subject: [GFA] Awrrrrrgh!
X-UIDL: 8a8ea782e41498f7ca353b2626793241

>From DLGFONT.....

_DX holds the size of a font in tenths of a point.

Ooooookay!  What's a point?  Please express it in pixels, PLEASE.

Brent - You were right about giving the font size it's own variable &
initializing the variable - keeps PrintMgr happier.

I *THINK* vertical scaling will work like so....

scale& = (GETDEVCAPS(VERTRES) / _DX) * 1.3

Allowing for a line height of 1.3 times the font size.
UNLESS... there is a set way to do this.

Now to play w/ getting widths & wrap involved.  Oh, Boy!

I think I'll take up water painting, impressionistic, I think.

No?

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:18:51 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FW0D-00NPgBC>; Wed, 24 Feb 1999 05:32:53 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA16931; Wed, 24 Feb 1999 05:04:54 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D38B3C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Feb 1999 23:04:14 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Text file to printer
X-UIDL: c4fbb0d035ed0c0237ce157e737847d5


// Tom , heres an improved update that seems to solve the problems you
mentioned.
// Font spacing and page limits were corrected in Stampa()
// Note than RFONT h & RFONT w return negative values.
// Perhaps sign bit is used as a flag in the font structure, Im not sure.
//
// The only problem now is that every time you run, you get an increased
value of height&.
// RFONT and the font selector seem to have a mind of their own.
// Using "points" from the _dx REGISTER may be better than using RFONT to
get font size.
// I dunno.
//
// If anyone figures this out, let me know. GFA's docs are sparce on the
subject.
//
// Perhaps a better way to call the font selector would be to call the
COMMDLG.DLL function
// choosefont() directly, in order to gain direct access to the choosefont
structure.
//


OPENW #1
DO
LOOP WHILE _Mess

DLG PRINT WIN(1),PD_ALLPAGES,dc&
copies= _DX '    Manual says _EX but interpretor won't accept!
DLG FONT 1,dc&,CF_BOTH | CF_EFFECTS,0,0,0,""
points = _DX

FILESELECT #"Select file to print...","*.*","",np$
DIM printer_x_y&(1)
SETDC dc&
height& = @Set_A_Font(pfont&)  // get printer chr height and set font

FOR CoPs = 1 TO copies // put in a variable to  preserve
  STARTDOC "CHARTEST"  // this syntax is not documented in gfa , where did
you find it ? ***
  SETFONT pfont&  // do not call set_a_font() again unless you erase the
old font
  @Stampa()
  ENDDOC
NEXT CoPs

SETDC _DC(1)
SETFONT OEM_FIXED_FONT
FREEFONT pfont&
FREEDC dc&
CLOSEW #1
END


PROCEDURE Stampa()
  l%=0
  OPEN "i", #1, np$
  WHILE NOT EOF(#1)
    LINE INPUT #1, caz$
    l% += height&  // height& is negative unless corrected in Set_A_Font,
use abs value
    TEXT 0,l%,STR$(height&) + "  " + STR$(points) + caz$  // verify hieght
note that height changes on every run !!!!
    IF l% + height& * 2 >= printer_x_y&(1) THEN  // choose your own limit
      l%=0
      NEW FRAME
    ENDIF
  WEND
  NEW FRAME
  CLOSE #1
RETURN
'
'
FUNCTION Set_A_Font(VAR printfont&)
  ~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
  //  SETFONT printfont&  //  does not yet exist, cant use here
  RFONT  WIDTH sw&,HEIGHT sh&   // initial screen values  ****************

  pw& = ABS(sw&)   *  printer_x_y&(0) / _X  // Printer font scaling
  ph& = ABS(sh&)  *  printer_x_y&(0) / _X  // changed  to (0) to preserve
scaling  *******

  ScRuNcH:
  RFONT ITALIC italic&
  RFONT UNDERLINE underline&
  RFONT STRIKEOUT strikeout&
  RFONT CHARSET charset&
  RFONT CLIPPRECISION clipprecision&
  RFONT QUALITY quality&
  RFONT PITCH pitch&
  RFONT FAMILY family&
  RFONT WEIGHT weight&
  RFONT ORIENTATION orientation&
  RFONT ESCAPEMENT escapement&

  FONT ITALIC italic&, UNDERLINE underline&, STRIKEOUT strikeout&
  FONT CHARSET charset&, CLIPPRECISION clipprecision&, QUALITY quality&
  FONT QUALITY quality&, PITCH pitch&, FAMILY family&, WEIGHT weight&
  FONT WIDTH pw&, HEIGHT ph&, ORIENTATION orientation&, ESCAPEMENT
escapement&  // pw&,ph&
  FONT TO printfont&

  RETURN ph&
ENDFUNC





































---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:18:54 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FXOB-00NPdAC>; Wed, 24 Feb 1999 07:01:43 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id GAA17097; Wed, 24 Feb 1999 06:33:28 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D3A000.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 00:33:10 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] text file to printer
X-UIDL: 994fe74dccb00ac113fe15279b493f2f

// Prntdlg2.gfw
//
// Tom , heres another update.
//
// The last problem was is that every time you run, you get different value
of height&,
// unless you allways set the window size to the same number of pixels.
//
// This was fixed by basing the size on the point size returned in _DX.
//
// If you find a better way to set char width , please post. (height is ok)
//
//

OPENW #1
FULLW #1
DO
LOOP WHILE _Mess

syppi& = GETDEVCAPS(90) // get vertical pixels/inch
sxppi& = GETDEVCAPS(88) // get horizntl pixels/inch

DLG PRINT WIN(1),PD_ALLPAGES,dc&
copies= _DX '    Manual says _EX but interpretor won't accept!
DLG FONT 1,dc&,CF_BOTH | CF_EFFECTS,0,0,0,""
points = _DX
FILESELECT #"Select file to print...","*.*","",np$

DIM printer_x_y&(1)
SETDC dc&
~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))

height& = @Set_A_Font(pfont&)  // get printer chr height and set font
FOR CoPs = 1 TO copies // put in a variable to  preserve
  STARTDOC "CHARTEST"  // this syntax is not documented in gfa , where did
you find it ? ***
  SETFONT pfont&  // do not call set_a_font() again unless you erase the
old font
  @Stampa()
  ENDDOC
NEXT CoPs

SETDC _DC(1)
SETFONT OEM_FIXED_FONT
FREEFONT pfont&
FREEDC dc&
CLOSEW #1
END


> PROCEDURE Stampa()
  l%=0
  OPEN "i", #1, np$
  WHILE NOT EOF(#1)
    LINE INPUT #1, caz$
    l% += height&
    TEXT 0,l%,STR$(height&) + "  " + STR$(points) + caz$  // verify hieght
note that height changes on every run !!!!
    IF l% + height& * 2 >= printer_x_y&(1) THEN  // choose your own limit
      l%=0
      NEW FRAME
    ENDIF
  WEND
  NEW FRAME
  CLOSE #1
RETURN
'
'
FUNCTION Set_A_Font(VAR printfont&)

  RFONT  WIDTH sw&,HEIGHT sh&   // initial screen values  ****************
  // NOTE sw& & sh& are negative !!!!!  I dunno why

  pyppi& = GETDEVCAPS(90) // get printer vertical pixels/inch
  pxppi& = GETDEVCAPS(88) // get printer vertical pixels/inch

  pntsperinch = 500  // what is the correct value?
  // Heres a way to set height and width of chars on printer if you know
the size on screen
  // The vertical setting is exact (if you know the correct value of
pntsperinch)
  // The printer horizontal is approximated based on the ratio of vert to
horizntl screen size.

  ph& = pyppi& * points / pntsperinch  // calculate pixel heigt of chars
  pw& = ph& * sw& / sh& * syppi& / sxppi& * pxppi& / pyppi&  // calculate
pixel width of chars

  // GFA has a single font buffer, which it uses for all font settings, so
once the
  // DLG FONT is called, the buffer is populated and callable with RFONT.
  // You need only set the values that are not set by DLG FONT ( If any )
before saving the
  // values to the new font handle

  // I havent checked this out, so just in case , I set these values:

  FONT CLIPPRECISION 0
  FONT OUTPRECISION 0
  FONT QUALITY 0, PITCH 0
  FONT ORIENTATION 0, ESCAPEMENT 0

  FONT WIDTH pw&, HEIGHT ph&,

  FONT TO printfont&

  RETURN ph&
ENDFUNC




















---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:07 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FZLw-00NQY6C>; Wed, 24 Feb 1999 09:07:32 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA17409; Wed, 24 Feb 1999 08:35:59 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D3BCB8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990224073555.DSZU25155@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Feb 1999 07:35:55 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Feb 1999 07:35:55 +0000
Subject: [GFA] printing fiasco
X-UIDL: 0aacefb22cb71e5bc9804e44e08ac712

Brent & all interested...

The 2nd version is odd.  I have a file w/ a date/time & a single
column from 1 to 50.  This version *does* account for different 
font sizes, but... it will print that file Ok, but another that 
has about 80 lines in it prints only the 1st page, then spits out 
a 2nd page that is blank.  If I increase the font size above 10,
it prints 1 page & quits - whether it gets all of'em or not.

I was under the impression that a point was 1/72 if an inch, but 
changing   pntsperinch = 500  // what is the correct value? to 72
got a page of a monster fontsize - such a size that it printed only
6 lines & filled the page.

Attempting to print a fairly long doc results in 1 page printed, 
then a seemingly appropriate number of blank pages.

It is 1:30 in the morning & I've had a very long day so I an going
to let it sleep a bit & perhaps take it up again tomorrow.

There are questions in Brent's last version that I haven't touched
on.  One that he asked in the beginning... where did I get this...
  STARTDOC "CHARTEST"  // this syntax is not doocumented in gfa , 
where did you find it ? ***

Well, Brent... this whole thing started out as one of Sjouke Hamstra's
book/disk examples.  I've seen several "similar" wordings.  I've been
plugging at this thing for about 7 hours, this go-round.  I've played
with it before without success.  I'm gonna quit & go to bed.  G'nite.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:16 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FaGP-00NPdAC>; Wed, 24 Feb 1999 10:05:53 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA17522; Wed, 24 Feb 1999 09:34:48 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D3CA7D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 24 Feb 1999 09:23:28 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] Problems Win95 --> Win3.11
X-UIDL: d208b37f5ea67715264b7ee9a30cda0e

Hi!

Are there any problems known with programms compiled on Win95 and
running under Win3.11? Are there any things to pay attention to?

Many thanks in advance
Yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:22 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Fc4K-00NQdFC>; Wed, 24 Feb 1999 12:01:32 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA17886; Wed, 24 Feb 1999 11:29:50 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D3E58F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 11:29:05 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Awrrrrrgh!
X-UIDL: 679d05512991c6d634d5e3124a3b4bf7

A typographic Didot-point is (since 1973) 0,375 mm, the anglo american
pica-point is 0,351 mm which seems to be used in Windows.

> ----------
> Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
> Gesendet: 	Mittwoch, 24. Februar 1999 02:27
> An: 	gfabasic@aachen.linux.de
> Betreff: 	[GFA] Awrrrrrgh!
> 
> From DLGFONT.....
> 
> _DX holds the size of a font in tenths of a point.
> 
> Ooooookay!  What's a point?  Please express it in pixels, PLEASE.
> 
> Brent - You were right about giving the font size it's own variable &
> initializing the variable - keeps PrintMgr happier.
> 
> I *THINK* vertical scaling will work like so....
> 
> scale& = (GETDEVCAPS(VERTRES) / _DX) * 1.3
> 
> Allowing for a line height of 1.3 times the font size.
> UNLESS... there is a set way to do this.
> 
> Now to play w/ getting widths & wrap involved.  Oh, Boy!
> 
> I think I'll take up water painting, impressionistic, I think.
> 
> No?
> 
> <G>
> TomR.
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:23 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FcGn-00NPgmC>; Wed, 24 Feb 1999 12:14:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA17884; Wed, 24 Feb 1999 11:29:49 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D3E58F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 10:35:53 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: [GFA] Printer orientation...
X-UIDL: 593d96972e96df0a375adaba628c56ab

Hi,

does anybody know how check/change the printer orientation
(landscape/portrait) in Win 3.x ?

Michael.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:25 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Fcci-00NQdeC>; Wed, 24 Feb 1999 12:37:04 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA17986; Wed, 24 Feb 1999 12:06:45 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D3EE1B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 06:06:17 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] text file to printer
X-UIDL: f09ed2e571f1adadc7cbd463f053b34e

TOM,

I rediscovered that a width setting of 0 generates default font widths.
My one try at this earlier failed probably for some unrelated reason.
But it works now, and reduces the code size considerably.

// prntdlg3.gfw
//
// Note than RFONT HEIGHT returns a negative integer which must be captured
in an int variable.
// RFONT WIDTH is always 0, for default width, so calculated width for
printer is not needed.
//
// Using "points" from the _dx REGISTER is be better than using RFONT to
get font size.
//
// Perhaps a better way to call the font selector would be to call the
COMMDLG.DLL function
// choosefont() directly, in order to gain direct access to the choosefont
structure. Info is
// Win SDK help file from microsoft (also included with Borland C++, etc)
//
// Finally, a more versatile method that would not require computation of
any font sizes, would be to 
// print each line into a metafile, and then play the metafile to the
printer DC. 
//
//

OPENW #1
DO
LOOP WHILE _Mess  // purge events from queue

DLG PRINT WIN(1),PD_ALLPAGES,dc&
copies= _DX '    Manual says _EX but interpretor won't accept!

DLG FONT 1,dc&,CF_BOTH | CF_EFFECTS,0,0,0,""
points = _DX

FILESELECT #"Select file to print...","*.*","",np$
DIM printer_x_y&(1)
SETDC dc&
height& = @Set_A_Font(pfont&)  // get printer chr height and set font
~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))

FOR CoPs = 1 TO copies // put in a variable to  preserve
  STARTDOC "CHARTEST"  // this syntax is not documented in gfa , where did
you find it ? ***
  SETFONT pfont&  // do not call set_a_font() again unless you erase the
old font
  @Stampa()
  ENDDOC
NEXT CoPs

SETDC _DC(1)
SETFONT OEM_FIXED_FONT
FREEFONT pfont&
FREEDC dc&
CLOSEW #1
END


PROCEDURE Stampa()
  l%=0
  TRY
    OPEN "i", #1, np$
    WHILE NOT EOF(#1)
      LINE INPUT #1, caz$
      l% += height&
      TEXT 0,l%,STR$(height&) + "  " + STR$(points) + caz$  // verify
height & points
      IF l% + height& * 2 >= printer_x_y&(1) THEN  // choose a limit
        l%=0
        NEW FRAME
      ENDIF
    WEND
    NEW FRAME
    CLOSE #1
  CATCH
  CLOSE #1
RETURN
'
'
FUNCTION Set_A_Font(VAR printfont&)
  pyppi& = GETDEVCAPS(90) // get printer vertical pixels/inch
  pntsperinch = 500  // what is the correct value?
  ph& = pyppi& * points / pntsperinch  // calculate pixel heigt of chars
  pw& = 0   // 0 indicates default width
  // DLG font has initialized the font structure, so only the changed
values need be inserted
  FONT WIDTH pw&, HEIGHT ph&,
  FONT TO printfont&
  RETURN ph&
ENDFUNC







---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:27 1999
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FcvR-00NQdsC>; Wed, 24 Feb 1999 12:56:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA18033; Wed, 24 Feb 1999 12:19:55 +0100
From: Peuapeu@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D3F130.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 06:19:37 EST
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 4.0 for Windows 95 sub 13
Subject: Re: [GFA] Problems Win95 --> Win3.11
X-UIDL: 24c63203a28be0769a355aedeb3e89a6

<< Are there any problems known with programms compiled on Win95 and
 running under Win3.11? Are there any things to pay attention to? >>

I managed to get my Window 95 application running on Windows 3.1/3.11 well
enough to actually sell it to customers using that platform .  Below are some
of things I found:

//in Win 3.1 changing the FONT size repeatedly will crash the system

//in Win3.1 CombineRgn gives wrong answer sometimes

//in Win3.1 must make all listID& unique or there are problems

// show cursor works different on W31 systems
//          apparently SHOWCURSOR(FALSE) just hides it!

//in Win3.1 Don't free a brush that has been selected or a crash may happen!
//    Win95 seems to be more forgiving.

// memory leaks due to not disposing of font handles
//          seemed to only affect Windows 3.1 program.

I also found I had to rearrange the way I was opening and closing certain
windows otherwise I observed some peculiar and undesired screen refreshes.
Finally, even after I seem to have the program working fine for extended
periods of time on several different W3.1 and W3.11 systems, I still found one
W3.1 portable that would crash after a short time (due to a memory leak? that
I was never able to identify).

Hope this helps.

James
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:28 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FeLr-00NQdQC>; Wed, 24 Feb 1999 14:27:47 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA18237; Wed, 24 Feb 1999 13:55:00 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D40778.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990224125447.CZHF20775@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Feb 1999 12:54:47 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Feb 1999 12:54:47 +0000
Subject: Re: [GFA] Printer orientation...
X-UIDL: 775899b7db06e2aa5930bc81153f3626

Michael
Thanks for the point info.
Printer... &File|P&rint Setup is quickest, or go into ControlPanel
& hit Printers - it's in there, too.
<G>
TomR.


At 10:35 AM 24/02/99 +0100, you wrote:
>Hi,
>
>does anybody know how check/change the printer orientation
>(landscape/portrait) in Win 3.x ?
>
>Michael.
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:29 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FeP0-00NQXgC>; Wed, 24 Feb 1999 14:31:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA18234; Wed, 24 Feb 1999 13:54:31 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D40774.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990224125424.CZFB20775@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Feb 1999 12:54:24 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Feb 1999 12:54:24 +0000
Subject: Re: [GFA] Problems Win95 --> Win3.11
X-UIDL: b18b28cb71a789f235b839ef5e3effbf

Thomas
There is a possible "catch".  What is the Win95 version?  If it is
4.00.950b, you are in trouble.  Same goes for Win98 that is an UPGRADE
installed over Win95.  2 versions of Win95 are OK... 4,00,950 & 4.00.950a.
The OEM (factory installed) Win98 is Ok.  950b & 98UPGRADE install some
different *.dlls that are incompatable with EVERYTHING ELSE.
<G>
TomR.
+

At 09:23 AM 24/02/99 +0100, you wrote:
>Hi!
>
>Are there any problems known with programms compiled on Win95 and
>running under Win3.11? Are there any things to pay attention to?
>
>Many thanks in advance
>Yours
>
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:30 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FetZ-00NQdJC>; Wed, 24 Feb 1999 15:02:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA18319; Wed, 24 Feb 1999 14:28:04 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D40F52.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 14:34:41 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: AW: [GFA] Printer orientation...
X-UIDL: eb0476e4e0d08fd5a33d47279f8c6184

Nice try !

  I knew it it when I pressed the "send mail" button, that I've wrote it not
precicely enough - I mean, who to program this things with GFA ?!

Michael

> ----------
> Von: 	Tom Record[SMTP:tiger.genealogical.rescue@worldnet.att.net]
> Gesendet: 	Mittwoch, 24. Februar 1999 13:54
> An: 	gfabasic@aachen.linux.de
> Betreff: 	Re: [GFA] Printer orientation...
> 
> Michael
> Thanks for the point info.
> Printer... &File|P&rint Setup is quickest, or go into ControlPanel
> & hit Printers - it's in there, too.
> <G>
> TomR.
> 
> 
> At 10:35 AM 24/02/99 +0100, you wrote:
> >Hi,
> >
> >does anybody know how check/change the printer orientation
> >(landscape/portrait) in Win 3.x ?
> >
> >Michael.
> >
> >---
> >This mailing list is currently running BeroList v2.5.6
> >Report problems to bero@bero-online.ml.org
> >
> 
> 
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org
> 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:31 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FfDJ-00NNjSC>; Wed, 24 Feb 1999 15:23:01 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA18375; Wed, 24 Feb 1999 14:36:22 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4112A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 24 Feb 1999 13:32:07 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Windows Compatibility
X-UIDL: 9507d1fbb342cad7d3442cccc3628d51

Hi everybody,

I've given up with trying to stop windows redrawing, it was hoping a bit I
think.

I was wondering if anyone knew why a program written in GFA Basic would work
fine under Windows 98, NT and 95 release 4, would then do crazy stuff under 95
release 2? When I got someone to try it on release 2 it opened many DOS windows
and then says out of memory.

If someone has an OS earlier than 95 release 4 then maybe you could see if the
same happens to you, the URL is http://www.baphead.freeserve.co.uk/balljoy.exe.

Thanks,
Russell Hayward

Website: http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:32 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Fexd-00NQdiC>; Wed, 24 Feb 1999 15:06:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA18361; Wed, 24 Feb 1999 14:33:34 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D41083.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990224133323.EUWS13655@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Feb 1999 13:33:23 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Feb 1999 13:33:23 +0000
Subject: [GFA] print crud
X-UIDL: 4dfab29428e0f23456fe4fedd2d54243

In the following (from Hamstra's book/disk), the first pass to  @Set_A_Font()
in PROCEDURE Stampa() (print, in Italian), is necessary to make the darned 
thing print with the selected font.  The 2nd  @Set_A_Font() is necessary if
you have to print more than one page _OR_ anything more than 1 page will NOT
be in the selected font.  One other problem... it will NOT space the lines
out at all - this seems to be fixed, regardless of the font size.

Brent... Your #3 prints a single page as if printing from DOS... it goes
into the 0.5 inch bottom margin.  Doesn't check for dimensions allowed &
doesn't carry the font selection over on more than the first page.

Bev... Yours doesn't allow for font selection... IS DOS, but works well as
such.

I'm trying to find/do/cabbage-together a Windows print routine for text
that allows the user to select fonts & font-size for print jobs that are NOT
limited to a single page.

7:30 morning... I'm off to bed!
<G>
TomR.


// Hamstra's prntfont.gfw/lst
dc& = PrinterDC()
OPENW #1
PRINT "Choose a font.  The output to the printer"
PRINT "will size itself relative to this window."
DLG FONT 1,dc&,CF_BOTH | CF_EFFECTS,0,0,0,""
'SETFONT COURIER_NEW
'FONT HEIGHT 70 ,WEIGHT 700,WIDTH 0,PITCH 1
DIM printer_x_y&(1)
SETDC dc&
@Set_A_Font()
STARTDOC "CHARTEST"
@Stampa()
SETFONT OEM_FIXED_FONT
FREEFONT printfont&
NEW FRAME
ENDDOC
SETDC _DC(1)
FREEDC dc&
MESSAGE "Press to end program.","GFA-BASIC",MB_OK,a

CLOSEW #1
'
'
PROCEDURE Stampa()
  @Set_A_Font()  //  REQ'ED to get the font to change!+++++++++++
  FILESELECT #"Select file to print...","*.*","",np$
  OPEN "i", #1, np$
  WHILE NOT EOF(#1)
    LINE INPUT #1, caz$
    caz% ++
    l% = caz% * 60
    TEXT 0,l%,caz$
    IF caz% = 60 THEN
      caz% = 0
      NEW FRAME
      @Set_A_Font()  //  REQ'ED to have the same size on 2nd page+ !+++++
      '      TEXT 0,l%,CHR$(10) + CHR$(13)
    ENDIF
  WEND
  CLOSE #1
RETURN
'
'
PROCEDURE Set_A_Font()
  SETFONT printfont&
  ~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
  RFONT  WIDTH w&,HEIGHT h&
  neww& = w& / 2 * printer_x_y&(0) / _X
  newh& = h& / 2 * printer_x_y&(1) / _X
  RFONT ITALIC italic&
  RFONT UNDERLINE underline&
  RFONT STRIKEOUT strikeout&
  RFONT CHARSET charset&
  RFONT CLIPPRECISION clipprecision&
  RFONT QUALITY quality&
  RFONT PITCH pitch&
  RFONT FAMILY family&
  RFONT WEIGHT weight&
  RFONT ORIENTATION orientation&
  RFONT ESCAPEMENT escapement&
  FONT ITALIC italic&, UNDERLINE underline&, STRIKEOUT strikeout&
  FONT CHARSET charset&, CLIPPRECISION clipprecision&, QUALITY quality&
  FONT QUALITY quality&, PITCH pitch&, FAMILY family&, WEIGHT weight&
  FONT WIDTH neww&, HEIGHT newh&, ORIENTATION orientation&, ESCAPEMENT
escapement&

  FONT TO printfont&
RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:34 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FfSY-00NPHDC>; Wed, 24 Feb 1999 15:38:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA18390; Wed, 24 Feb 1999 14:43:58 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D412F2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990224134350.DJZK20775@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Feb 1999 13:43:50 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Feb 1999 13:43:50 +0000
Subject: [GFA] print error...
X-UIDL: 6fce58b890464ee56c699e4676b9e7ee

Hamstra's prtfont.gfw/lst is what I started with a long time ago
& managed to modify to perform a decent job of printing,  What we
are playing (!$&%$!) with *is* his, but I don't know now what it
is called originally.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Feb 24 20:19:36 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Ffdn-00NQXxC>; Wed, 24 Feb 1999 15:50:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA18415; Wed, 24 Feb 1999 14:49:11 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4142C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 24 Feb 1999 13:47:26 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Psychic Tom
X-UIDL: 0fe8a628a6509103454f80db4d92f1f3

That's amazing, Tom answered my exact question before I'd even written it (I
recieved his answer 1 second after I sent it). There's no way around this
problem then Tom, no GFA Basic program will ever work on 95b or 98 upgrade?

Russell Hayward

Website: http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:22:17 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Fjx2-00NPgBC>; Wed, 24 Feb 1999 20:26:32 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA19159; Wed, 24 Feb 1999 19:57:44 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D45C8E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990224185741.HVZE20775@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Feb 1999 18:57:41 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Feb 1999 18:57:41 +0000
Subject: Re: [GFA] Psychic Tom
X-UIDL: 704f95da1c00737bc439409eae7acf86

Russell

Catch 22 & catch 22A
Compiled under situation A, runs under situation A only.  Compiled under
situation B, runs under situation B only.  Never shall East meat West in
this situation... the *.dlls are system & are incompatable.  In the case 
of UPGRADES - the *.dlls switched out *are* still there, but are moved to
another dir.  Probably hidden, probably in windows\system\.  I don't know
what the names are, but if found, they can be put back into service.  In
the upgrade, another file is put in with them... is an appl to re-install
them & neither the appl or the switcheroo is made known to the user.

There's something else I have no proof of, no advice given me.  Some apps
written in 98 UPGRADE have to be taken all the way back to *.lst before
trying to run on the OEM installs.  A *.gfw has knots in it's tail, put
there in the "save" process by the UPGRADEs.  Many people send *.gfws
instead of *.lsts.  It's a mistake if one or the other is using UPGRADE.

<G>
TomR.



At 01:47 PM 24/02/99 -0000, you wrote:
>That's amazing, Tom answered my exact question before I'd even written it (I
>recieved his answer 1 second after I sent it). There's no way around this
>problem then Tom, no GFA Basic program will ever work on 95b or 98 upgrade?
>
>Russell Hayward
>
>Website: http://www.baphead.freeserve.co.uk/
>
>The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:22:18 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FkH4-00NPgmC>; Wed, 24 Feb 1999 20:47:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA19202; Wed, 24 Feb 1999 20:19:08 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D46183.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990224191906.IDQJ20775@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Feb 1999 19:19:06 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Feb 1999 19:19:06 +0000
Subject: [GFA] gonna risk this...
X-UIDL: 426176d3d6f83cad095ea8fb44d8555e

I know I'm likely to draw flames or criticizm, but...

When making WinAPI calls in a program with GFA-W 16-bit, it does NOT matter
if the program is being run on Win3.1 thru OEM Win98!  Make all WinAPI
system *.dll calls as you would on Win3.1... USER, GDI, SHELL, etc.

Some may not know that on Win31, some of the system *.dlls are actually
*.exes if you look at their extensions.  This is why you don't have to
put *.dll on them in your DECL statements.

Also apparently unrealized by many is the fact that on Win95+, each system
"*.dll" comes in 2 flavors.  The standard Win31 flavor & a 32-bit flavor.
The Win31 version is smaller than the real thing because it is mearly a
translater or thunk appl from 16-bit to 32-bit.

It looks silly to me to discover something has to be re-written if it is
to be run on a Win31 computer.  All calls made to "module32.dll" in a
16-bit appl have to be changed... to "module".  I *THINK* many _NEW_ sys
modules include a 16-bit recognition/thunk segment, but I'm not certain.

For those that *don't* have an internal thunk, there are a couple of new
*.dlls that handle generic thunking.  SYSTHUNK.DLL is one of them.  I 
don't remember the other's name.

I believe 16-bit GFA-W could use *.vbx & *.ocx if somebody clever enough 
would write a *.dll to make the call translations.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:22:19 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Fkw7-00NNjIC>; Wed, 24 Feb 1999 21:29:39 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA19300; Wed, 24 Feb 1999 20:59:30 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D46B0C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 14:58:56 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] print text file
X-UIDL: 2ab790f82dd9037e912e099ba801678e

// prntdl3b.gfw
// Tom ,
//
// I have not encountered the problems you mentioned. But I made some
changes anyway.
//
// The length of the page is set with the loop limit. Margins are now set
with PROC margins(),
// rather than multiples of height& ( the interline spacing ) in the loop
test.
//
// Blank sheets in your original version were probably caused by the old
program structure making
// extra NEW FRAME calls. This version is streamlined in Stampa and in the
CoP loop to eliminate
// any chance of blank sheet feeds.
//
// Purge is useful for epediting screen redraws after a DLG box is closed
From ???@??? Sun Feb 28 19:22:20 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FlTy-00NNkMC>; Wed, 24 Feb 1999 22:04:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA19391; Wed, 24 Feb 1999 21:36:20 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D47399.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 15:35:55 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] print crud
X-UIDL: 11d47de95dc7acf922ee8ee0ae79b619

Oops.....

My face is once again red. I left the set font in the wrong location on
version 3b.
This version moves it where it is applied to each new frame.

I'm on WIN 3.1, how does it work on 95?

Good luck
BD

// prntdl3c.gfw
// Tom ,
//
// I have fixed the problems you mentioned, and made some additional
changes.
//
// The length of the page is set with the loop limit. Margins are now set
with PROC margins(),
// rather than multiples of height& ( the interline spacing ) in the loop
test.
//
// Blank sheets in your original version were probably caused by the old
program structure making
// extra NEW FRAME calls. This version is streamlined in Stampa and in the
CoP loop to eliminate
// any chance of blank sheet feeds.
//
// Purge is useful for epediting screen redraws after a DLG box is closed
From ???@??? Sun Feb 28 19:22:21 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FmPE-00NPglC>; Wed, 24 Feb 1999 23:03:48 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA19523; Wed, 24 Feb 1999 22:33:56 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4811C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 13:32:46 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: 5f29724e000f68ce5d93cfc7db31a1b1

HI Brent,
Where's the code?

----- Original Message -----
From: BDD <BrentDeck@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, February 24, 1999 12:35 PM
Subject: [GFA] print crud


Oops.....

My face is once again red. I left the set font in the wrong location on
version 3b.
This version moves it where it is applied to each new frame.

I'm on WIN 3.1, how does it work on 95?

Good luck
BD

// prntdl3c.gfw
// Tom ,
//
// I have fixed the problems you mentioned, and made some additional
changes.
//
// The length of the page is set with the loop limit. Margins are now set
with PROC margins(),
// rather than multiples of height& ( the interline spacing ) in the loop
test.
//
// Blank sheets in your original version were probably caused by the old
program structure making
// extra NEW FRAME calls. This version is streamlined in Stampa and in the
CoP loop to eliminate
// any chance of blank sheet feeds.
//
// Purge is useful for epediting screen redraws after a DLG box is closed=




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:22:41 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FpNQ-00NPiHC>; Thu, 25 Feb 1999 02:14:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA19847; Thu, 25 Feb 1999 01:44:50 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4AE14.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 24 Feb 1999 16:43:35 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] GAFNET
X-UIDL: 75d52ec836a6e6dcdf47cdd1ee3ea7d9

GFA.NET , home of the GFAWHELP file is temporarily down. Should be up
tomorrow.

Dale,

we are working on that.
The server is alive, but DNS is down at the moment.
You can check that by entering the IP address for GFA.NET
Main site (209.90.64.65) in your browser.
DNS for the Domain system, resolving IP addresses out of
a domain name, is routed through Germany at the moment, and
we have problems with our carrier, the Deutsche Telekom.
(i.e. all servers are running, but the connection has been
shut down).
They promised to fix up the problem tomorrow.

Will keep you informed.

Regards

Sven Thomas
GFA Software

>
>Hi Sven,
>The server for gaf.net seems to be down again.
>Dale
>
>


http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:22:54 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FqR7-00NNkMC>; Thu, 25 Feb 1999 03:22:01 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA19982; Thu, 25 Feb 1999 02:53:44 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4BE05.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 20:53:23 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] print crud
X-UIDL: f45e1557663a0fea48c31870e1486501

Tom,

Heres the code:

( Lost in the transmission )
*********************************
Oops.....

My face is once again red. I left the set font in the wrong location on
version 3b.
This version moves it where it is applied to each new frame.

I'm on WIN 3.1, how does it work on 95?

Good luck
BD

// prntdl3c.gfw
// Tom ,
//
// I have fixed the problems you mentioned, and made some additional
changes.
//
// The length of the page is set with the loop limit. Margins are now set
with PROC margins(),
// rather than multiples of height& ( the interline spacing ) in the loop
test.
//
// Blank sheets in your original version were probably caused by the old
program structure making
// extra NEW FRAME calls. This version is streamlined in Stampa and in the
CoP loop to eliminate
// any chance of blank sheet feeds.
//
// Purge is useful for epediting screen redraws after a DLG box is closed
From ???@??? Sun Feb 28 19:22:57 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Fr9C-00NNkMC>; Thu, 25 Feb 1999 04:07:34 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA20093; Thu, 25 Feb 1999 03:39:45 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4C8C5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 18:38:34 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: dc0eb94136a27b5e0abeaa99e3918d76

Hi Brent,
Still no code in this message>
Dale

----- Original Message -----
From: BDD <BrentDeck@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, February 24, 1999 5:53 PM
Subject: Re: [GFA] print crud


Tom,

Heres the code:

( Lost in the transmission )
*********************************
Oops.....

My face is once again red. I left the set font in the wrong location on
version 3b.
This version moves it where it is applied to each new frame.

I'm on WIN 3.1, how does it work on 95?

Good luck
BD

// prntdl3c.gfw
// Tom ,
//
// I have fixed the problems you mentioned, and made some additional
changes.
//
// The length of the page is set with the loop limit. Margins are now set
with PROC margins(),
// rather than multiples of height& ( the interline spacing ) in the loop
test.
//
// Blank sheets in your original version were probably caused by the old
program structure making
// extra NEW FRAME calls. This version is streamlined in Stampa and in the
CoP loop to eliminate
// any chance of blank sheet feeds.
//
// Purge is useful for epediting screen redraws after a DLG box is closed=




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:22:58 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Fr6U-00NPHDC>; Thu, 25 Feb 1999 04:04:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA20076; Thu, 25 Feb 1999 03:37:15 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4C830.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 24 Feb 1999 18:36:04 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] all
X-UIDL: 50f9443896a221a1ac9fefb6b8ee8d65

      Das GFA-Netz ist unten heute!


      Use

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:22:59 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FrM2-00NNjSC>; Thu, 25 Feb 1999 04:20:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA20127; Thu, 25 Feb 1999 03:52:49 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4CBDC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 21:51:37 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="71d4e436-cc59-11d2-9cc0-00805feacc26"
Subject: [GFA] print crud
X-UIDL: 49203b6b333784a9a4bf3fac9d32a6f8

 Lets try it as an attachment
 Brent


Attachment Converted: "c:\programme\eudora\attach\PRNTDL3C.LST"
From ???@??? Sun Feb 28 19:23:00 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FreM-00NPHDC>; Thu, 25 Feb 1999 04:39:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA20183; Thu, 25 Feb 1999 04:11:38 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4D03F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Feb 1999 22:10:23 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="083019fd-cc57-11d2-a108-00805feaacd2"
Subject: [GFA] print crud
X-UIDL: 000dea64c542c1c784d2ba3ae038b787

Try again 

This is a gfw file.

BD

Attachment Converted: "c:\programme\eudora\attach\PRNTDL3C.GFW"
From ???@??? Sun Feb 28 19:23:03 1999
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FreP-00NPdAC>; Thu, 25 Feb 1999 04:39:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA20180; Thu, 25 Feb 1999 04:11:33 +0100
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4D03C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 13:42:52 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <36D4142C.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Psychic Tom
X-UIDL: 0d256a8e25a940d7190f0085b36c60be

Russell Hayward wrote:
> 
> That's amazing, Tom answered my exact question before I'd even written it (I
> recieved his answer 1 second after I sent it). There's no way around this
> problem then Tom, no GFA Basic program will ever work on 95b or 98 upgrade?
> 
> Russell Hayward
> 

This is really wierd. I have written some DLLs with GFA which are called
from C programs and from others, and they all appear to work OK on Win
3.11, 95, 98 and NT, even NT Workstation. I have not run into the
compatibility problems.
 
---------------------------------------------------------------------------
Dean Hodgson
BookMark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8226-1541  fax 0011-61-8-8410-2856
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:04 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Frj1-00NPgmC>; Thu, 25 Feb 1999 04:44:35 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA20210; Thu, 25 Feb 1999 04:15:32 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4D129.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990225031515.DETE2479@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 25 Feb 1999 03:15:15 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Feb 1999 03:15:15 +0000
Subject: Re: [GFA] print crud
X-UIDL: 9bb86da05d235863baf50954f87e26d6

Brent
I'm unique.  I'm running 95, but I don't use 95's explorer.exe as my
Windows shell.  I'm using progman.exe, so things look pretty much to me 
as to you.  The top right corner has a different look, but that's 
almost it.  I prefer Win31 ease & look.
<G>
TomR.


At 03:35 PM 24/02/99 -0500, you wrote:
>Oops.....
>
>My face is once again red. I left the set font in the wrong location on
>version 3b.
>This version moves it where it is applied to each new frame.
>
>I'm on WIN 3.1, how does it work on 95?
>
>Good luck
>BD
>
>// prntdl3c.gfw
>// Tom ,
>//
>// I have fixed the problems you mentioned, and made some additional
>changes.
>//
>// The length of the page is set with the loop limit. Margins are now set
>with PROC margins(),
>// rather than multiples of height& ( the interline spacing ) in the loop
>test.
>//
>// Blank sheets in your original version were probably caused by the old
>program structure making
>// extra NEW FRAME calls. This version is streamlined in Stampa and in the
>CoP loop to eliminate
>// any chance of blank sheet feeds.
>//
>// Purge is useful for epediting screen redraws after a DLG box is closed


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:05 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FsHF-00NNjIC>; Thu, 25 Feb 1999 05:19:57 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA20327; Thu, 25 Feb 1999 04:52:17 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4D9C9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990225035211.DZIW2479@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 25 Feb 1999 03:52:11 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Feb 1999 03:52:11 +0000
Subject: Re: [GFA] print crud
X-UIDL: 11a4bf16662ca714927323510c2a17b6

<GGGGGGGGGGGGGGGGGGGGG>
Got it.
<G>
TomR.


At 09:51 PM 24/02/99 -0500, you wrote:
> Lets try it as an attachment
> Brent
>
>
>Attachment Converted: C:\WORLDNET\DOWNLOAD\PRNTDL3C.LST
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:06 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FsIC-00NNjIC>; Thu, 25 Feb 1999 05:20:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA20329; Thu, 25 Feb 1999 04:52:21 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4D9CA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990225035217.DZJV2479@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 25 Feb 1999 03:52:17 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Feb 1999 03:52:17 +0000
Subject: Re: [GFA] Psychic Tom
X-UIDL: 116c2d9026b8f2c68c14495bf1ce6db8

Compatability...
The problem is with Windows Basics vs Windows.  C has no problems that I
know of.  Something about how Windows Basics is of the wrong gender, too 
young, or something.  LibertyBASIC has the same problems GFA-W does with
the upgrades I listed.  A few GFA-W authors have notified me of their
problems.  A couple of hundred LB authors have, too.

I don't know a better way to explain things like this except that those
upgrade *.dlls do NOT allow GFA-W & LB to function properly!  LB simply
crashes & locks the computer down.  GFA-W... many CONTROL items don't
appear onscreen.  There *may* be other problems I'm not aware of but have
had success with appls that do not use BUTTONs.  Dialogs seem to fare OK,
but buttons of any sort in windows & toolbars are forbidden.

I would suspect that any GFA-W-generated *.dll that does NOT generate any
buttons onscreen outside of dialogs would play just fine.  I will freely
admit that I don't know nearly enough about Windows or GFA-W, either.  I
*am* pretty smart, but am far luckier to have friends & acquaintences that
will pass on to me little things they know or run across that is of interest.

I was laughed at when I first attempted to explain this strange interaction
between GFA-W & Windows.  Well... here it is again.  Would that all this
had occurred 30 yrs ago when I was far more agile mentally & had far better
memory.

<G>
TomR.


At 01:42 PM 25/02/99 +0930, you wrote:
>Russell Hayward wrote:
>> 
>> That's amazing, Tom answered my exact question before I'd even written it (I
>> recieved his answer 1 second after I sent it). There's no way around this
>> problem then Tom, no GFA Basic program will ever work on 95b or 98 upgrade?
>> 
>> Russell Hayward
>> 
>
>This is really wierd. I have written some DLLs with GFA which are called
>from C programs and from others, and they all appear to work OK on Win
>3.11, 95, 98 and NT, even NT Workstation. I have not run into the
>compatibility problems.
> 
>---------------------------------------------------------------------------
>Dean Hodgson
>BookMark Project -- School Library Automation Software
>Department of Education, Training and Employment  Adelaide, South
>Australia
>email to:  dhodgson@nexus.edu.au
>website:   http://www.nexus.edu.au/bookmark/
>phone 0011-61-8-8226-1541  fax 0011-61-8-8410-2856
>---------------------------------------------------------------------------
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:08 1999
Return-Path: <dhodgson@nexus.edu.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FtBQ-00NPgwC>; Thu, 25 Feb 1999 06:18:00 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA20518; Thu, 25 Feb 1999 05:50:06 +0100
From: Dean Hodgson <dhodgson@nexus.edu.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4E756.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 15:21:25 +0930
Organization: BookMark Project (DETE)
X-Mailer: Mozilla 3.01Gold (Win95; I)
MIME-Version: 1.0
References: <36D4D9CA.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Psychic Tom
X-UIDL: 4a2bcac7e3d71efdd3e2502a4ca0c09b

Tom Record wrote:
> 
> Compatability...
> The problem is with Windows Basics vs Windows.  C has no problems that I
> know of.  Something about how Windows Basics is of the wrong gender, too
> young, or something.  LibertyBASIC has the same problems GFA-W does with
> the upgrades I listed.  A few GFA-W authors have notified me of their
> problems.  A couple of hundred LB authors have, too.
> 
..

> 
> <G>
> TomR.
> 

Oh, I believe you. Far too many strange things happen associated with
Windows.
My programs generally only use dialog windows. I tend to avoid the other
types. So maybe that's why I don't see the problems ??
 
---------------------------------------------------------------------------
Dean Hodgson
BookMark Project -- School Library Automation Software
Department of Education, Training and Employment  Adelaide, South
Australia
email to:  dhodgson@nexus.edu.au
website:   http://www.nexus.edu.au/bookmark/
phone 0011-61-8-8226-1541  fax 0011-61-8-8410-2856
---------------------------------------------------------------------------

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:09 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10FueJ-00NLC8C>; Thu, 25 Feb 1999 07:51:55 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA20762; Thu, 25 Feb 1999 07:24:22 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D4FD6C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990225062412.PBC12590@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 25 Feb 1999 06:24:12 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Feb 1999 06:24:12 +0000
Subject: Re: [GFA] Psychic Tom
X-UIDL: 4c50b476f465436eb663975806de558b

>
>Oh, I believe you. Far too many strange things happen associated with
>Windows.
>My programs generally only use dialog windows. I tend to avoid the other
>types. So maybe that's why I don't see the problems ??
> 

Dean, I strongly believe that is correct.  Buttons in dialogs seem to be
immune to the disease but all others are victims.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:18 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G0gS-00NQdQC>; Thu, 25 Feb 1999 14:18:32 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA21422; Thu, 25 Feb 1999 13:49:04 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D55799.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 08:46:25 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36D40774.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: af6bf6e5053ed35e5d9b6be376bfcd98

Hi Tom!

Many thanks for your fast answer!

> There is a possible "catch".  What is the Win95 version?  If it is
> 4.00.950b, you are in trouble.

Hm, I think I'm in troube! :-)
Do you know, where the problem is?

But never mind, I have an old 486-Computer with an Win3.11 in our
Network and so I can compile it there for the "older" machines. If I
do so, everything works fine!

Many thanks
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:19 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G0gw-00NQZ0C>; Thu, 25 Feb 1999 14:19:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA21420; Thu, 25 Feb 1999 13:48:46 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D55799.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 08:30:55 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36D3F130.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: e4f07f7a31e118365426210d394d7ce7

Dear James!

Many thanks for your fast answer!

>I managed to get my Window 95 application running on Windows 3.1/3.11
well
>enough to actually sell it to customers using that platform .  Below
are some
>of things I found:

My main problem is in using the following: IF CHECK?(child|,1503) = 1
THEN ...
If I do that (and compile that) in Win95 than Win3.11 reports an error
49. If I compile it under Win3.11 than it works fine.

>//in Win 3.1 changing the FONT size repeatedly will crash the system

Aaaargh! That's it ... :-/

>//in Win3.1 must make all listID& unique or there are problems

Hm, this is a thing I do not understand. Please explain it for a
stupid person like me ...

Many thanks
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:20 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G1Pt-00NQdwC>; Thu, 25 Feb 1999 15:05:29 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA21558; Thu, 25 Feb 1999 14:34:41 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D56247.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990225133421.JEAT20479@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 25 Feb 1999 13:34:21 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Feb 1999 13:34:21 +0000
Subject: Re: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: 150b4430476d5adaef6c91a2bc67771b

Thomas
You're more than welcome.
I really don't know if there are 2 different .950bs - OEM/UPGRADE.  I *do*
know that there are 2 different W98s.  My .950a is OEM & is OK.

If your .950b is UPGRADE, look in your windows & windows/system dirs for
a hidden subdir containing several *.dlls & an *.exe.  Nothing about this
dir & it's contents is mentioned in any documentation, but exist after an
UPGRADE.  The *.dlls can be put back - supposedly w/o problem.  I am very
suspicious tho... since MS included an *.exe to replace'em, I'm curious
if they didn't do some renaming.  I know only of the existance, I wasn't
told any more.  Nothing more than a simple batch file is necessary to
make a subdir, move files, rename files, etc.  I do it all the time from
a small GFA-W appl by shelling to DOS.  The user never sees the DOS action
but discovers a new subdir & 2 or 3 files in it that have been replaced on
her/his system by *my* files.  These are the Win95 splash screens labeled 
as logo?.sys.

If you have no way to peek at this, I'll send you something that will log
everything to screen &/or a file.

<G>
TomR.



At 08:46 AM 25/02/99 +0100, you wrote:
>Hi Tom!
>
>Many thanks for your fast answer!
>
>> There is a possible "catch".  What is the Win95 version?  If it is
>> 4.00.950b, you are in trouble.
>
>Hm, I think I'm in troube! :-)
>Do you know, where the problem is?
>
>But never mind, I have an old 486-Computer with an Win3.11 in our
>Network and so I can compile it there for the "older" machines. If I
>do so, everything works fine!
>
>Many thanks
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:28 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G3uq-00NQdxC>; Thu, 25 Feb 1999 17:45:36 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA21847; Thu, 25 Feb 1999 17:12:43 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D58764.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 11:12:00 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: f6a42e43a823454e3e1645c754bc1bfc

Thomas,

>My main problem is in using the following: IF CHECK?(child|,1503) = 1
THEN ...<

If you really are using the variable 'child|' it's not surpprising that you
get error 49. "Window not open"

The parameter that you need to send for CHECK?() is WORD sized (16 bits).
check| is a BYTE (8 bits)

IF CHECK?(child&, 1503)

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:23:41 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G3ti-00NPaeC>; Thu, 25 Feb 1999 17:44:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA21845; Thu, 25 Feb 1999 17:12:31 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D58761.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 08:11:14 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: 761f3aaf2e58a5f17da3dd935b404448

Hi Brent,
Attachment contains no code, just a few lines of REMs. Can you send a ZIP
attachment? They seem to work the best.
Thanks for trying,
Dale

----- Original Message -----
From: BDD <BrentDeck@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, February 24, 1999 6:51 PM
Subject: [GFA] print crud


Lets try it as an attachment
 Brent






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:24 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G42e-00NPiNC>; Thu, 25 Feb 1999 17:53:40 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA21881; Thu, 25 Feb 1999 17:22:21 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D58993.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 08:21:09 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: 209232d7567add5d0d53b98289ae0726

I got the attachment but all it has was some REM lines, no code.
Dale
----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, February 24, 1999 7:52 PM
Subject: Re: [GFA] print crud


><GGGGGGGGGGGGGGGGGGGGG>
>Got it.
><G>
>TomR.
>
>
>At 09:51 PM 24/02/99 -0500, you wrote:
>> Lets try it as an attachment
>> Brent
>>
>>
>>Attachment Converted: C:\WORLDNET\DOWNLOAD\PRNTDL3C.LST
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:25 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G48c-00NPh5C>; Thu, 25 Feb 1999 17:59:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA21902; Thu, 25 Feb 1999 17:27:38 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D58ACF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 08:26:27 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: abe8961cd23d3774a54bbddc67d9a446

Hi Brent,
Great!, The GFW attachment contains the code. Do I have your permission to
include in the GFAWHELP file and a GFANL news letter.?
Dale

----- Original Message -----
From: BDD <BrentDeck@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, February 24, 1999 7:10 PM
Subject: [GFA] print crud


Try again

This is a gfw file.

BD





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:27 1999
Return-Path: <jhorikx@stads.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G4Lm-00NQdyC>; Thu, 25 Feb 1999 18:13:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA22278; Thu, 25 Feb 1999 17:39:18 +0100
From: Jos Horikx <jhorikx@stads.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D58D9F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: jhorikx@mail.stads.net
X-Mailer: Windows Eudora Light Version 1.5.4 (32)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Feb 1999 17:39:08 +0100
Subject: [GFA] Multiple windows
X-UIDL: d7b105b57bc1daecae10f8dd0534d16a


I am a beginner with GFA in a windows95 or windows98 setting,
so the next question could be very stupid (maybe it's very simple),
but if you like saying so, please provide me with an answer as well... :-)

The way that I use GFA nowadays, is that I sometimes want
to make some statistical calculations. In order to do so, I use
an statistical package (such as SAS or SPSS) and for that 
items that these packages do not provide all information
needed, I write something in GFA in order to compare the
results of, say, SPSS with mine results, or to use the output of
SPSS as input for my GFA-programs.

In both cases it is sometimes needed to have simultaniously some 
rather large windows on the monitor, 

The problem however is that the tekst of my GFA-window stays 
away after another window (e.g. one of the SPSS-windows) has
been put on top of it. 

Does anybody have some usuful suggestions for me? is there a command
that text of numerical output can be restored, or doesn't disappear at
all when another window has been placed over a GFA-window?


Jos Horikx

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:28 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G4Mi-00NPaeC>; Thu, 25 Feb 1999 18:14:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA22406; Thu, 25 Feb 1999 17:43:36 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D58E8D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990225164332.LMGE20479@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 25 Feb 1999 16:43:32 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Feb 1999 16:43:32 +0000
Subject: Re: [GFA] print crud
X-UIDL: 02b14e3e82b598342ea1d82b765d6270

Serious problem w/ e-mail & attachments on this list... the server is
pre-set to limit the grand total to something like 8K... that includes
e-mail _&_ attachments.
<G>
TomR.


At 08:11 AM 25/02/99 -0800, you wrote:
>Hi Brent,
>Attachment contains no code, just a few lines of REMs. Can you send a ZIP
>attachment? They seem to work the best.
>Thanks for trying,
>Dale
>
>----- Original Message -----
>From: BDD <BrentDeck@compuserve.com>
>To: <gfabasic@aachen.linux.de>
>Sent: Wednesday, February 24, 1999 6:51 PM
>Subject: [GFA] print crud
>
>
>Lets try it as an attachment
> Brent
>
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:30 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G4jH-00NQZ0C>; Thu, 25 Feb 1999 18:37:43 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA22853; Thu, 25 Feb 1999 18:07:49 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D59446.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 09:06:36 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: 04be54dced22cbcf98f21c95d983981b

Yes, If I recall, the max is 8192. That is why attachments get cut off. If
the code is in the message it comes through OK>
Dale

----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Thursday, February 25, 1999 8:43 AM
Subject: Re: [GFA] print crud


>Serious problem w/ e-mail & attachments on this list... the server is
>pre-set to limit the grand total to something like 8K... that includes
>e-mail _&_ attachments.
><G>
>TomR.
>
>
>At 08:11 AM 25/02/99 -0800, you wrote:
>>Hi Brent,
>>Attachment contains no code, just a few lines of REMs. Can you send a ZIP
>>attachment? They seem to work the best.
>>Thanks for trying,
>>Dale
>>
>>----- Original Message -----
>>From: BDD <BrentDeck@compuserve.com>
>>To: <gfabasic@aachen.linux.de>
>>Sent: Wednesday, February 24, 1999 6:51 PM
>>Subject: [GFA] print crud
>>
>>
>>Lets try it as an attachment
>> Brent
>>
>>
>>
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:31 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G4us-00NQdcC>; Thu, 25 Feb 1999 18:49:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA22999; Thu, 25 Feb 1999 18:18:37 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D596CF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 12:18:10 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: 134adf95237444dd13b05ececde492b4


>>/in Win 3.1 changing the FONT size repeatedly will crash the system

>Aaaargh! That's it ... :-/

Does this occur even if youy delete the old font immedialtely after
creating the new font ?

This should work:

hfontold = hfont
FONT HEIGHT =newheight
FONT to hfont
FREEFONT hfontold
// ~deleteobject(hdc&,hfontold)    // windows api alternative 



Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:32 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G5wf-00NQdQC>; Thu, 25 Feb 1999 19:55:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA23328; Thu, 25 Feb 1999 19:27:11 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D5A6D9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 13:26:41 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="72cfafd8-ccd6-11d2-a108-00805feaacd2"
Subject: [GFA] print crud
X-UIDL: 9e3c11f3039f29436ad6fbda67397774

Tom,

heres a zipped lst file


brent

Attachment Converted: "c:\programme\eudora\attach\PRNTDL3B.ZIP"
From ???@??? Sun Feb 28 19:24:34 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G61v-00NNjlC>; Thu, 25 Feb 1999 20:01:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA23347; Thu, 25 Feb 1999 19:33:04 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D5A836.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 13:28:48 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] print crud
X-UIDL: 82bd00707e1b37b547373da8a9b7c65d

The text was only 3k, except for whatever the mail system added to it.

The GFW file was 5K, and that got through?

huh?

Brent. 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:35 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G64C-00NRHPC>; Thu, 25 Feb 1999 20:03:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA23364; Thu, 25 Feb 1999 19:35:35 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D5A8CD.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 13:34:36 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="70293f80-ccdd-11d2-91fd-00805fea3fcf"
Subject: [GFA] Multiple windows
X-UIDL: 98ebec41c34d088143cf401e891c5852


>>>>>>
Does anybody have some usuful suggestions for me? is there a command
that text of numerical output can be restored, or doesn't disappear at
all when another window has been placed over a GFA-window?
<<<<<<<

GFA has no automated screen redraw. (Borland C++ does )

You have to program it yourself.

Heres an example using bitmaps,

See metamin3 in Dales files page for an example using metafiles.

Brent

Attachment Converted: "c:\programme\eudora\attach\HELLOBMP.ZIP"
From ???@??? Sun Feb 28 19:24:38 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G6gA-00NQdqC>; Thu, 25 Feb 1999 20:42:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA23455; Thu, 25 Feb 1999 20:14:15 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D5B1DD.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990225191407.BBON23058@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 25 Feb 1999 19:14:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 25 Feb 1999 19:14:07 +0000
Subject: Re: [GFA] print crud
X-UIDL: 1d3b86c88af2619748d6742950ac33d1

Dale didn't get'em, Brent.  I did, somehow.  Neither was zipped.
<G>
TomR.


At 01:28 PM 25/02/99 -0500, you wrote:
>The text was only 3k, except for whatever the mail system added to it.
>
>The GFW file was 5K, and that got through?
>
>huh?
>
>Brent. 
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:39 1999
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G6pF-00NQZ0C>; Thu, 25 Feb 1999 20:52:01 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA23507; Thu, 25 Feb 1999 20:23:49 +0100
From: Peuapeu@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D5B41B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 14:21:59 EST
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 4.0 for Windows 95 sub 13
Subject: Re: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: 069313d2acdcc4749a8dfe550d6db486

>> My main problem is in using the following: IF CHECK?(child|,1503) = 1
 THEN ...   If I do that (and compile that) in Win95 than Win3.11 reports an
error
 49. If I compile it under Win3.11 than it works fine. <<

I have not used the CHECK? command.  I assume you have verified that the value
of child| is the same in both cases?  Also, I do all my compiling under Win95
then simply try to run the program under Win3.11.  Maybe I'll try compiling
under W3.11 and see what happens.

>>  >//in Win3.1 must make all listID& unique or there are problems
 
 Hm, this is a thing I do not understand. <<

There are several different windows in my program that can be opened, but not
at the same time.  Some of these windows contain listboxes.  For some strange
reason I found that unless I made sure that the listbox ID number was
different, there were problems.  Don't ask me why.

James

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:41 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G78H-00NQduC>; Thu, 25 Feb 1999 21:11:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA23550; Thu, 25 Feb 1999 20:42:03 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D5B878.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 11:40:39 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: dfa861ad4208fcff3f42ed275365bec9

Hi Tom,
Brent sent it attached as GFW code and the attachment was OK.
Dale

----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Thursday, February 25, 1999 11:14 AM
Subject: Re: [GFA] print crud


>Dale didn't get'em, Brent.  I did, somehow.  Neither was zipped.
><G>
>TomR.
>
>
>At 01:28 PM 25/02/99 -0500, you wrote:
>>The text was only 3k, except for whatever the mail system added to it.
>>
>>The GFW file was 5K, and that got through?
>>
>>huh?
>>
>>Brent.
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:24:49 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10G8GN-00NRHfC>; Thu, 25 Feb 1999 22:24:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA23725; Thu, 25 Feb 1999 21:54:10 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D5C953.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 12:52:51 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: fea7106ed260ceaed55a1acaac14f39e

Hi Brent,
Yes, the GFW code came through fine. I now have in the folder c:\gfw\BDeck
Thanks,
Dale

----- Original Message -----
From: BDD <BrentDeck@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Thursday, February 25, 1999 10:28 AM
Subject: Re: [GFA] print crud


The text was only 3k, except for whatever the mail system added to it.

The GFW file was 5K, and that got through?

huh?

Brent.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:02 1999
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GC0W-00NPiHC>; Fri, 26 Feb 1999 02:24:00 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA24137; Fri, 26 Feb 1999 01:55:09 +0100
From: Peuapeu@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D601E9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 19:48:14 EST
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 4.0 for Windows 95 sub 13
Subject: Re: [GFA] Problems Win95 --> Win3.11
X-UIDL: b9747911c3f79854dc1c65bea3173314

>> My main problem is in using the following: IF CHECK?(child|,1503) = 1
 THEN ...   If I do that (and compile that) in Win95 than Win3.11 reports an
error
 49. If I compile it under Win3.11 than it works fine. <<

I have not used the CHECK? command.  I assume you have verified that the value
of child| is the same in both cases?  Also, I do all my compiling under Win95
then simply try to run the program under Win3.11.  Maybe I'll try compiling
under W3.11 and see what happens.

>>  >//in Win3.1 must make all listID& unique or there are problems
 
 Hm, this is a thing I do not understand. <<

There are several different windows in my program that can be opened, but not
at the same time.  Some of these windows contain listboxes.  For some strange
reason I found that unless I made sure that the listbox ID number was
different, there were problems.  Don't ask me why.

James

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:03 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GC6j-00NQY4C>; Fri, 26 Feb 1999 02:30:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA24157; Fri, 26 Feb 1999 02:02:26 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D60378.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 20:02:01 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] print crud
X-UIDL: 6b91482ee486d5e3824ade3b3aad1f56

The question is, why did the 3k text message not go through?

Any ideas?

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:04 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GCCB-00NPipC>; Fri, 26 Feb 1999 02:36:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA24173; Fri, 26 Feb 1999 02:08:09 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D604D0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Feb 1999 17:06:49 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] print crud
X-UIDL: 8a5943cd8f35a5812e8fd0975ae59f7f

HI Brent,
I have no idea. Bero could probably tell us if he sees the message.
Dale

----- Original Message -----
From: BDD <BrentDeck@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Thursday, February 25, 1999 5:02 PM
Subject: Re: [GFA] print crud


The question is, why did the 3k text message not go through?

Any ideas?

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:10 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GMIX-00NQXyC>; Fri, 26 Feb 1999 13:23:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA25630; Fri, 26 Feb 1999 12:54:03 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D69C32.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Feb 1999 12:53:55 +0100
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: [GFA] DNS, TCP, IP, Winsock ?
X-UIDL: 0283658529a964c6d1e87cad25bc91e4

Hey !

	Has anyone seen an example how to send/receive LAN-Packets with GFA
?

	Michael.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:14 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GNhL-00NRHbC>; Fri, 26 Feb 1999 14:52:59 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA25872; Fri, 26 Feb 1999 14:24:21 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D6B15F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Feb 1999 09:55:53 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36D596CF.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: d4a52df90573793f97cbd16231acb715

Hi Brent!

> hfontold = hfont
> FONT HEIGHT =newheight
> FONT to hfont
> FREEFONT hfontold
> // ~deleteobject(hdc&,hfontold)    // windows api alternative 

Thanks, I will build it into the source at once! :-)

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:15 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GO5e-00NPiLC>; Fri, 26 Feb 1999 15:18:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA25938; Fri, 26 Feb 1999 14:49:21 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D6B73A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Feb 1999 09:43:07 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36D56247.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: 4c08c7174763a7724abc27ef2d9764ba

Hi Tom!

My Win95 is a Rel. b and an OEM-product, so I do not have any
directories included "deleted" Files. I do not know, what the problem
is. And after I had compiled the source on an Win3.11-machine,
everything works fine. Maybe I had used a "forbidden" commend or
something like that ... :-)

Many thanks,
yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:18 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GPPO-00NPiLC>; Fri, 26 Feb 1999 16:42:34 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA26125; Fri, 26 Feb 1999 16:12:45 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D6CAD3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Feb 1999 10:44:51 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36D5B41B.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: 589b19f0e92ee5e3b6832eb9e9d9f0ca

Hi James!

> There are several different windows in my program that can be
> opened, but not
> at the same time.  Some of these windows contain listboxes.
> For some strange
> reason I found that unless I made sure that the listbox ID number
was
> different, there were problems.  Don't ask me why.

Okay, now I understand! :-)

Many thanks
Yours

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:21 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GPdb-00NPdrC>; Fri, 26 Feb 1999 16:57:15 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA26167; Fri, 26 Feb 1999 16:27:46 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D6CE48.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Feb 1999 09:52:46 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36D58764.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: c201969fdcc01a318c990470ce071629

Hi John!

> If you really are using the variable 'child|' it's not
> surpprising that you get error 49. "Window not open"
>
> The parameter that you need to send for CHECK?() is WORD
> sized (16 bits). check| is a BYTE (8 bits)
>
> IF CHECK?(child&, 1503)

Aaaah, sh ...!
But why do the programm running on Win95 without troubles, but not
under Win3.11?

Many Thanks
Yours
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:22 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GQJD-00NRHaC>; Fri, 26 Feb 1999 17:40:15 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA26313; Fri, 26 Feb 1999 17:09:03 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D6D814.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 26 Feb 1999 08:07:49 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] WEB PAGE
X-UIDL: c796334d75aa72bd3896c88543137eb0

GFA NET and the GFAWHELP web site are back on line. The downloads are again
in operation. Some new code by Brent Deck coming soon.
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:23 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GQmX-00NRHVC>; Fri, 26 Feb 1999 18:10:33 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA26391; Fri, 26 Feb 1999 17:40:44 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D6DF7B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 26 Feb 1999 08:39:21 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] UPDATE
X-UIDL: f1bd57d72464851c85f1e255996543b3

The GFAWHELP site is up and available once again. GFA NET is also back on
line.
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:37 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GTwY-00NRHgC>; Fri, 26 Feb 1999 21:33:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA26769; Fri, 26 Feb 1999 20:35:10 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D7086F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990226193448.ZXN379@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 26 Feb 1999 19:34:48 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 26 Feb 1999 19:34:48 +0000
Subject: Re: AW: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: 8df6f400e7e36cbc0fae21bdc653e563

Thank you, Thomas.  Now we know that all .950b installs are goofy.
You said OEM, so the hiddewn dir & files wouldn't exist.  Thay are
done by an UPGRADE over an earlier release.

Agaub, Thanks.
<G>
TomR.



At 09:43 AM 26/02/99 +0100, you wrote:
>Hi Tom!
>
>My Win95 is a Rel. b and an OEM-product, so I do not have any
>directories included "deleted" Files. I do not know, what the problem
>is. And after I had compiled the source on an Win3.11-machine,
>everything works fine. Maybe I had used a "forbidden" commend or
>something like that ... :-)
>
>Many thanks,
>yours
>
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:39 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GXi5-00NOX9C>; Sat, 27 Feb 1999 01:34:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA27289; Sat, 27 Feb 1999 01:06:32 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D747E1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Feb 1999 19:05:10 -0500
Sender: BDD <BrentDeck@compuserve.com>
Cc: GFA Basic Mailing List <gfabasic@linux.net.eu.org>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Copy of: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: 093bfba4dd1c34a6c48aa3f019eb65e5

>>>>>
hfontold = hfont
FONT HEIGHT =newheight
FONT to hfont
FREEFONT hfontold
// ~deleteobject(hdc&,hfontold)    // windows api alternative 
<<<<<<<


Oops, I nearly forgot,

With some GDI objects either GFA or the GDI gets upset if 
you delete the object handle  while it is selected into a DC.

I dont recall if this is true of fonts, but just to be certain, the above 
should have read:


hfontold = hfont
FONT HEIGHT =newheight
FONT to hfont
SETFONT hfont
// ~SelectObject(hdc,hfont)  // windows API alternative
FREEFONT hfontold
// ~deleteobject(hdc&,hfontold)    // windows api alternative 


One way to find out is to get or write a resource monitor (I have one from
Lucid) and
have a look at the efffect of the above in a loop. Your resources
(available GDI handles)
should remain constant.

BRENT

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:41 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Ghk2-00NQXtC>; Sat, 27 Feb 1999 12:17:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA28508; Sat, 27 Feb 1999 11:47:44 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D7DE45.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Feb 1999 11:42:59 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: [GFA] Format a disk with GFA Basic ??

X-UIDL: 860817d215666f3bb9661d797e23017f

Does somebody ever format a disk with GFA Basic?

This only goes when the Disk was already in the correct format.
(you can write after.)

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Be careful using this example. IT FORMATs the first Track of your Floppy disk 
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

sekspur%=18,spur%=0,kopf%=0 /* change sekspur% here it won't go
for$ = ""
FOR g% = 1 TO sekspur%
  for$ = for$ + CHR$(spur%)
  for$ = for$ + CHR$(kopf%)
  for$ = for$ + CHR$(g%)
  for$ = for$ + CHR$(2)
NEXT g%
hilo(V:for$) 
~INTR($13,_AH = $5,_DL = 0,_DH = kopf%,_CH = spur%,_AL = sekspur%,_ES = hi%,_BX 
= lo%) /* do not change _DL it's the DISK 
? _FL,_AH
keyget a%

PROCEDURE hilo(adr%)
  hi% = HIWORD(adr%)
  lo% = LOWORD(adr%)
RETURN

I thing I must set the diskinformation somewhere. Maybe with the Function $9 or 
$17 of this Interrupt, but I don't got further Information.
Or must I put the bootsector with an especial function ??

Does it give an DLL function for formatting ??

You can download the whole listing on my homepage.

Help welcomed.

Regards / M.f.G.     Wilhelm Bckmann
=============================================================
Email:    Bueckmann.W@T-Online.de
Homepage: Http://home.t-online.de/home/bueckmann.w/homewb.htm



I like interrupts only on / at my Computer !!!!!



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:44 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GkJE-00NRHdC>; Sat, 27 Feb 1999 15:01:36 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA28829; Sat, 27 Feb 1999 14:33:15 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D80502.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990227133302.BHPD25438@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 27 Feb 1999 13:33:02 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Sat, 27 Feb 1999 13:33:02 +0000
Subject: Re: [GFA] Format a disk with GFA Basic ??
X-UIDL: 286ef2ccc5b66636d9e3e2b84ea8879d

Wilhelm
Have you tried shelling to DOS & using format.exe?
<G>
TomR.


At 11:42 AM 27/02/99 +0100, you wrote:
>Does somebody ever format a disk with GFA Basic?
>
>This only goes when the Disk was already in the correct format.
>(you can write after.)
>
>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>Be careful using this example. IT FORMATs the first Track of your Floppy disk 
>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
>
>sekspur%=18,spur%=0,kopf%=0 /* change sekspur% here it won't go
>for$ = ""
>FOR g% = 1 TO sekspur%
>  for$ = for$ + CHR$(spur%)
>  for$ = for$ + CHR$(kopf%)
>  for$ = for$ + CHR$(g%)
>  for$ = for$ + CHR$(2)
>NEXT g%
>hilo(V:for$) 
>~INTR($13,_AH = $5,_DL = 0,_DH = kopf%,_CH = spur%,_AL = sekspur%,_ES =
hi%,_BX 
>= lo%) /* do not change _DL it's the DISK 
>? _FL,_AH
>keyget a%
>
>PROCEDURE hilo(adr%)
>  hi% = HIWORD(adr%)
>  lo% = LOWORD(adr%)
>RETURN
>
>I thing I must set the diskinformation somewhere. Maybe with the Function
$9 or 
>$17 of this Interrupt, but I don't got further Information.
>Or must I put the bootsector with an especial function ??
>
>Does it give an DLL function for formatting ??
>
>You can download the whole listing on my homepage.
>
>Help welcomed.
>
>Regards / M.f.G.     Wilhelm Bckmann
>=============================================================
>Email:    Bueckmann.W@T-Online.de
>Homepage: Http://home.t-online.de/home/bueckmann.w/homewb.htm
>
>
>
>I like interrupts only on / at my Computer !!!!!
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:46 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GkRy-00NQdZC>; Sat, 27 Feb 1999 15:10:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA28851; Sat, 27 Feb 1999 14:42:59 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D80739.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990227134252.BJES25438@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 27 Feb 1999 13:42:52 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 27 Feb 1999 13:42:52 +0000
Subject: [GFA] goof
X-UIDL: d1415214e50283dea328ecc1df5000fd

Wilhelm
I goofed... it isn't format.exe, it is format.com.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:25:50 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GmPi-00NRHqC>; Sat, 27 Feb 1999 17:16:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA29120; Sat, 27 Feb 1999 16:48:17 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D8249A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Feb 1999 07:46:54 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] goof
X-UIDL: 89c2841b4c84ab4a96d7d365102288b6

OK, Tom, you are only allowed one goof per day.(G)  You are going to have to
tread water for the rest of the day.
Dale

----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Saturday, February 27, 1999 5:42 AM
Subject: [GFA] goof


>Wilhelm
>I goofed... it isn't format.exe, it is format.com.
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:01 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GoUc-00NQdDC>; Sat, 27 Feb 1999 19:29:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA29382; Sat, 27 Feb 1999 19:01:46 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D843E7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990227180141.DQOX25438@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 27 Feb 1999 18:01:41 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 27 Feb 1999 18:01:41 +0000
Subject: Re: [GFA] goof
X-UIDL: 9c10e34ffdb666dff29e38e8c8ed7228

Oh, hell... it's up to my nose again already!
<G>
TomR.

At 07:46 AM 27/02/99 -0800, you wrote:
>OK, Tom, you are only allowed one goof per day.(G)  You are going to have to
>tread water for the rest of the day.
>Dale
>
>----- Original Message -----
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>To: <gfabasic@aachen.linux.de>
>Sent: Saturday, February 27, 1999 5:42 AM
>Subject: [GFA] goof
>
>
>>Wilhelm
>>I goofed... it isn't format.exe, it is format.com.
>><G>
>>TomR.
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:10 1999
Return-Path: <vware@gmx.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GpWG-00NSomC>; Sat, 27 Feb 1999 20:35:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA29524; Sat, 27 Feb 1999 20:07:40 +0100
From: Georg Veichtlbauer <vware@gmx.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D85355.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Feb 1999 20:07:35 +0100 (MET)
X-Authenticated-Sender: #0000929469@gmx.net
X-Authenticated-IP: [195.3.96.74]
X-Mailer: WWW-Mail 1.02a/b (Global Message Exchange)
Subject: Re: Re: [GFA] goof
X-UIDL: 0c5c5164497ee8da0ae38e0ac08530f6

Oh no, Tom! That can't be true!
---
Sent through Global Message Exchange - http://www.gmx.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:12 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GqI7-00NQdsC>; Sat, 27 Feb 1999 21:24:51 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA29652; Sat, 27 Feb 1999 20:56:40 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D85ECF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Feb 1999 20:53:49 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: [GFA] Format Disk more Info

X-UIDL: a9c1b3c0a27375c0804e04472c9f6da9

Thanks for your help, GFA friends.

Here is some further information about the theme.

Windows 95 does accept disks with 21 sectors pro track (normal is 18). This 
is a Disk with 1720320 bytes on it. I have seen one ore two programs who are 
able to format this, but they don't work on Windows 95.  

I like to put down all my disk on my Harddisk. I don't like to copy the files, 
mostly it needs more time and also I will lose the bootsektor. So I make a Copy 
of the Disk with reading all Cluster. (I will try to zip them later) 
When I need one, I will make a new copy of it. 

I stored my Atari disks, too. Some have a format of 830K.

The function $17 of the interrupt 13 don't work on Windows95 anymore (older 
systems not testet) it gives an return code 1 = illegal functionnumber.

I tested format a: /u /t:80 /n:21,too. I got an error that the 1st sector died.

Does somebody have a good idea ? ?

Regards / M.f.G.     Wilhelm Bckmann
=============================================================
Email:    Bueckmann.W@T-Online.de
Homepage: Http://home.t-online.de/home/bueckmann.w/homewb.htm


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:13 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Gpwt-00NRHEC>; Sat, 27 Feb 1999 21:02:55 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA29581; Sat, 27 Feb 1999 20:35:01 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D859BB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990227193453.NZC28655@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 27 Feb 1999 19:34:53 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 27 Feb 1999 19:34:53 +0000
Subject: Re: Re: [GFA] goof
X-UIDL: 8d73a377d441f2261306d54280ec8312

Oh, Lordy!

It isn't Wednesday, is it?  *That* is *my* day in the barrel.

Oh, well - (hack, spit) - NEXT!

<G>
TomR.



At 08:07 PM 27/02/99 +0100, you wrote:
>Oh no, Tom! That can't be true!
>---
>Sent through Global Message Exchange - http://www.gmx.net
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:14 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GqVD-00NRHYC>; Sat, 27 Feb 1999 21:38:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA29681; Sat, 27 Feb 1999 21:08:07 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D86183.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Feb 1999 12:06:51 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: Re: [GFA] goof
X-UIDL: 267871118e07235cd01c6dc55ebbcc47

Boy, you sure are feisty today. Have a lucky night, did we?

----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Saturday, February 27, 1999 11:34 AM
Subject: Re: Re: [GFA] goof


>Oh, Lordy!
>
>It isn't Wednesday, is it?  *That* is *my* day in the barrel.
>
>Oh, well - (hack, spit) - NEXT!
>
><G>
>TomR.
>
>
>
>At 08:07 PM 27/02/99 +0100, you wrote:
>>Oh no, Tom! That can't be true!
>>---
>>Sent through Global Message Exchange - http://www.gmx.net
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:15 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Gr16-00NNjIC>; Sat, 27 Feb 1999 22:11:20 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA29772; Sat, 27 Feb 1999 21:36:46 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D86835.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990227203626.FGAW25438@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 27 Feb 1999 20:36:26 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 27 Feb 1999 20:36:26 +0000
Subject: Re: Re: [GFA] goof
X-UIDL: 885aaccc9d103924f97b86b45dadb5ea

Wishful thinkin!
18 Apr 1978, 2:05 a.m.  Last attempt at "lucky" thwarted by circumstance.
Naw, I think it's the barrel from now on.  Drat!
<G>
TomR.


At 12:06 PM 27/02/99 -0800, you wrote:
>Boy, you sure are feisty today. Have a lucky night, did we?
>
>----- Original Message -----
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>To: <gfabasic@aachen.linux.de>
>Sent: Saturday, February 27, 1999 11:34 AM
>Subject: Re: Re: [GFA] goof
>
>
>>Oh, Lordy!
>>
>>It isn't Wednesday, is it?  *That* is *my* day in the barrel.
>>
>>Oh, well - (hack, spit) - NEXT!
>>
>><G>
>>TomR.
>>
>>
>>
>>At 08:07 PM 27/02/99 +0100, you wrote:
>>>Oh no, Tom! That can't be true!
>>>---
>>>Sent through Global Message Exchange - http://www.gmx.net
>>>
>>>---
>>>This mailing list is currently running BeroList v2.5.6
>>>Report problems to bero@bero-online.ml.org
>>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:16 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10GucX-00NNiyC>; Sun, 28 Feb 1999 02:02:13 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA30232; Sun, 28 Feb 1999 01:34:15 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D89FE3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 27 Feb 1999 16:32:52 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] Photos
X-UIDL: 8d64d7cdc5406d42c54476f5cce22343

To all.
Still looking for photographs of ALL GFA programmers.
Warning! Photos currently present best viewed with dark glasses. (G)
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:17 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10H1e7-00NQZjC>; Sun, 28 Feb 1999 09:32:19 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA31318; Sun, 28 Feb 1999 09:04:43 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D90977.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990228080440.DLNG27398@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 28 Feb 1999 08:04:40 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 28 Feb 1999 08:04:40 +0000
Subject: [GFA] scaling printer fonts realistically
X-UIDL: a3bb3ec5e6513b919c296c8b64cfb00a

28/02/99 01:56:37 AM   printfnt.lst   2802xx1-

Scaling fonts to the printer modified this date by myself to achieve
printed font sizes more realistic & to take into account the fact
that many printers have a vertical resolution far greater than the
horizontal resolution.  I use GETDEVCAPS for screen & printer (the
window being printed from just may not be fullscreen <G>).

My apololgies to Craig Randall for butchering his routine _&_ my
sincere gratitude to him for showing me how in the first place.
---------------------------- cut here ----------------------------
// Printfnt.lst
'      Written 2-9-93 by Craig Randall
'      Modified 28 Feb 1999 by TomR. to achieve realistic font sizes.
'      This is an example program to show how to size output to the printer.
'      First, the user sets up his/her own fonts and printer selection using
'      standard dialog boxes.  Output is done to the screen as normal.  Then
'      output is done to the printer in the same scale relative to the
'      size of the page as the screen.

'      The reason this is necessary is that printed fonts are calculated
'      using the resolution of the printer, so that at 300 DPI (Dots per Inch),
'      a 12-point font will seem exceedingly small.

'      The scaling is done simply for example.  I leave it to the
'      programmer to decide what scaling factor is appropriate
'      for each application.
cxx& = GETDEVCAPS(HORZRES) ' what if the window isn't fullscreen? - TomR.
cyy& = GETDEVCAPS(VERTRES) ' what if the window isn't fullscreen? - TomR.
'      Set up the printer.  dc& will be returned as the handle of the
'      Device Context that was set up. (See Ref. pg 477)
DLG PRINT 1,0,dc&
'      User determines all font values.  This font is set up in memory,
'      but is not actually accessed until the FONT TO command points to it.
OPENW #1
PRINT "Choose a font.  The output to the printer"
PRINT "will size itself relative to this window."
DLG FONT 1,dc&,CF_BOTH | CF_EFFECTS,0,0,0,""

'       *  Output is sent to the screen first.
'      Set screenfont& as the handle of the font.
FONT TO screenfont&
'      Return to p% the handle of the name of the font (see Ref. pg 512).
RFONT NAME p%
'      Build output string to show "FONT - STYLE."  _EBX may return
'      Bold and/or Italic as a string.
n$ = CHAR{p%} + " - " + CHAR{_EBX} + "   " + STR$(_DX / 10)
'      Change the current font to x&
SETFONT screenfont&
'      Output the text to the screen.
TEXT 0,100,"This is a test (" + n$ + ") OK."
'      Change the font to the smallest possible readable point size
SETFONT OEM_FIXED_FONT
'      Print example text again in the new font
TEXT 0,150,"This is a test (" + n$ + ") OK."

'        *  Now, output will be sent to the printer in the same font, but
'      it must be resized to correspond to its relative screen size.  To
'      do this, we must use an API call to get the actual page size of the
'      printer.
'      The X-Y page size of the printer is returned as a four-byte value,
'      two bytes each.  This array will allow us to access each individually.
'DIM printer_x_y&(1)  ' This is wrong... should be GETDEVCAPS(HORZ/VERTRES).
TomR.
'      Make new output channel the Device Context set with the DLG PRINT
SETDC dc&
'      Get X-Y size of the printer page.  Note that in the return value
'      V: is a pointer to the array.
'~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
pxx& = GETDEVCAPS(HORZRES) ' get resolution, not page size - TomR.
pyy& = GETDEVCAPS(VERTRES) ' get resolution, not page size - TomR.

'      Get width and height of the font
RFONT  WIDTH w&,HEIGHT h&
'      Calculate new height and width for the font.
'neww& = w& * printer_x_y&(0) / _X ' what if the window isn't fullscreen? -
TomR.
'newh& = h& * printer_x_y&(1) / _X ' what if the window isn't fullscreen? -
TomR.
' What if the printer has a vert resolution different from the horz? - TomR.
neww& = w& * .55 * pxx& / cxx& ' Approximates proper size - TomR.
newh& = h& * .55 * pyy& / cyy& ' Approximates proper size - TomR.

'      Once you set a font, in order to alter it, you must set it all up
'      again with new FONT commands.
RFONT ITALIC italic&
RFONT UNDERLINE underline&
RFONT STRIKEOUT strikeout&
RFONT CHARSET charset&
RFONT CLIPPRECISION clipprecision&
RFONT QUALITY quality&
RFONT PITCH pitch&
RFONT FAMILY family&
RFONT WEIGHT weight&
RFONT ORIENTATION orientation&
RFONT ESCAPEMENT escapement&
FONT ITALIC italic&, UNDERLINE underline&, STRIKEOUT strikeout&
FONT CHARSET charset&, CLIPPRECISION clipprecision&, QUALITY quality&
FONT QUALITY quality&, PITCH pitch&, FAMILY family&, WEIGHT weight&
FONT WIDTH neww&, HEIGHT newh&, ORIENTATION orientation&, ESCAPEMENT escapement&

'   Load the new font into the handle printx&
FONT TO printfont&
'   Begin document.
STARTDOC "CHARTEST"
'   Print once using the screen font for comparison.
SETFONT screenfont&
TEXT 0,30,"This is a test (" + n$ + ") OK"
'   Use the Printer font.
SETFONT printfont&
TEXT 0,100,"This is a test (" + n$ + ") OK"
'   Use a fixed font for comparison.
SETFONT OEM_FIXED_FONT
TEXT 0,10,"This is a Test( Fixed Font )OK"
'   Free up memory resources (Recommended for efficiency).
FREEFONT screenfont&
FREEFONT printfont&
NEW FRAME
'   End document and send it to the Print Manager.
ENDDOC
'   Return output back to the screen.
SETDC _DC(1)
'   Free up Device Context (Recommended for efficiency).
FREEDC dc&
MESSAGE "Press to end program.","GFA-BASIC",MB_OK,a

CLOSEW #1


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Feb 28 19:26:18 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10H7Fw-00NNiyC>; Sun, 28 Feb 1999 15:31:44 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA31986; Sun, 28 Feb 1999 15:03:18 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D95D9F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 28 Feb 1999 09:02:56 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Debug Window!
X-UIDL: fbc2ea6130664327880e68eda3f1abe6

All,

If like me you use the GFA DEBUG window a lot you can improve things by
changing the window's appearance/fuctionality if you have Borlands Resource
Workshop.

Things like; resizable window, wider static text windows so you can view
larger strings; [try viewing a$ when a$ = BIN$(myvar%, 32)] make the debug
variable window taller so there's not so much scrolling searching for
variables, etc,

Make a copy of GFAWin first though in case you screw up! <G>

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:26 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HFd1-00NPjAC>; Mon, 1 Mar 1999 00:28:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA00279; Sun, 28 Feb 1999 23:59:08 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D9DB27.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 28 Feb 1999 17:57:45 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] scaling printer fonts realistically
X-UIDL: 4484e9838dfbcf54a2e397a7d1cb6341

>>>
pxx& = GETDEVCAPS(HORZRES) ' get resolution, not page size - TomR.
pyy& = GETDEVCAPS(VERTRES) ' get resolution, not page size - TomR.

neww& = w& * .55 * pxx& / cxx& ' Approximates proper size - TomR.
newh& = h& * .55 * pyy& / cyy& ' Approximates proper size - TomR.
<<<<<<


Tom:

Unfurtunately, HORZREZ and VERTREZ   do return the pages size, in pixels,
and not the resolution of the device.

Following function is exact, but adjusting the width is only necessary if
you do not use the default of 0.

Brent.



FUNCTION  MakeFont(pdc&, points, VAR printfont&)  // uses current DC & data
in gfa font buffer
  LOCAL ch&,cw&,ph&,pw&,syppi&,sxppi&,pxppi&,pyppi&,olddc&
  // converts font data to a printer font of size 'points' for display on
device dc&
  // Works even if user has manually adjusted the screen font to a wider
width than default 0.
  // Generally current width cw& & printer width pw& will be 0,

  olddc& = _DC()   // must be dc of current FONT if font width > 0

  syppi& = GETDEVCAPS(90) // get vertical pixels/"logical inch"  for
current DC
  sxppi& = GETDEVCAPS(88) // get horizntl pixels/"logical inch"  for
current DC

  SETDC pdc&   // set printer dc

  pyppi& = GETDEVCAPS(90) // get vertical pixels/"logical inch"  for
current DC
  pxppi& = GETDEVCAPS(88) // get horizntl pixels/"logical inch"  for
current DC
  pntsperinch = 650 // 650 = 65 pts/inch
  RFONT HEIGHT ch&, WIDTH cw&   // find current height and width in buffer

  ph& = pyppi& * points / pntsperinch  // calculate printer interline
height in pixels
  pw& = ph& * cw& / ch& * syppi& / sxppi& * pxppi& / pyppi& // generally
will be 0 =default

  FONT WIDTH pw& * 1.2, HEIGHT ph& * 1.2 // factor to increase font size at
given line spacing
  FONT TO printfont&  // same as API createfont() , font iscreated, but not
yet selected

  SETDC olddc&
  RETURN ph&
ENDFUNC

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:27 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HGn9-00NRHHC>; Mon, 1 Mar 1999 01:42:39 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA00436; Mon, 1 Mar 1999 01:14:17 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D9ECBE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990301001407.CHLU28864@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 1 Mar 1999 00:14:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 1 Mar 1999 00:14:07 +0000
Subject: [GFA] printing, fonts, etc.
X-UIDL: 9588e3501bcd75a9f938d61c30005dec

pxx& = GETDEVCAPS(LOGPIXELSX) ' get resolution, not page size - TomR.
pyy& = GETDEVCAPS(LOGPIXELSY) ' get resolution, not page size - TomR.

neww& = w& * 3.5 * cxx& / pxx& ' Approximates proper size - TomR.
newh& = h& * 3.5 * cyy& / pyy& ' Approximates proper size - TomR.

I stand, pouting, in the corner, thumb in mouth, corrected!

Victim once again of idiotic misnomenclature.  LOGPIXELSX & HORZRES are
switched to my way of thinking.  The 4 lines above yield font sizes that
are within a very few points (or whatever!) of the correct size.  I no
longer have a scale with points, picas, etc., on it but to me, I recall
10-point ARIAL as being approximately 1/10 inch high & 12-point as being
approximately 1/8 inch high.  Adjusting that "3.5" in the 3rd & 4th lines
fine-tunes the actual height rendered on paper.

Brent - I get no flicker or flash - each window comes to top as it should
without any noticeable discrepancies or unpleasantries, but in light of
my glaring error (corrected above), you may wish to have somebody else
take a look at your situation.

<S> (shame, not smile)
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:28 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HH4j-00NQdUC>; Mon, 1 Mar 1999 02:00:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA00484; Mon, 1 Mar 1999 01:33:02 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D9F115.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 28 Feb 1999 19:32:48 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] printing, fonts, etc.
X-UIDL: 5c5ebc70366cb75e96a88e0588f48ef6

>>>
 LOGPIXELSX & HORZRES are switched to my way of thinking.
<<<<

Cousin Bill does take liberties with the English language, does he not ?

>>>>
Brent - I get no flicker or flash - each window comes to top as it should
without any noticeable discrepancies or unpleasantries, but in light of
my glaring error (corrected above), you may wish to have somebody else
take a look at your situation.
<<<<

Thanks for the help. Sooner or later I'll have to upgrade to 95. Finding
space in the cabinet for 
another harddrive is not as easy as one would think.

Best Regards
Brent.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:29 1999
Return-Path: <Peuapeu@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HHsw-00NRHbC>; Mon, 1 Mar 1999 02:52:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA00609; Mon, 1 Mar 1999 02:23:59 +0100
From: Peuapeu@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36D9FD0C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 28 Feb 1999 20:22:44 EST
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 4.0 for Windows 95 sub 13
Subject: [GFA] Bizarre Windows Behavior
X-UIDL: a7ff57e57d263b8c16715d87de4435da

One reason I continue to dislike Windows (compared to the MacOS) is that every
once in a while I have to spend  time dealing with bizarre problems like this:

A few days ago, a new customer reported behavior that suggested to me that his
system was producing spurious events or simply doesn't like GFABASIC.  On his
system, my splashscreen window is opening prematurely and/or not closing when
it should.  I added some statements to my program to show when it accesses
certain routines and sent it to the customer to run.

On "my" W95 system, the revised code produces the following EXPECTED output:

displayFAQWind gActiveWind& = 0
btnFAQOK gActiveWind& = 0
displaySplashWind gActiveWind& = 0
etc.

Notice that the routine that opens the splash screen does not run until the
btnFAQOK routine is executed.  The btnFAQOK routine is only run when the user
clicks the OK button in the FAQ window.  That routine closes the FAQ window
then calls the routine that displays the splash screen.

On the customer's system, however, we get the following output:

displayFAQWind gActiveWind& = 0
displaySplashWind gActiveWind& = 0
dialogSplashWind gActiveWind& = 0
refreshSplashWind gActiveWind& = 0
displaySplashWind gActiveWind& = 0
dialogSplashWind gActiveWind& = 0
refreshSplashWind gActiveWind& = 0
displaySplashWind gActiveWind& = 0
displaySplashWind gActiveWind& = 0
dialogSplashWind gActiveWind& = 0
dialogSplashWind gActiveWind& = 0
dialogSplashWind gActiveWind& = 0
etc.

In other words, the displaySplashWindow routine is being excuted WITHOUT going
through the intermediate routine and looking at the code there is no physical
way this can happen ... NONE WHATSOEVER.  Furthermore, the displaySplashWindow
is being spuriously executed over and over.  Something is really amiss and I
don't think it is my code.  Let me point out that my application is currently
working CORRECTLY on nearly 300 other Windows 3.11, 95 and 98 computer
systems.  Noone is or has ever reported this problem.  In fact, the problem is
so severe that it renders my code unusable so I'm sure the other customers
would have complained.

The customer's computer is a 300 MHz Pentium II non-brand name CLONE with
preinstalled W95.  The CLONE part concerns me.  Is this likely to be some sort
of problem with his bios or hardware ... if so, then why doesn't the customer
have problems with other software (at least that is what he says)?  Am I
wasting my time trying to figure out what is going on here?  Have others
encountered problems of this sort with clones when using GFABASIC?  Is this a
GFABASIC bug?

A while back, I had to refund another potential customer's purchase because
his system would mysteriously crash on one of the first statements executed in
my application (the statement that opens the file where I output "monitoring"
statements like those listed above).  Testing with a tiny program that
produced the same crash on his system revealed that it had "something" to do
with string addition ... yet no other computer has had problems of that sort
with my application, neither I nor several gurus that I contacted could get
the tiny program to crash, and none of the gurus on this forum or elsewhere
could see anything wrong with the tiny program's code.  Again, I was left with
the conclusion that some computers simply do not like GFABasic.  This one, by
the way, was a GATEWAY with pre-installed W95. 

The current customer really wants my program (because there is nothing else
like it on the market) so I really hate to have to tell him "Sorry ... but
that's what you get for buying a PC".  But it looks like that is what I'm
going to have to do .... unless someone out there has an idea.

Comments?

James Schumacher
peuapeu@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:30 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HIe4-00NQZNC>; Mon, 1 Mar 1999 03:41:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA00751; Mon, 1 Mar 1999 03:13:51 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DA08B6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990301021347.CUZL11177@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 1 Mar 1999 02:13:47 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 1 Mar 1999 02:13:47 +0000
Subject: Re: [GFA] Bizarre Windows Behavior
X-UIDL: f2429291a6dda13df4dacc0d533826cf

James

I'm gonna get jumped on again, but...

It surprises me that a Gateway would present the problem.  They are pretty
reputable, as manufacturers & I suspect that their BIOS would be relatively
close to the IBM.  It *is* a BIOS problem, I believe.

To "spit" when you say "clone" means you'll do a lot of spitting since _ALL_
PCs that don't bear the name of IBM are "clones".

Sounds sort of like you might have a version of GFA for the Mac?  *Those* have
their problems, also.

Perhaps you can convince your customers to switch O/S... like Linux or FreeBSD?

Find out precisely what version of Win95 is having the trouble.  I don't know,
but would imagine it's 4.00.950b.  If Win98, it's an over-95 upgrade.

<G>
TomR.


At 08:22 PM 28/02/99 EST, you wrote:
>One reason I continue to dislike Windows (compared to the MacOS) is that every
>once in a while I have to spend  time dealing with bizarre problems like this:
>
>A few days ago, a new customer reported behavior that suggested to me that his
>system was producing spurious events or simply doesn't like GFABASIC.  On his
>system, my splashscreen window is opening prematurely and/or not closing when
>it should.  I added some statements to my program to show when it accesses
>certain routines and sent it to the customer to run.
>
>On "my" W95 system, the revised code produces the following EXPECTED output:
>
>displayFAQWind gActiveWind& = 0
>btnFAQOK gActiveWind& = 0
>displaySplashWind gActiveWind& = 0
>etc.
>
>Notice that the routine that opens the splash screen does not run until the
>btnFAQOK routine is executed.  The btnFAQOK routine is only run when the user
>clicks the OK button in the FAQ window.  That routine closes the FAQ window
>then calls the routine that displays the splash screen.
>
>On the customer's system, however, we get the following output:
>
>displayFAQWind gActiveWind& = 0
>displaySplashWind gActiveWind& = 0
>dialogSplashWind gActiveWind& = 0
>refreshSplashWind gActiveWind& = 0
>displaySplashWind gActiveWind& = 0
>dialogSplashWind gActiveWind& = 0
>refreshSplashWind gActiveWind& = 0
>displaySplashWind gActiveWind& = 0
>displaySplashWind gActiveWind& = 0
>dialogSplashWind gActiveWind& = 0
>dialogSplashWind gActiveWind& = 0
>dialogSplashWind gActiveWind& = 0
>etc.
>
>In other words, the displaySplashWindow routine is being excuted WITHOUT going
>through the intermediate routine and looking at the code there is no physical
>way this can happen ... NONE WHATSOEVER.  Furthermore, the displaySplashWindow
>is being spuriously executed over and over.  Something is really amiss and I
>don't think it is my code.  Let me point out that my application is currently
>working CORRECTLY on nearly 300 other Windows 3.11, 95 and 98 computer
>systems.  Noone is or has ever reported this problem.  In fact, the problem is
>so severe that it renders my code unusable so I'm sure the other customers
>would have complained.
>
>The customer's computer is a 300 MHz Pentium II non-brand name CLONE with
>preinstalled W95.  The CLONE part concerns me.  Is this likely to be some sort
>of problem with his bios or hardware ... if so, then why doesn't the customer
>have problems with other software (at least that is what he says)?  Am I
>wasting my time trying to figure out what is going on here?  Have others
>encountered problems of this sort with clones when using GFABASIC?  Is this a
>GFABASIC bug?
>
>A while back, I had to refund another potential customer's purchase because
>his system would mysteriously crash on one of the first statements executed in
>my application (the statement that opens the file where I output "monitoring"
>statements like those listed above).  Testing with a tiny program that
>produced the same crash on his system revealed that it had "something" to do
>with string addition ... yet no other computer has had problems of that sort
>with my application, neither I nor several gurus that I contacted could get
>the tiny program to crash, and none of the gurus on this forum or elsewhere
>could see anything wrong with the tiny program's code.  Again, I was left with
>the conclusion that some computers simply do not like GFABasic.  This one, by
>the way, was a GATEWAY with pre-installed W95. 
>
>The current customer really wants my program (because there is nothing else
>like it on the market) so I really hate to have to tell him "Sorry ... but
>that's what you get for buying a PC".  But it looks like that is what I'm
>going to have to do .... unless someone out there has an idea.
>
>Comments?
>
>James Schumacher
>peuapeu@aol.com
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:31 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HIdv-00NPixC>; Mon, 1 Mar 1999 03:41:15 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA00748; Mon, 1 Mar 1999 03:13:47 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DA08B2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990301021340.CUYI11177@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 1 Mar 1999 02:13:40 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 1 Mar 1999 02:13:40 +0000
Subject: Re: [GFA] printing, fonts, etc.
X-UIDL: fc4a9ed6f43ce77eecdbf0e0067923d7

A 10Gb drive is smaller than a 1.2M floppy.  At least thru 5.1Gb is the
same size as the smaller drives.
<G>
TomR.


At 07:32 PM 28/02/99 -0500, you wrote:
>>>>
> LOGPIXELSX & HORZRES are switched to my way of thinking.
><<<<
>
>Cousin Bill does take liberties with the English language, does he not ?
>
>>>>>
>Brent - I get no flicker or flash - each window comes to top as it should
>without any noticeable discrepancies or unpleasantries, but in light of
>my glaring error (corrected above), you may wish to have somebody else
>take a look at your situation.
><<<<
>
>Thanks for the help. Sooner or later I'll have to upgrade to 95. Finding
>space in the cabinet for 
>another harddrive is not as easy as one would think.
>
>Best Regards
>Brent.
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:32 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HOXW-00NRHiC>; Mon, 1 Mar 1999 09:59:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA01552; Mon, 1 Mar 1999 09:42:38 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DA642A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Mar 1999 03:42:18 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Bizarre Windows Behavior
X-UIDL: f182aca073eed3e3c54b67f5c613dd91

James,

I have no suggestions but would be willing to try and run 'the tiny
program' and see if that causes a problem on 'my' system. At least if you
find someone who can reproduce the problem you stand a good chance of
fixing it.

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:35 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HR9u-00NRHXC>; Mon, 1 Mar 1999 12:46:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA02006; Mon, 1 Mar 1999 12:29:07 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DA8B3C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Mar 1999 06:28:40 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] scaling printer fonts realistically
X-UIDL: 2df1e9e6bcd93d0b98ef3a2c5d50b97d

The only way in which my function seemed to me exact was in scaling new
width to new height. Calculating the height
is something I know nothing about. The Points returned by the font selector
describe the line spacing, not the
height of the characters. I arbitrarily multiplied the resulting character
heights & widths by 1.2 to eliminate some 
excess white space.

Furthermore, the exactness of he computation is in question, because
certian compile options (-0 -1) can affect
the way the compiler performs integer division.

As a precautiion I changedd all variables in the computation to floats.


Best regards.



 
FUNCTION  MakeFont(pdc&, points, VAR printfont&)  // uses current DC & data
in gfa font buffer
  LOCAL ch,cw,ph&,pw&,syppi,sxppi,pxppi,pyppi,olddc&
  // converts font data to a printer font of size 'points' for display on
device dc&
  // Works even if user has manually adjusted the screen font to a wider
width than default 0.
  // Generally current width cw& & printer width pw& will be 0,

  olddc& = _DC()   // must be dc of current FONT if font width > 0

  syppi = GETDEVCAPS(90) // get vertical pixels/"logical inch"  for current
DC
  sxppi = GETDEVCAPS(88) // get horizntl pixels/"logical inch"  for current
DC

  SETDC pdc&   // set printer dc

  pyppi = GETDEVCAPS(90) // get vertical pixels/"logical inch"  for current
DC
  pxppi = GETDEVCAPS(88) // get horizntl pixels/"logical inch"  for current
DC
  pntsperinch = 650 // 650 = 65 pts/inch
  RFONT HEIGHT ch, WIDTH cw   // find current height and width in buffer

  ph& = pyppi * points / pntsperinch  // calculate printer interline height
in pixels
  // use float variables so compiler options -0 , -1 do not generate
computation error.
  pw& = ROUND(ph& * cw / ch * syppi / sxppi * pxppi / pyppi )   //  default
is 0

  FONT WIDTH pw& * 1.2, HEIGHT ph& * 1.2 // factor to increase font size at
given line spacing
  FONT TO printfont&  // same as API createfont() , font iscreated, but not
yet selected

  SETDC olddc&
  RETURN ph&
ENDFUNC

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 01 20:19:39 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HVfy-00NPh9C>; Mon, 1 Mar 1999 17:36:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA02530; Mon, 1 Mar 1999 17:15:13 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DACE96.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 1 Mar 1999 09:11:47 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36D747E1.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: Copy of: AW: [GFA] Problems Win95 --> Win3.11
X-UIDL: 87ea2d630c40d744a62fcbf3550aec4d

Hi Brent!

> Oops, I nearly forgot,

Never mind! :-)

Thanks, Yours
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 02 19:59:44 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HYW8-00NPh0C>; Mon, 1 Mar 1999 20:38:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA02901; Mon, 1 Mar 1999 20:21:11 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DAF9D7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Mon, 01 Mar 1999 13:42:36 -0100
In-Reply-To: <36D85ECF.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] Format Disk more Info
X-UIDL: c59e07cdd01aaa2a6fb638dc873b7957

At 20:53 27.02.1999 +0100, you wrote:

>Windows 95 does accept disks with 21 sectors pro track (normal is 18). This 
>is a Disk with 1720320 bytes on it. [...]
>
>The function $17 of the interrupt 13 don't work on Windows95 anymore (older 
>systems not testet) it gives an return code 1 = illegal functionnumber.
>
>I tested format a: /u /t:80 /n:21,too. I got an error that the 1st sector died.

Did You use the new disk lock funktions before? (see example below)

Bye, Roland


FUNCTION VolumeLock(Drive|) 'Win95/MS DOS 7.0 only
  'Lock a logical drive
  'Parameter Drive|: Current drive = 0, "A:"=1, "B:"=2, "C:"=3 ...
  'If error carry flag _FL <> 0
  'and _AX contains an error number
  'To format a drive You have to make a "level zero locking".
  'For this You must lock two times and second time with _DX=4
  ' Interrupt $21,_AX = $440D,_CL= $4A,_CH=$08 'lock logical drive
  ' _BL = Drive|            '0=default drive, 1=A:, 2=B:, 3=C:, 4=D: ...
  ' _BH = 0                 'Lock Level Zero ($00-$03)
  ' _DX = Permission   'Bit 0 = allow writes, Bit 1: disallow new file mappings,
  '                     Bit 2: volume locked for formatting
  '
  ~INTR($21,_AX = $440D,_CL= $4A,_CH = $08,_BL = Drive|,_BH=0,_DX =3)
  RETURN _AX
ENDFUNC
'
FUNCTION VolumeUnlock(Drive|) 'Win95/MS DOS 7.0 only
  'Unlock a logical drive
  'If error the Carry Flag is  _FL  <> 0
  'and _AX contains an error number.
  '
  ' Interrupt $21,_AX = $440D,_CL= $6A, _CH = $08
  ' _BL = Drive|   '0=default drive, 1=A:, 2=B:, 3=C:, 4=D: and so on
  '
  ~INTR($21,_AX = $440D,_BL=Drive|,_CL= $6A,_CH=$08)
  RETURN _AX
ENDFUNC
'
FUNCTION VolumeGetLockLevel(Drive|) 'Win95/MS DOS 7.0 only
  'retrieves the locl kevel of a specified drive
  '
  ' Interrupt $21,_AX = $440D,_CL= $70, _CH = $08
  ' _BL = Drive|  '0=default drive, 1=A:, 2=B:, 3=C:, 4=D: ...
  '
  ~INTR($21,_AX = $440D,_BL=Drive|,_CL= $70,_CH=$08)
  RETURN _AX 'Level 0, 1, 2 or 3. If the volume is not locked, _AX contains  - 1 (65535)
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 02 19:59:54 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HdtQ-00NQZfC>; Tue, 2 Mar 1999 02:22:40 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA03550; Tue, 2 Mar 1999 02:07:12 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DB4AAB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 1 Mar 1999 17:00:59 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] New Letter
X-UIDL: 861edc5fd07aa32e8f5f4676341587dc

Hi,
If you are on the mailing list maybe you would like to subscribe to the 'Not
Affiliated With GFA' news letter. The news letter is sent every Monday
conditions permitting. To subscribe send a email message to
adbryant@gfa.net
with SUBSCRIBE in the subject field.
Thanks for reading.
Dale Bryant

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 02 22:45:28 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Hv2b-00NSTAC>; Tue, 2 Mar 1999 20:41:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA05752; Tue, 2 Mar 1999 20:23:45 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DC4BD3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 2 Mar 1999 11:22:17 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] FEMALES
X-UIDL: 192078e8676dd619e72a3fa48ea1d9ab

Russell Hayward and I were just emailing about the fact there isn't any
women on the mail list. It makes one kind of sad. I can't imagine anyone on
the mail list giving them a bad time. If they are any it would be great if
they would come forward. I  certainly extend my welcome to them all.

Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:13 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Hx0g-00NSU3C>; Tue, 2 Mar 1999 22:47:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA06002; Tue, 2 Mar 1999 22:32:21 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DC69C6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Mar 1999 16:31:40 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] FEMALES
X-UIDL: 08dddf8499709ec9ac25472d87eaf035

Women are too practical to get involved with a software company that goes 4
years between product updates.

We're hooked.

Brent.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:14 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10HxEr-00NNiSC>; Tue, 2 Mar 1999 23:02:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA06041; Tue, 2 Mar 1999 22:46:56 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DC6D28.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Mar 1999 13:45:24 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] FEMALES
X-UIDL: d58c4343d1e0893ed9ef38aa733d1f92

HI Brent,
I think you are probably right.  We just don't know when to stop.  However,
I know there are good women programmers out there somewhere.  Perhaps some
will come forward.
Dale
WHERE IS YOUR PHOTO???

----- Original Message -----
From: BDD <BrentDeck@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Tuesday, March 02, 1999 1:31 PM
Subject: [GFA] FEMALES


Women are too practical to get involved with a software company that goes 4
years between product updates.

We're hooked.

Brent.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:15 1999
Return-Path: <Jounet@village.uunet.be>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Hz4v-00NSpGC>; Wed, 3 Mar 1999 00:59:57 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA06288; Wed, 3 Mar 1999 00:43:35 +0100
From: "Joris Van de Velde" <Jounet@village.uunet.be>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DC8883.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Wed, 3 Mar 1999 00:41:29 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] Re: One question to all...
X-UIDL: a6e1142b7c3fc0b98f1a2ca9a66e426b


-----Original Message-----
From: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
To: Joris Van de Velde <Jounet@village.uunet.be>
Date: maandag 22 februari 1999 19:14


Hello,
you have successfully subscribed to the mailing list
gfabasic@bero-online.ml.org.
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org


Hello you...

The bellow written questions I already send...
I didn't receive any answer... am I doing something wrong ( I'm a bit new on
PC, always worked on the
Atari... without a modem). If not can you please let me how this message
must be send to all members.


Question :
I wont to program a sound-filter (for wav) which can be used like a
bandpass-filter.
The centerfrequency should be changed between 1 and 20000. The use
of very low frequencies is needed for volume-filtering. A variable Q-factor
would be nice.
All this must be graphically shown and editable (this doesn't have to be
part of the answer).

So who can help me with this, I prefer program-code in GFA-basic.

Thanks for any help.

Jounet@village.uunet.be



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:16 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Hzed-00NSpSC>; Wed, 3 Mar 1999 01:36:51 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA06392; Wed, 3 Mar 1999 01:22:06 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DC9187.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990303002203.IDHU11420@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 3 Mar 1999 00:22:03 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 3 Mar 1999 00:22:03 +0000
Subject: [GFA] scroll/spinbuttons
X-UIDL: 06669ef5f12d2cb6835e3956e11628ff

Hey

Somewhere I've seen a color selector that uses 3 scrollbars to set color
components.  I've lost track of it.

When I suffered a HD crash due to BO a while back, I lost access to a
dialog I had worked out with 3 spinbuttons that really worked.  I don't
want to utilize the spin control in Win95 - it must be O/S independent
so Win31 can see & use them.

If anybody has the file I mention above, please send a copy directly to me.

Thanks.
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:17 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Hzkr-00NSpjC>; Wed, 3 Mar 1999 01:43:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA06410; Wed, 3 Mar 1999 01:28:31 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DC9308.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990303002824.IGER11420@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 3 Mar 1999 00:28:24 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 3 Mar 1999 00:28:24 +0000
Subject: Re: [GFA] Re: One question to all...
X-UIDL: 50e8ef7cc94d3fb731d5ccd8f76a2dfc

Joris
You are getting your msgs out just fine.  If you wish to self-check
this, put *your* adrs in the BCC - this will assure you that you
will get 2 copies - 1 directly & the 2nd from the list.

As for the filter situation, I regret that I've been away from
that sort of thing too many years to be of any assistance.

Welcome to our little world.
<G>
TomR.



At 12:41 AM 03/03/99 +0100, you wrote:
>
>-----Original Message-----
>From: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>To: Joris Van de Velde <Jounet@village.uunet.be>
>Date: maandag 22 februari 1999 19:14
>
>
>Hello,
>you have successfully subscribed to the mailing list
>gfabasic@bero-online.ml.org.
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>Hello you...
>
>The bellow written questions I already send...
>I didn't receive any answer... am I doing something wrong ( I'm a bit new on
>PC, always worked on the
>Atari... without a modem). If not can you please let me how this message
>must be send to all members.
>
>
>Question :
>I wont to program a sound-filter (for wav) which can be used like a
>bandpass-filter.
>The centerfrequency should be changed between 1 and 20000. The use
>of very low frequencies is needed for volume-filtering. A variable Q-factor
>would be nice.
>All this must be graphically shown and editable (this doesn't have to be
>part of the answer).
>
>So who can help me with this, I prefer program-code in GFA-basic.
>
>Thanks for any help.
>
>Jounet@village.uunet.be
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:18 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Hzod-00NSpGC>; Wed, 3 Mar 1999 01:47:11 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA06431; Wed, 3 Mar 1999 01:32:24 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DC93F1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 2 Mar 1999 16:29:00 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Re: One question to all...
X-UIDL: f95fb60f021b436b2120b8275cbf64f5

Hi Jons,
Your message came through to the list just fine.
Dale

----- Original Message -----
From: Joris Van de Velde <Jounet@village.uunet.be>
To: <gfabasic@aachen.linux.de>
Sent: Tuesday, March 02, 1999 3:41 PM
Subject: [GFA] Re: One question to all...


>
>-----Original Message-----
>From: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>To: Joris Van de Velde <Jounet@village.uunet.be>
>Date: maandag 22 februari 1999 19:14
>
>
>Hello,
>you have successfully subscribed to the mailing list
>gfabasic@bero-online.ml.org.
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>Hello you...
>
>The bellow written questions I already send...
>I didn't receive any answer... am I doing something wrong ( I'm a bit new
on
>PC, always worked on the
>Atari... without a modem). If not can you please let me how this message
>must be send to all members.
>
>
>Question :
>I wont to program a sound-filter (for wav) which can be used like a
>bandpass-filter.
>The centerfrequency should be changed between 1 and 20000. The use
>of very low frequencies is needed for volume-filtering. A variable Q-factor
>would be nice.
>All this must be graphically shown and editable (this doesn't have to be
>part of the answer).
>
>So who can help me with this, I prefer program-code in GFA-basic.
>
>Thanks for any help.
>
>Jounet@village.uunet.be
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:19 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10I1ph-00NSpIC>; Wed, 3 Mar 1999 03:56:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA06707; Wed, 3 Mar 1999 03:33:46 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DCB066.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Mar 1999 02:31:48 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] scroll/spinbuttons
X-UIDL: ee7769c8d5e441c28eb48bb2bed169e6

Hi Tom,

I don't know if this is what you meant but the handle of the clicked on
scrollbar when you get a WM_VSCROLL or WM_HSCROLL message
is in the HIWORD of the lParam.

PROCEDURE evalmsg(hwnd&,mess&,wpar&,lpar%)
  IF mess&=WM_VSCROLL
    d&=0
    IF wpar&=SB_LINEDOWN THEN d&=-1
    IF wpar&=SB_LINEUP THEN d&=1
    IF d&
      IF HIWORD(lpar%)=scrollhandle1&
        b&=edithandle1&
      ELSE IF HIWORD(lpar%)=scrollhandle2&
        b&=edithandle2&
      ELSE IF HIWORD(lpar%)=scrollhandle3&
        b&=edithandle3&
      ENDIF
      ednum&=VAL(_WIN$(b&))
      ednum&+=d&
      _WIN$(b&)=STR$(ednum&)
    ENDIF
  ENDIF
RETURN

I'm sorry if I've got the wrong end of the stick.

Something else in your message surprised me, there's a spin button control? I've
never heard of this, how do you use it from GFA Basic?

Thanks,
Russell Hayward

Website:     http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub

-----Original Message-----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: 03 March 1999 12:41am
Subject: [GFA] scroll/spinbuttons


>Hey
>
>Somewhere I've seen a color selector that uses 3 scrollbars to set color
>components.  I've lost track of it.
>
>When I suffered a HD crash due to BO a while back, I lost access to a
>dialog I had worked out with 3 spinbuttons that really worked.  I don't
>want to utilize the spin control in Win95 - it must be O/S independent
>so Win31 can see & use them.
>
>If anybody has the file I mention above, please send a copy directly to me.
>
>Thanks.
><G>
>TomR.
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:21 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10I317-00NPdtC>; Wed, 3 Mar 1999 05:12:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA06879; Wed, 3 Mar 1999 04:52:15 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DCC2C9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990303035204.DLYZ5406@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 3 Mar 1999 03:52:04 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 3 Mar 1999 03:52:04 +0000
Subject: Re: [GFA] scroll/spinbuttons
X-UIDL: 678312e6f97e9b3f6d33e426d59a6660

Hey, Russell
Thanks for the comeback.  Will try your goodie.
Will zip spinbuttons & send direct... have several.
<G>
TomR.


At 02:31 AM 03/03/99 -0000, you wrote:
>Hi Tom,
>
>I don't know if this is what you meant but the handle of the clicked on
>scrollbar when you get a WM_VSCROLL or WM_HSCROLL message
>is in the HIWORD of the lParam.
>
>PROCEDURE evalmsg(hwnd&,mess&,wpar&,lpar%)
>  IF mess&=WM_VSCROLL
>    d&=0
>    IF wpar&=SB_LINEDOWN THEN d&=-1
>    IF wpar&=SB_LINEUP THEN d&=1
>    IF d&
>      IF HIWORD(lpar%)=scrollhandle1&
>        b&=edithandle1&
>      ELSE IF HIWORD(lpar%)=scrollhandle2&
>        b&=edithandle2&
>      ELSE IF HIWORD(lpar%)=scrollhandle3&
>        b&=edithandle3&
>      ENDIF
>      ednum&=VAL(_WIN$(b&))
>      ednum&+=d&
>      _WIN$(b&)=STR$(ednum&)
>    ENDIF
>  ENDIF
>RETURN
>
>I'm sorry if I've got the wrong end of the stick.
>
>Something else in your message surprised me, there's a spin button control?
I've
>never heard of this, how do you use it from GFA Basic?
>
>Thanks,
>Russell Hayward
>
>Website:     http://www.baphead.freeserve.co.uk/
>
>The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub
>
>-----Original Message-----
>From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
>To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>Date: 03 March 1999 12:41am
>Subject: [GFA] scroll/spinbuttons
>
>
>>Hey
>>
>>Somewhere I've seen a color selector that uses 3 scrollbars to set color
>>components.  I've lost track of it.
>>
>>When I suffered a HD crash due to BO a while back, I lost access to a
>>dialog I had worked out with 3 spinbuttons that really worked.  I don't
>>want to utilize the spin control in Win95 - it must be O/S independent
>>so Win31 can see & use them.
>>
>>If anybody has the file I mention above, please send a copy directly to me.
>>
>>Thanks.
>><G>
>>TomR.
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:23 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10I61r-00NSTkC>; Wed, 3 Mar 1999 08:25:15 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA07318; Wed, 3 Mar 1999 08:08:47 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DCF0DB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990303070840.FOYL5406@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 3 Mar 1999 07:08:40 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 3 Mar 1999 07:08:40 +0000
Subject: [GFA] Get some printer info...
X-UIDL: 2b9db0c21faff08e8ee70aa6005e2018

' workout.lst  TomR.  3 Mar 1999
TITLEW #1, " Get some printer info...        <any key> to close me"
OPENW #1,0,0,500,400,16

DLG PRINT WIN(1),PD_ALLPAGES,Pdc&
'Pdc& = PrinterDC() // next lines don't work w/ this
lpdevnamebuffer% = GlobalLock(_DI)
~GlobalFree(lpdevnamebuffer%)
SETDC Pdc&
IF Pdc&
  cxmax& = GETDEVCAPS(HORZRES)
  cymax& = GETDEVCAPS(VERTRES)
  cxdpi& = GETDEVCAPS(LOGPIXELSX)
  cydpi& = GETDEVCAPS(LOGPIXELSY)
  ~Escape(Pdc&,GETPHYSPAGESIZE,0,0,V:pxymax%)  // gives bigger page than
devcaps(10)
  pxmax& = LOWORD(pxymax%) // get printer maximum horizontal pixels
  pymax& = HIWORD(pxymax%) // get printer maximum vertical pixels
  FREEDC dc&
ENDIF
SETDC _DC(1)
'ps2$ = "Device   =  " + CHAR{lpdevnamebuffer% + 8} + "  on  " +
CHAR{lpdevnamebuffer% + 28}
ps2$ = " Device   =  " + CHAR{lpdevnamebuffer% + 8}
PRINT ps2$
PRINT " BJC built-in margins: T = 0.12, L = 0.25, R = 0.26, B = 0.5  (inches)."
PRINT " Fixed margins: T = ";STR$(INT(cydpi& * .12));", L =
";STR$(INT(cxdpi& * .25));", R = ";STR$(INT(cxdpi& * .26));", B =
";STR$(INT(cydpi& * .5));"  (pixels)"
PRINT " Donno how to read the margins, so took'em from the manual."
PRINT " Printer ID doesn't work from 'Pdc& = PrinterDC()', sorry."
PRINT
PRINT " ";STR$(cxmax&);"  ";"print X max (dots)"
PRINT " ";STR$(cymax&);"  ";"print Y max (dots)"
PRINT " ";STR$(cxdpi&);"  ";"dpi X"
PRINT " ";STR$(cydpi&);"  ";"dpi Y"
PRINT " ";STR$(pxmax&);"  ";"page X size (dots)"
PRINT " ";STR$(pymax&);"  ";"page Y size (dots)"
PRINT USING "##.#",cxmax& / cxdpi&;
PRINT "  ";"page X max print size (inches)"
PRINT USING "##.#",cymax& / cydpi&;
PRINT "  ";"page Y max print size (inches)"
PRINT USING "##.#",pxmax& / cxdpi&;
PRINT "  ";"page X physical size (inches)"
PRINT USING "##.#",pymax& / cydpi&;
PRINT "  ";"page Y physical size (inches)"
PRINT
PRINT "                                      <any key> to close"

KEYGET a%
CLOSEW #1



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 03 21:19:29 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IF5k-00NPGzC>; Wed, 3 Mar 1999 18:05:52 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA08355; Wed, 3 Mar 1999 17:32:52 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DD7517.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 3 Mar 1999 11:32:41 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Get some printer info...
X-UIDL: c8f9562b3e1424a5365b7df65785b98e

Tom,

Heres the improved decoding of the dev name structure.

From Win 3.1  SDK

ps2$ = "Device   =  " + CHAR{lpdevnamebuffer% + CARD{lpdevnamebuffer% + 2}}
ps2$ = ps2$ + "   on  " + CHAR{lpdevnamebuffer% + CARD{lpdevnamebuffer% +
4}}



Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Thu Mar 04 19:27:43 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IPQ4-00NRHvC>; Thu, 4 Mar 1999 05:07:32 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA09516; Thu, 4 Mar 1999 04:47:36 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DE13A9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990304034719.YUA10561@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 4 Mar 1999 03:47:19 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 4 Mar 1999 03:47:19 +0000
Subject: [GFA] Help, please... printers.
X-UIDL: 22628c53c07792745721e41c3c23a108

Having difficulty.  Is there any way known to query a printer
for it's margins or max printable area limits?

A printer that runs roll or fanfold paper might have left & 
right margins, but has no limitations on the top & bottom.

A printer running cut-sheet only, however, has built-in
limitations on all 4 sides.  I can get the print-area's size,
both across & up/down, but I don't know how to get even one
of the fixed margins in dots.

DRAWTEXT 10,20,110,120,a$,DT_NOCLIP | DT_WORDBREAK

The above may be useable, but I have suspicians.  I would
guess that 10 dots right from the left margine, 20 dots down
from the upper margin, the 110 & 120 would have to be determined
by the width of the printable area.  The above are in pixels,
but would have to be translated into dots for the printer _IF_ 
it can be used on a printer.  The above represents the rectangle
that the text would be printed in.  Well, on screen, it is.

The "easy path" to wordwrap or linewrap is _NOT_ easy!
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 16:26:51 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Ie58-00NSosC>; Thu, 4 Mar 1999 20:46:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA11232; Thu, 4 Mar 1999 20:30:12 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DEF048.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990304085658.DTJY4827@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Thu, 4 Mar 1999 08:56:58 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 4 Mar 1999 08:56:58 +0000
Subject: [GFA] help, please - printing text
X-UIDL: bf83343788714a5c6bda554a10597faf

hw% = GetTextExtent(hdc&,addr_strg%,chr_cnt&)

According to the Win31 SDK helpfile, the above will determine the
physical width of a string or line of text, taking into account the
font's dimensions.

It does NOT state that it can be used for printers, nor does it say
that it can not.

TextOut is not clear on this, either.

I guess there are no examples of setting up wordwrap or linewrap for
printing hardcopy simply because this situation is difficult.

Has anybody any advice or helpful hints on it?

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 16:26:52 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IeJj-00NRI3C>; Thu, 4 Mar 1999 21:01:59 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA11315; Thu, 4 Mar 1999 20:47:08 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DEF41E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 4 Mar 1999 03:40:23 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Help, please... printers.
X-UIDL: e19b23a306967a30c365c940306bbecb

Tom,

Perhaps you could make use of the GDI Escapes;
 
n& = Escape(hdc&, GETPRINTINGOFFSET, NULL, NULL, lpOffset%)

n& = Escape(hdc&, GETPHYSPAGESIZE, NULL, NULL, lpDimensions%)

lpOffset% and lpDimensions% point to a POINT structure

  TYPE POINT:
  - WORD xp
  - WORD yp
  ENDTYPE
  POINT: pt.

so,

n& = Escape(hdc&, GETPRINTINGOFFSET, NULL, NULL, *pt.)

John

Here is a list of GDI Escapes;

// NEWFRAME                   //   1
// ABORTDOC                   //   2
// NEXTBAND                   //   3
// SETCOLORTABLE              //   4
// GETCOLORTABLE              //   5
// FLUSHOUTPUT                //   6
// DRAFTMODE                  //   7
// QUERYESCSUPPORT            //   8
// SETABORTPROC               //   9
// STARTDOC                   //   10
// ENDDOC                     //   11
// GETPHYSPAGESIZE            //   12
// GETPRINTINGOFFSET          //   13
// GETSCALINGFACTOR           //   14
// MFCOMMENT                  //   15
// GETPENWIDTH                //   16
// SETCOPYCOUNT               //   17
// SELECTPAPERSOURCE          //  18
// DEVICEDATA                 //  19
// PASSTHROUGH                //  19
// GETTECHNOLGY               //  20
// GETTECHNOLOGY              //  20
// SETLINEJOIN                //  22
// SETMITERLIMIT              //  23
// BANDINFO                   //  24
// DRAWPATTERNRECT            //  25
// GETVECTORPENSIZE           //  26
// GETVECTORBRUSHSIZE         //  27
// ENABLEDUPLEX               //   28
// GETSETPAPERBINS            //   29
// GETSETPRINTORIENT          //   30
// ENUMPAPERBINS              //   31
// SETDIBSCALING              //   32
// EPSPRINTING                //   33
// ENUMPAPERMETRICS           //   34
// GETSETPAPERMETRICS         //   35
// POSTSCRIPT_DATA            //   37
// POSTSCRIPT_IGNORE          //   38
// GETEXTENDEDTEXTMETRICS    //    256
// GETEXTENTTABLE            //    257
// GETPAIRKERNTABLE          //    258
// GETTRACKKERNTABLE         //    259
// EXTTEXTOUT                //    512
// ENABLERELATIVEWIDTHS      //    768
// ENABLEPAIRKERNING         //    769
// SETKERNTRACK              //    770
// SETALLJUSTVALUES          //    771
// SETCHARSET                //    772
// STRETCHBLT               //     2048
// BEGIN_PATH               //     4096
// CLIP_TO_PATH             //     4097
// END_PATH                 //     4098
// EXT_DEVICE_CAPS          //     4099
// RESTORE_CTM              //     4100
// SAVE_CTM                 //     4101
// SET_ARC_DIRECTION        //     4102
// SET_BACKGROUND_COLOR     //     4103
// SET_POLY_MODE            //     4104
// SET_SCREEN_ANGLE         //     4105
// SET_SPREAD               //     4106
// TRANSFORM_CTM            //     4107
// SET_CLIP_BOX             //     4108
// SET_BOUNDS               //     4109
// SET_MIRROR_MODE          //     4110


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 16:26:56 1999
Return-Path: <AlanLennon@usa.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IgUf-00NSTEC>; Thu, 4 Mar 1999 23:21:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA11569; Thu, 4 Mar 1999 22:52:16 +0100
From: Alan Lennon <AlanLennon@usa.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DF1175.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v4.00.03.01 201-229-104-101) with ESMTP
          id <19990304215111.WDUW27847.mta2-svc@usa.net>;
          Thu, 4 Mar 1999 21:51:11 +0000
Date: Thu, 04 Mar 1999 21:50:20 +0000
X-Mailer: Mozilla 4.5 [en] (Win98; I)
X-Accept-Language: en
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <36DEF048.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] help, please - printing text
X-UIDL: 46c18f7d7e06a7cae5256886ef48d4d3



Tom Record wrote:
> 
> hw% = GetTextExtent(hdc&,addr_strg%,chr_cnt&)
> 
> According to the Win31 SDK helpfile, the above will determine the
> physical width of a string or line of text, taking into account the
> font's dimensions.
> 
> It does NOT state that it can be used for printers, nor does it say
> that it can not.

Hi Tom

Note that the first parameter of the call is hdc& which is a device
context. Therefore the function returns values appropriate to that
device context. If it's a printer DC then the value is in units relative
to the printers X and Y dimensions as returned by GetDevCaps(). You will
have to select the
font into the DC first by using SETDC followed by SETFONT, or (I think
but haven't tried) ~SelectObject(hdc&,hFont&). 

This is all theory cause it's getting late and I'm too
lazy/tired/stupid/sober to try out some test code.


Best Regards   Alan  GI4MUN

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 16:26:57 1999
Return-Path: <AlanLennon@usa.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IgUi-00NSTRC>; Thu, 4 Mar 1999 23:21:28 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA11568; Thu, 4 Mar 1999 22:52:14 +0100
From: Alan Lennon <AlanLennon@usa.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DF1175.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
          (InterMail v4.00.03.01 201-229-104-101) with ESMTP
          id <19990304215111.WDUW27847.mta2-svc@usa.net>;
          Thu, 4 Mar 1999 21:51:11 +0000
Date: Thu, 04 Mar 1999 21:50:20 +0000
X-Mailer: Mozilla 4.5 [en] (Win98; I)
X-Accept-Language: en
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <36DEF048.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] help, please - printing text
X-UIDL: b7ae3de1d47db9794c99cc05f0d7d65c



Tom Record wrote:
> 
> hw% = GetTextExtent(hdc&,addr_strg%,chr_cnt&)
> 
> According to the Win31 SDK helpfile, the above will determine the
> physical width of a string or line of text, taking into account the
> font's dimensions.
> 
> It does NOT state that it can be used for printers, nor does it say
> that it can not.

Hi Tom

Note that the first parameter of the call is hdc& which is a device
context. Therefore the function returns values appropriate to that
device context. If it's a printer DC then the value is in units relative
to the printers X and Y dimensions as returned by GetDevCaps(). You will
have to select the
font into the DC first by using SETDC followed by SETFONT, or (I think
but haven't tried) ~SelectObject(hdc&,hFont&). 

This is all theory cause it's getting late and I'm too
lazy/tired/stupid/sober to try out some test code.


Best Regards   Alan  GI4MUN

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 16:26:59 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IjWi-00NPj9C>; Fri, 5 Mar 1999 02:35:44 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA11967; Fri, 5 Mar 1999 02:20:06 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DF422F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990305012003.OFWI4827@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 5 Mar 1999 01:20:03 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 5 Mar 1999 01:20:03 +0000
Subject: [GFA] printer info
X-UIDL: f0df2abb34fa53506e5cbe719c040960

2nd & 6th PRINT lines wrapped by Eudora - sorry.
Not making much progress.  Am tired & disgusted.  If you can improve on this,
please do & let me know.  Thanks.  <Y> TomR.  (yawn - tired bored, disgusted)
-----------------------------------------------------------------------------
' workout1.lst  TomR.  3-4 Mar 1999
TITLEW #1, " Get some printer info...        <any key> to close me"
OPENW #1,0,0,500,400,16

Pdc& = PrinterDC()SETDC Pdc&
IF Pdc&
  cxmax& = GETDEVCAPS(HORZRES)  //  get printable X
  cymax& = GETDEVCAPS(VERTRES)  //  get printable Y
  cxdpi& = GETDEVCAPS(LOGPIXELSX)  //  get Xdpi
  cydpi& = GETDEVCAPS(LOGPIXELSY)  //  get Ydpi
  ~Escape(Pdc&,GETPHYSPAGESIZE,0,0,V:pxymax%)  // get overall size X x Y
  pxmax& = LOWORD(pxymax%) // get printer maximum horizontal pixels
  pymax& = HIWORD(pxymax%) // get printer maximum vertical pixels
  TYPE POINT:
  - WORD xp
  - WORD yp
  ENDTYPE
  POINT: pt.
  cxyn& = Escape(Pdc&, GETPRINTINGOFFSET, NULL, NULL, *pt.)
  FREEDC dc&
ENDIF
SETDC _DC(1)
PRINT " BJC built-in margins: T = 0.12, L = 0.25, R = 0.26, B = 0.5  (inches)."
PRINT " Fixed margins: T = ";STR$(INT(cydpi& * .12));", L =
";STR$(INT(cxdpi& * .25));", R = ";STR$(INT(cxdpi& * .26));", B =
";STR$(INT(cydpi& * .5));"  (pixels)"
PRINT " Donno how to read the margins, so took'em from the manual."
PRINT " Printer ID doesn't work from 'Pdc& = PrinterDC()', sorry."
PRINT
PRINT " Printing Offset (+ if TRUE): ";STR$(cxyn&);"  ...  x: ";STR$(xp);",
y: ";STR$(yp)
PRINT " (Offset doesn't appear to work as I expected - no dimensions result.)"
PRINT " T + B = ";pymax& - cymax&;", L + R = ";pxmax& - cxmax&
PRINT " ";STR$(cxmax&);"  ";"print X max (dots)"
PRINT " ";STR$(cymax&);"  ";"print Y max (dots)"
PRINT " ";STR$(cxdpi&);"  ";"dpi X"
PRINT " ";STR$(cydpi&);"  ";"dpi Y"
PRINT " ";STR$(pxmax&);"  ";"page X size (dots)"
PRINT " ";STR$(pymax&);"  ";"page Y size (dots)"
PRINT USING "####.#",cxmax& / cxdpi&;
PRINT "  ";"page X max print size (inches)"
PRINT USING "###.#",cymax& / cydpi&;
PRINT "  ";"page Y max print size (inches)"
PRINT USING "####.#",pxmax& / cxdpi&;
PRINT "  ";"page X physical size (inches)"
PRINT USING "###.#",pymax& / cydpi&;
PRINT "  ";"page Y physical size (inches)"
PRINT
PRINT "                                      <any key> to close"

KEYGET a%
CLOSEW #1



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 16:27:01 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IqWY-00NQXxC>; Fri, 5 Mar 1999 10:04:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA12769; Fri, 5 Mar 1999 09:48:17 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36DFAB58.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 5 Mar 1999 03:47:56 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: RE: [GFA] printer info
X-UIDL: bf65a0f618e11c7731ecf10a488932a6

Tom,

PSS ID Number: Q122037
---------------------------------------------------------------------
The information in this article applies to:

 - Microsoft Windows Software Development Kit (SDK) for Windows
   versions 3.0 and 3.1
 - Microsoft Win32 SDK, versions 3.1, 3.5, 3.51, and 4.0
---------------------------------------------------------------------

SUMMARY
=======

The Windows Software Development Kit (SDK) does not provide a function to
calculate printer margins directly. An application can calculate this
information using a combination of printer escapes and calls to the
GetDeviceCaps() function in Windows or by using GetDeviceCaps() in Windows
NT. This article discusses those functions and provides code fragments as
illustrations.

MORE INFORMATION
================

An application can determine printer margins as follows:

1. Calculate the left and top margins

   a. Determine the upper left corner of the printable area by using the
      GETPRINTINGOFFSET printer escape in Windows or by calling
      GetDeviceCaps() with the PHYSICALOFFSETX and PHYSICALOFFSETY
      indices in Windows NT. For example:

      // Init our pt struct in case escape not supported
      pt.x = 0; pt.y = 0;

      // In Windows NT, the following 2 calls replace GETPRINTINGOFFSET:
      // pt.x = GetDeviceCaps(hPrnDC, PHYSICALOFFSETX);
      // pt.y = GetDeviceCaps(hPrnDC, PHYSICALOFFSETY);

      // In Windows, use GETPRINTINGOFFSET to fill the POINT struct
      // Drivers are not required to support the GETPRINTINGOFFSET escape,
      // so call the QUERYESCSUPPORT printer escape to make sure
      // it is supported.
      Escape (hPrnDC, GETPRINTINGOFFSET, NULL, NULL, (LPPOINT) &pt);

   b. Determine the number of pixels required to yield the desired margin
      (x and y offsets) by calling GetDeviceCaps() using the LOGPIXELSX and
      LOGPIXELSY flags.

      // Figure out how much you need to offset output. Note the
      // use of the "max" macro. It is possible that you are asking for
      // margins that are not possible on this printer. For example, the HP
      // LaserJet has a 0.25" unprintable area so we cannot get margins of
      // 0.1".

      xOffset = max (0, GetDeviceCaps (hPrnDC, LOGPIXELSX) *
                        nInchesWeWant - pt.x);

      yOffset = max (0, GetDeviceCaps (hPrnDC, LOGPIXELSY) *
                        nInchesWeWant - pt.y);

   // When doing all the output, you can either offset it by the above
   // values or call SetViewportOrg() to set the point (0,0) at
   // the margin offset you calculated.

   SetViewportOrg (hPrnDC, xOffset, yOffset);
   ... all other output here ...

2. calculate the bottom and right margins

   a. Obtain the total size of the physical page (including printable and
      unprintable areas) by using the GETPHYSPAGESIZE printer escape in
      Windows or by calling GetDeviceCaps() with the PHYSICALWIDTH and
      PHYSICALHEIGHT indices in Windows NT.

   b. Determine the number of pixels required to yield the desired right
      and bottom margins by calling GetDeviceCaps using the LOGPIXELSX and
      LOGPIXELSY flags.

   c. Calculate the size of the printable area with GetDeviceCaps() using
      the HORZRES and VERTRES flags.

   The following code fragment illustrates steps 2a through 2c:

   // In Windows NT, the following 2 calls replace GETPHYSPAGESIZE
   // pt.x = GetDeviceCaps(hPrnDC, PHYSICALWIDTH);
   // pt.y = GetDeviceCaps(hPrnDC, PHYSICALHEIGHT);

   // In Windows, use GETPHYSPAGESIZE to fill the POINT struct
   // Drivers are not required to support the GETPHYSPAGESIZE escape,
   // so call the QUERYESCSUPPORT printer escape to make sure
   // it is supported.
   Escape (hPrnDC, GETPHYSPAGESIZE, NULL, NULL, (LPPOINT) &pt);

   xOffsetOfRightMargin = xOffset +
                          GetDeviceCaps (hPrnDC, HORZRES) -
                          pt.x -
                          GetDeviceCaps (hPrnDC, LOGPIXELSX) *
                          wInchesWeWant;

   yOffsetOfBottomMargin = yOffset +
                           GetDeviceCaps (hPrnDC, VERTRES) -
                           pt.y -
                           GetDeviceCaps (hPrnDC, LOGPIXELSY) *
                           wInchesWeWant;

NOTE: Now, you can clip all output to the rectangle bounded by xOffset,
yOffset, xOffsetOfRightMargin, and yOffsetOfBottomMargin.

For further information about margins, query in the Microsoft Knowledge
Base by using these words:

   GETPHYSPAGESIZE and GETPRINTINGOFFSET and GetDeviceCaps

Additional reference words: 3.00 3.10 3.50 4.00 95
KBCategory: kbprint kbprg kbcode
KBSubcategory: GdiPrn

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 20:53:43 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Iwzj-00NSpKC>; Fri, 5 Mar 1999 16:58:35 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA13494; Fri, 5 Mar 1999 16:29:09 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E00939.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Thu, 04 Mar 1999 13:23:10 -0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] A way to the RichEdit control
X-UIDL: ac7704986b2b086f4f36c690d04260a1

'RICHTEST.LST: Testing the 16 bit DLL RICHED.DLL
'Roland Walter, March 1999
'
'I found the RICHED.DLL on the MS Office 97 CD ROM declared as a part of the
'operating system. In a lot of tests I had tried before to get a RichEdit
'window with 16 bit GFA Basic using RICHED32.DLL or RICHED20.DLL wich are
'32 bit DLLs. This was impossible even if I had used imported 32 bit
'functions. (A test with 32 bit C language was successfull of course.)
'So I was glad to find the 16 bit RichEdit DLL. With a look into the binary
'code I found the needed control class "RICHED16" and could produce a RichEdit
'window (inside dialog and using CreateWindow).
'But at this time I do'nt know a way to set formattet text. The clipboard
'seems to be unreacheable. Normally (with 32 bit languages) You can use
'Ctrl+C, Ctrl+V and so on but with the 16 bit DLL this does 'not work in my
'tests. You can set an ordinary text to the window but no RTF text.
'My verdict at this time is: The RICHED.DLL is able to create a RichEdit
'window but is no standard RichEdit DLL as declared in the MS API
'documentation.
'Does anybody have an idea?
'One idea i have: Together with the RICHED.DLL file I found a MSRICHED.VBX,
'it could be these two files are working together using OLE. A test with a
'small Visual Basic program and a message spy could bring the information
'we need.
'However, it would be a wonderfull think if anybody finds a way to set
'formatted text into the control.
'The begin is done...

hLibRichEdit&=LoadLibrary("riched.dll") 'do'nt use DLL #n if there are no functions declared!

DIALOG #1,20,20,250,250,"16 bit RichEdit test",WS_SYSMENU
  CONTROL "",100,"RICHED16",WS_CHILD|WS_VISIBLE|WS_VSCROLL|WS_BORDER|ES_MULTILINE|ES_AUTOVSCROLL,5,5,200,200
ENDDIALOG
DLG FILL 1,RGB(192,192,192)
SHOWDIALOG #1

_WIN$(DLGITEM(1,100))="Hallo"
~SendMessage(DLGITEM(1,100),EM_SETSEL,0,MAKELONG(1,3)) 'select characters 1 to 3

IF SendMessage(DLGITEM(1,100),WM_USER+50,CF_TEXT,0)=0 'WM_USER+50=EM_CANPASTE
  ~MessageBox(DLG(1),"Sorry, text pasting is impossible","Debug",0)
ENDIF

DO
  GETEVENT
LOOP UNTIL MENU(1)=4  'Closing by system menu (or Alt+F4)

CLOSEDIALOG #1
~FreeLibrary(hLibRichEdit&)
END


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 20:53:45 1999
Return-Path: <MAILER-DAEMON>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from starbase1.biotoop.com (195.86.243.135) with esmtp
	  id <m10IxES-00NSqKC>; Fri, 5 Mar 1999 17:13:48 +0100 (MET)
Received: by cp135erm07.gelrevision.nl with Internet Mail Service (5.5.1960.3)
	id <GJJRXPYR>; Fri, 5 Mar 1999 17:14:04 +0100
Message-ID: <819675E112C1D2119D870020AF7CD7E81CDD@cp135erm07.gelrevision.nl
From: System Administrator <postmaster@biotoop.com>
To: alibaba@zedat.fu-berlin.de
Subject: Undeliverable: [GFA] A way to the RichEdit control
Date: Fri, 5 Mar 1999 17:14:04 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.1960.3)
X-MS-Embedded-Report: 
Content-Type: multipart/mixed;
	boundary="---- =_NextPart_000_01BE6723.30552E70"
X-UIDL: 9a83abc5c79a43b59903414ef12d13af

Your message

  To:      gfabasic@aachen.linux.de
  Subject: [GFA] A way to the RichEdit control
  Sent:    Thu, 4 Mar 1999 15:23:10 +0100

did not reach the following recipient(s):

shamstra@starbase1.biotoop.com on Fri, 5 Mar 1999 17:14:02 +0100
    The recipient name is not recognized
    MSEXCH:IMS:Biotoop:biotoop.com:STARBASE1 0 (000C05A6) Unknown
Recipient


Message-ID: <36E00939.BeroList-2.5.9@aachen.linux.de>
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
To: gfabasic@aachen.linux.de
Subject: [GFA] A way to the RichEdit control
Date: Thu, 4 Mar 1999 15:23:10 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.1960.3)
X-MS-Embedded-Report: 
Content-Type: text/plain

'RICHTEST.LST: Testing the 16 bit DLL RICHED.DLL
'Roland Walter, March 1999
'
'I found the RICHED.DLL on the MS Office 97 CD ROM declared as a part of
the
'operating system. In a lot of tests I had tried before to get a
RichEdit
'window with 16 bit GFA Basic using RICHED32.DLL or RICHED20.DLL wich
are
'32 bit DLLs. This was impossible even if I had used imported 32 bit
'functions. (A test with 32 bit C language was successfull of course.)
'So I was glad to find the 16 bit RichEdit DLL. With a look into the
binary
'code I found the needed control class "RICHED16" and could produce a
RichEdit
'window (inside dialog and using CreateWindow).
'But at this time I do'nt know a way to set formattet text. The
clipboard
'seems to be unreacheable. Normally (with 32 bit languages) You can use
'Ctrl+C, Ctrl+V and so on but with the 16 bit DLL this does 'not work in
my
'tests. You can set an ordinary text to the window but no RTF text.
'My verdict at this time is: The RICHED.DLL is able to create a RichEdit
'window but is no standard RichEdit DLL as declared in the MS API
'documentation.
'Does anybody have an idea?
'One idea i have: Together with the RICHED.DLL file I found a
MSRICHED.VBX,
'it could be these two files are working together using OLE. A test with
a
'small Visual Basic program and a message spy could bring the
information
'we need.
'However, it would be a wonderfull think if anybody finds a way to set
'formatted text into the control.
'The begin is done...

hLibRichEdit&=LoadLibrary("riched.dll") 'do'nt use DLL #n if there are
no functions declared!

DIALOG #1,20,20,250,250,"16 bit RichEdit test",WS_SYSMENU
  CONTROL
"",100,"RICHED16",WS_CHILD|WS_VISIBLE|WS_VSCROLL|WS_BORDER|ES_MULTILINE|
ES_AUTOVSCROLL,5,5,200,200
ENDDIALOG
DLG FILL 1,RGB(192,192,192)
SHOWDIALOG #1

_WIN$(DLGITEM(1,100))="Hallo"
~SendMessage(DLGITEM(1,100),EM_SETSEL,0,MAKELONG(1,3)) 'select
characters 1 to 3

IF SendMessage(DLGITEM(1,100),WM_USER+50,CF_TEXT,0)=0
'WM_USER+50=EM_CANPASTE
  ~MessageBox(DLG(1),"Sorry, text pasting is impossible","Debug",0)
ENDIF

DO
  GETEVENT
LOOP UNTIL MENU(1)=4  'Closing by system menu (or Alt+F4)

CLOSEDIALOG #1
~FreeLibrary(hLibRichEdit&)
END


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org
From ???@??? Fri Mar 05 20:53:47 1999
Return-Path: <Eberhard.Funck@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IxfR-00NPisC>; Fri, 5 Mar 1999 17:41:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA13650; Fri, 5 Mar 1999 17:13:41 +0100
From: Eberhard.Funck@t-online.de (Eberhard Funck)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E01399.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 5 Mar 1999 17:03:55 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
X-Sender: 320090052711-0001@t-online.de
Subject: Re: [GFA] A way to the RichEdit control
X-UIDL: 938aba06155e9026173fe313267125f3

Hi
Look in DownLoad site of GFAHELP of Dale Bryant home page.
Under CtrlTool.dll I have an example of RichEdit.exe with the
Riched.dll (richedit.gfw, riched32.h included).
I found that the formated text structure is not right in the Header
file riched32.h. The structure is greater.
In my application I have implemented all richedit function.
Attention: It's a limit of text file size.

Greetings
Eberhard

You wrote:


>'RICHTEST.LST: Testing the 16 bit DLL RICHED.DLL
>'Roland Walter, March 1999
>'
>'I found the RICHED.DLL on the MS Office 97 CD ROM declared as a part of
the
>'operating system. In a lot of tests I had tried before to get a RichEdit
>'window with 16 bit GFA Basic using RICHED32.DLL or RICHED20.DLL wich are
>'32 bit DLLs. This was impossible even if I had used imported 32 bit
>'functions. (A test with 32 bit C language was successfull of course.)
>'So I was glad to find the 16 bit RichEdit DLL. With a look into the binary
>'code I found the needed control class "RICHED16" and could produce a
RichEdit
>'window (inside dialog and using CreateWindow).
>'But at this time I do'nt know a way to set formattet text. The clipboard
>'seems to be unreacheable. Normally (with 32 bit languages) You can use
>'Ctrl+C, Ctrl+V and so on but with the 16 bit DLL this does 'not work in my
>'tests. You can set an ordinary text to the window but no RTF text.
>'My verdict at this time is: The RICHED.DLL is able to create a RichEdit
>'window but is no standard RichEdit DLL as declared in the MS API
>'documentation.
>'Does anybody have an idea?
>'One idea i have: Together with the RICHED.DLL file I found a MSRICHED.VBX,
>'it could be these two files are working together using OLE. A test with a
>'small Visual Basic program and a message spy could bring the information
>'we need.
>'However, it would be a wonderfull think if anybody finds a way to set
>'formatted text into the control.
>'The begin is done...
>
>hLibRichEdit&=LoadLibrary("riched.dll") 'do'nt use DLL #n if there are no f
unctions declared!
>
>DIALOG #1,20,20,250,250,"16 bit RichEdit test",WS_SYSMENU
>  CONTROL
"",100,"RICHED16",WS_CHILD|WS_VISIBLE|WS_VSCROLL|WS_BORDER|ES_MULTILINE|ES_A
UTOVSCROLL,5,5,200,200
>ENDDIALOG
>DLG FILL 1,RGB(192,192,192)
>SHOWDIALOG #1
>
>_WIN$(DLGITEM(1,100))="Hallo"
>~SendMessage(DLGITEM(1,100),EM_SETSEL,0,MAKELONG(1,3)) 'select characters 1
to 3
>
>IF SendMessage(DLGITEM(1,100),WM_USER+50,CF_TEXT,0)=0
'WM_USER+50=EM_CANPASTE
>  ~MessageBox(DLG(1),"Sorry, text pasting is impossible","Debug",0)
>ENDIF
>
>DO
>  GETEVENT
>LOOP UNTIL MENU(1)=4  'Closing by system menu (or Alt+F4)
>
>CLOSEDIALOG #1
>~FreeLibrary(hLibRichEdit&)
>END
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Mar 05 20:53:48 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10IyLF-00NSTRC>; Fri, 5 Mar 1999 18:24:53 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA13750; Fri, 5 Mar 1999 17:56:44 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E01DB2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 5 Mar 1999 17:57:43 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] A way to the RichEdit control
X-UIDL: 0fcd46c0a42bea0e7e92cfe10d73af83

Hi,
By the way, to write my richedit.exe I had needed about two months.
It's not simple. E.g.: to load rtf or txt files you must work with stream
functions
and a hand full structures. It was a mistake, not the formatrange structure
has
the wrong size, it's the paraformat structure with  156 bytes instead 32 or
64 byte.
Otherwise the riched.dll works very good until the limit size of 3532 lines.
Because I don't know.

Many pleasure

Eberhard



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 00:15:38 1999
Return-Path: <alibaba@zedat.fu-berlin.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10J1FI-00NSpGC>; Fri, 5 Mar 1999 21:30:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA14076; Fri, 5 Mar 1999 21:01:34 +0100
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E04910.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: alibaba@mail.zedat.fu-berlin.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.5 (32)
Date: Fri, 05 Mar 1999 20:59:39 -0100
In-Reply-To: <36E01DB2.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] A way to the RichEdit control
X-UIDL: 188e3acae127a54a18199a312a1477c2

At 17:57 05.03.1999 +0100, you wrote:
>By the way, to write my richedit.exe I had needed about two months.
>It's not simple. E.g.: to load rtf or txt files you must work with stream
>functions and a hand full structures.

:-))))) I know - that was why I made also tests in 32bit C instead of
a 16 bit language first.

> It was a mistake, not the formatrange structure has
>the wrong size, it's the paraformat structure with  156 bytes instead 32 or
>64 byte.
>Otherwise the riched.dll works very good until the limit size of 3532 lines.
>Because I don't know.

Is the limit set by lines or by RTF characters? - On the other hand I am
not very astonished; this could be a limitation of 16 Bit (64KB segment).

Do You know if the 16bit RICHED.DLL is "free" or redistributable?
(May be a part of a free software packet for example)?

By, Roland


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 00:15:42 1999
Return-Path: <MAILER-DAEMON>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from starbase1.biotoop.com (195.86.243.135) with esmtp
	  id <m10J1Hy-00NRHUC>; Fri, 5 Mar 1999 21:33:42 +0100 (MET)
Received: by cp135erm07.gelrevision.nl with Internet Mail Service (5.5.1960.3)
	id <GJJRXPY8>; Fri, 5 Mar 1999 21:34:04 +0100
Message-ID: <819675E112C1D2119D870020AF7CD7E80DFA@cp135erm07.gelrevision.nl
From: System Administrator <postmaster@biotoop.com>
To: alibaba@zedat.fu-berlin.de
Subject: Undeliverable: Re: [GFA] A way to the RichEdit control
Date: Fri, 5 Mar 1999 21:34:03 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.1960.3)
X-MS-Embedded-Report: 
Content-Type: multipart/mixed;
	boundary="---- =_NextPart_000_01BE6747.81FD63E0"
X-UIDL: 794a7192b39e22c4bc0b4288346287dd

Your message

  To:      gfabasic@aachen.linux.de
  Subject: Re: [GFA] A way to the RichEdit control
  Sent:    Fri, 5 Mar 1999 22:59:39 +0100

did not reach the following recipient(s):

shamstra@starbase1.biotoop.com on Fri, 5 Mar 1999 21:34:00 +0100
    The recipient name is not recognized
    MSEXCH:IMS:Biotoop:biotoop.com:STARBASE1 0 (000C05A6) Unknown
Recipient


Message-ID: <36E04910.BeroList-2.5.9@aachen.linux.de>
From: Roland Walter <alibaba@zedat.fu-berlin.de>
Reply-To: gfabasic@linux.net.eu.org
To: gfabasic@aachen.linux.de
Subject: Re: [GFA] A way to the RichEdit control
Date: Fri, 5 Mar 1999 22:59:39 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.1960.3)
X-MS-Embedded-Report: 
Content-Type: text/plain

At 17:57 05.03.1999 +0100, you wrote:
>By the way, to write my richedit.exe I had needed about two months.
>It's not simple. E.g.: to load rtf or txt files you must work with
stream
>functions and a hand full structures.

:-))))) I know - that was why I made also tests in 32bit C instead of
a 16 bit language first.

> It was a mistake, not the formatrange structure has
>the wrong size, it's the paraformat structure with  156 bytes instead
32 or
>64 byte.
>Otherwise the riched.dll works very good until the limit size of 3532
lines.
>Because I don't know.

Is the limit set by lines or by RTF characters? - On the other hand I am
not very astonished; this could be a limitation of 16 Bit (64KB
segment).

Do You know if the 16bit RICHED.DLL is "free" or redistributable?
(May be a part of a free software packet for example)?

By, Roland


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org
From ???@??? Sat Mar 06 00:15:44 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10J23A-00NSpXC>; Fri, 5 Mar 1999 22:22:28 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA14181; Fri, 5 Mar 1999 21:54:25 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E05568.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990305205355.ENZA6942@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 5 Mar 1999 20:53:55 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 5 Mar 1999 20:53:55 +0000
Subject: [GFA] pulling hair!
X-UIDL: 2b8991ce35a93ce5edb6cbc4a178717d

Rats!  I can't even ask my printer if it supports the offset escape.

  DIM sizeof(1)
  ret1& = Escape(Pdc&,QUERYESCSUPPORT,sizeof(int),V:GETPRINTINGOFFSET,NULL)
  PRINT " supported or not? ";ret1&

If I don't use the DIM, I get array not one dimension!  The above draws a
peek/poke on the PRINT statement!

I have no idea how to use:
~Escape(Pdc&,QUERYESCSUPPORT,sizeof(int),V:GETPRINTINGOFFSET,NULL)
because I wouldn't know how to get the info out of it.

Please... what the hell is going on?  GETPRINTINGOFFSET tells me *it* works
by giving me a +1, but the dimensions it returns are always 0,0.  It would 
seem that it is working off GETPHYSICALPSGESIZE.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 00:15:45 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10J2Fu-00NSpjC>; Fri, 5 Mar 1999 22:35:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA14218; Fri, 5 Mar 1999 22:06:17 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E0582E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990305210613.WXT10367@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 5 Mar 1999 21:06:13 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 5 Mar 1999 21:06:13 +0000
Subject: [GFA] re: pulling hair!
X-UIDL: 146d559b52f336e14258f40c2f1a8420

Got it... was trying to print to the screen while still on the printerDC.

DUMB!  DUMB!  DUMB!  DUMB!  DUMB!  DUMB!  DUMB!  DUMB!DEE!DUMB!DUMB!

Ok - need suggestions.  Canon BJCs don't support GETPRINTINGOFFSET escapes.

I STILL need to figure the margins so the DRAWTEXT can work.  Just ignore
the darned thing & use a rect starting at 0,0 with height to match the
fontsize & use HORZRES as the right end of the rect?  There's gotta be a
way to do this right!  There's gotta be!

<C> (that's crying... big time!)
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 00:15:46 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10J2bi-00NRHFC>; Fri, 5 Mar 1999 22:58:10 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA14274; Fri, 5 Mar 1999 22:30:10 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E05DC8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Fri, 05 Mar 1999 19:26:49 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Network communications
X-UIDL: 520b812f06fcb651cd14517aa3be26cd

Hi!

A am running a program on some computers in a local area network. Is there
an easy way do exchange information between the programs? 


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 00:15:47 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10J2bk-00NSTSC>; Fri, 5 Mar 1999 22:58:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA14272; Fri, 5 Mar 1999 22:30:09 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E05DC8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Fri, 05 Mar 1999 19:24:03 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Windows NT 4.0
X-UIDL: edfbe24a23ec8757cbb7c77b5d1afeae

Hi!

When I check the Windows version on WinNT 4.0 I get 3.10 and not 4.0 as I
thought. I want to check the version because my program has some features
that Windows 95 and NT have, but Windows 3.1 has not. For example the
progress bar or long file names.

Is there another way to check if the Windows version has specific
capabilities?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 03:10:42 1999
Return-Path: <aarnouts@zeelandnet.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10J3nX-00NRI1C>; Sat, 6 Mar 1999 00:14:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA14486; Fri, 5 Mar 1999 23:59:05 +0100
From: "Sjaak Aarnoutse" <aarnouts@zeelandnet.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E072A0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 5 Mar 1999 23:58:17 +0100
MIME-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7BIT
X-Confirm-Reading-To: "Sjaak Aarnoutse" <aarnouts@zeelandnet.nl>
X-pmrqc: 1
Priority: normal
In-reply-to: <36E05DC8.BeroList-2.5.9@aachen.linux.de>
X-mailer: Pegasus Mail for Win32 (v3.02b14)
Sender: aarnouts@mail.zeelandnet.nl
Subject: Re: [GFA] Network communications
X-UIDL: e439740152b0fd377053b9ed8d0ee804

> A am running a program on some computers in a local area network. Is there
> an easy way do exchange information between the programs? 

It depends on your needs, are we talking about massive transfers? 
Does the information have to be private shielded for other 
workstations? 

Probably the easiest way to communicate between workstations is 
to do file-based I/O on a shared drive. This method would isolate 
you from all network complexity.

If you only want to exchange status-info, you can even do a lot by 
manipulating the the filename or filedate of a certain shared file or 
just testing the mere existence of a certain file. 

If you want to exchange lots of data make sure to keep files open 
for a minimum of time, and make sure your programs react well on 
predictable  "file opened by another user" errors

Maybe the cleanest solution would be to create peer to peer 
networking between the workstations. Depending on the network 
operating system and used protocol layers this would probably 
mean a more than significant programming effort. 


met vriendelijke groet,

Sjaak Aarnoutse

thuis:	aarnouts@zeelandnet.nl
werk:	saa@schoondijke.ipcplant.nl

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 21:59:44 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10J9N1-00NST6C>; Sat, 6 Mar 1999 06:11:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA15210; Sat, 6 Mar 1999 05:56:06 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E0C64F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990306045600.CEER9686@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 6 Mar 1999 04:56:00 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 6 Mar 1999 04:56:00 +0000
Subject: [GFA] success w/ wordwrap   0503zz1-
X-UIDL: 27a2c0ba786731d357ca86b47ff9e636

05/03/99 10:49:52 PM   success w/ wordwrap   0503zz1-

One of Ophir's examples found in Dale's helpfile.  Modified, of course - I 
can't leave anything alone for long.  Next step... gotta add font & move it 
over to the printer.  At least, I got *this* to work... finally!

6 lines wrapped by Eudora.   <G>  TomR.
---------------------------------------------------------------------
' ophir02.lst from DrawText() :PRIMARY by Ophir Daniel
' An attempt by TomR. to work out wordwrap.  Ha!
@Initialise
@OpenObjects
@CreateMainWindow("GfawhelpClass","Gfaw Window")
@Add_Menu
~ShowWindow(hWndMain&,1)
~MoveWindow(hWndMain&,0,0,_X ,_Y - 10,TRUE)
WHILE GetMessage(*msg.,NULL,NULL,NULL)
  ~TranslateMessage(*msg.)
  ~DispatchMessage(*msg.)
WEND
@CloseObjects


PROCEDURE Initialise
  cx& = GETDEVCAPS(HORZRES)
  cy& = GETDEVCAPS(VERTRES)
  dv&  = _DRIVE
  dr$ = DIR$(0)

  TYPE tagWNDCLASS:
  - WORD style
  - LONG lpFNWndProc
  - WORD cbClsExtra
  - WORD cbWndExtra
  - WORD hInstance
  - WORD hIcon
  - WORD hCursor
  - WORD hbrBackground
  - LONG lpszMenuName
  - LONG lpszClassName
  ENDTYPE
  tagWNDCLASS:wndclass.
  //
  TYPE tagRECT:
  - SHORT left
  - SHORT top
  - SHORT right
  - SHORT bottom
  ENDTYPE
  tagRECT: rect.
  //
  TYPE tagPAINTSTRUCT:
  - SHORT  hdc
  - USHORT fErase
  - SHORT  x1
  - SHORT  y1
  - SHORT  x2
  - SHORT  y2
  - USHORT fRestore
  - USHORT fIncUpdate
  - CHAR(16) rgbReserved$
  ENDTYPE
  tagPAINTSTRUCT: ps.
  //
  TYPE tagMSG:
  - WORD   hwnd
  - INT   message
  - WORD wParam
  - LONG lParam
  - DWORD  time
  - LONG  pt
  ENDTYPE
  tagMSG:msg.
  //
  TYPE tagPOINT:
  - SHORT  x
  - SHORT y
  ENDTYPE
  tagPOINT:pt.
  //
RETURN


PROCEDURE CreateMainWindow(ClassName$,title$)
  ClassName$ = ClassName$ + CHR$(0)
  title$ = title$ + CHR$(0)
  _CB (11)= MainWindowProc(wwwl)
  wndclass.style         = CS_HREDRAW | CS_VREDRAW | WS_CAPTION
  wndclass.lpFNWndProc   = _CB(11)
  wndclass.cbClsExtra    = 0
  wndclass.cbWndExtra    = 0
  wndclass.hInstance     = _INSTANCE
  wndclass.hIcon         = LoadIcon  ( _INSTANCE,101 )
  wndclass.hCursor       = LoadCursor( 0, IDC_ARROW )
  wndclass.hbrBackground = GetStockObject( WHITE_BRUSH )
  wndclass.lpszMenuName  = NULL
  wndclass.lpszClassName = V:ClassName$
  ~RegisterClass( V: wndclass.)
  st%   =  WS_CAPTION | WS_CLIPCHILDREN | WS_OVERLAPPEDWINDOW
  hWndMain& = CreateWindow(ClassName$, title$, st%, 10, 10, _X - 20, _Y -
20, 0, 0, _INSTANCE, 0)
RETURN


PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
  SWITCH message&
  CASE WM_SIZE
    ~GetClientRect(hWndMain&,*rect.)
    ~MoveWindow(hWndStatus&,-2,rect.bottom - 20,rect.right + 4,25,1)
  CASE WM_MENUSELECT
    @menuselectinfo(wParam&)
  CASE WM_COMMAND
    SWITCH (wParam&)
    CASE 107,809
      ~PostMessage(hWndMain&,WM_CLOSE,0,0)
    CASE 121,808
      @about
    ENDSWITCH
    RETVAL 0
  CASE WM_PAINT
    hdc& = BeginPaint(hWndMain&, V:ps.)
    ~GetClientRect(hWndMain&,*rect.)
    ~SetBkMode(hdc&,TRANSPARENT)
    ~SetTextColor(hdc&,RGB(0,0,127))
    '    ~GetClientRect(hdc&,*rect.) ' would be printable area of printer page
    '    Chas$ = STR$(rect.top) + " " + STR$(rect.left) + " " +
STR$(rect.right) + " " + STR$(rect.bottom) + "     "
    '    Chas$ = STR$(cx&) + "  " + STR$(cy&)
    Chas$ = "Now is the time for bullhockey to come to a halt so zee world
can breathe!  I didn't see any wrap happening until this attempt!!"
    'a&=DrawText(hd&,addr_s%,n&,addr_r%,f&)
    '=>>a&:  returns text height.
    '=>>hd&:  display area handle
    '=>>addr_s%:  pointer to the string to be drawn
    '=>>n&:  string length in bytes
    '=>>addr_r%:  pointer to a RECT data structure which contains the
coordinates of the rectangle where the text is to be drawn.
    '=>>f&:  method of text formatting. It can assume the following values:
    Chas& = LEN(Chas$)
    ~DrawText(hdc&,Chas$,Chas&,*rect.,DT_WORDBREAK | DT_LEFT)
    ~EndPaint(hWndMain&, V:ps.)
    RETVAL 0
  CASE WM_DESTROY
    ~PostQuitMessage(0)
    RETVAL 0
  DEFAULT
    RETVAL DefWindowProc(hWnd&, message&, wParam&, lParam%)
  ENDSWITCH
RETURN


PROCEDURE OpenObjects
  StatusBarFont& =
CreateFont(12,5,0,0,100,0,0,0,ANSI_CHARSET,OUT_DEFAULT_PRECIS,
CLIP_DEFAULT_PRECIS, PROOF_QUALITY,VARIABLE_PITCH | FF_ROMAN, "Helv")
  tollbitmap& = LoadBitmap(_INSTANCE,101)
  yelBrush& = CreateSolidBrush(RGB(255,255,200))
RETURN


PROCEDURE Add_Menu
  main_menu& = CreateMenu()
  file_menu& = CreatePopupMenu()
  edit_menu& = CreatePopupMenu()
  help_menu& = CreatePopupMenu()
  //
  ~AppendMenu(file_menu&,MF_STRING,101,"&New")
  ~AppendMenu(file_menu&,MF_STRING,102,"&Open")
  ~AppendMenu(file_menu&,MF_STRING,103,"&Save")
  ~AppendMenu(file_menu&,MF_STRING,104,"Save &As")
  ~AppendMenu(file_menu&,MF_SEPARATOR,-1,"")

  ~AppendMenu(file_menu&,MF_STRING,105,"&Print")
  ~AppendMenu(file_menu&,MF_STRING,106,"Printer Set&up")
  ~AppendMenu(file_menu&,MF_SEPARATOR,-1,"")
  ~AppendMenu(file_menu&,MF_STRING,107,"E&xit")
  ~AppendMenu(main_menu&,MF_POPUP,file_menu&,"&File")
  //
  ~AppendMenu(edit_menu&,MF_STRING,111,"&Cut")
  ~AppendMenu(edit_menu&,MF_STRING,112,"C&opy")
  ~AppendMenu(edit_menu&,MF_STRING,113,"&Paste")
  ~AppendMenu(main_menu&,MF_POPUP,edit_menu&,"&Edit")
  //
  ~AppendMenu(help_menu&,MF_STRING,121,"&About")
  ~AppendMenu(main_menu&,MF_POPUP,help_menu&,"&Help")
  //
  ~SetMenu(hWndMain&,main_menu&)
RETURN


PROCEDURE CloseObjects
  ~DeleteObject(StatusBarFont&)
  ~DeleteObject(tollbitmap&)
  ~DeleteObject(yelBrush&)
RETURN


PROCEDURE about
  licence$ = " by Dale Bryant"
  button_style% = WS_VISIBLE | WS_CHILD | BS_PUSHBUTTON /* push button style
  DLG 3D ON //option to try with and without (DLG 3D ON)
  DIALOG #5,_X / 4,_Y / 4,318,180 + 45,"About Program",WS_SYSMENU,-15,"MS
Sans Serif"
    CONTROL "",200,"static",SS_CENTER,40,10,250,18
    CONTROL "",201,"static",SS_CENTER,40,10 + 20,250,18
    CONTROL "",202,"static",SS_CENTER,40,10 + 20 + 30,250,18
    CONTROL "",203,"static",SS_CENTER,40,10 + 20 + 30 + 30,250,18
    CONTROL "",204,"static",SS_CENTER,40,10 + 20 + 30 + 30 + 20,250,18
    CONTROL "",205,"static",SS_CENTER,40,10 + 20 + 30 + 30 + 20 + 25,250,18
    CONTROL "",104,"static",$10000007,5,5,305,160 + 30
    CONTROL "",105,"static",$10000009,6,6,305,160 + 30
    ICON "#1",2,10,10,1,1,SS_ICON
    ICON "#1",3,275,10,1,1,SS_ICON
    CONTROL "&OK",206,"button",button_style%,(325 / 2) - 31,10 + 20 + 30 +
30 + 20 + 30 + 20,62,25
  ENDDIALOG
  DLG FILL 5,RGB(192,192,192)
  _WIN$(DLGITEM(5,200)) = "Create WIndow"
  _WIN$(DLGITEM(5,201)) = "From GFAWHELP File"
  _WIN$(DLGITEM(5,202)) = "Collected - Written - Compiled"
  _WIN$(DLGITEM(5,203)) = "Using Help Magic"
  _WIN$(DLGITEM(5,204)) = licence$
  _WIN$(DLGITEM(5,205)) = "Freeware"
  SHOWDIALOG #5
  @hndlabout
RETURN


PROCEDURE hndlabout
  REPEAT
    PEEKEVENT
  UNTIL MENU(1) = 30 AND MENU(12) = 206 OR MENU(1) = 4
  DLG 3D OFF
  CLOSEDIALOG  #5
RETURN






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 21:59:46 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JAaj-00NRHjC>; Sat, 6 Mar 1999 07:29:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA15489; Sat, 6 Mar 1999 07:15:13 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E0D8D7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990306061507.OPO18255@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 6 Mar 1999 06:15:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 6 Mar 1999 06:15:07 +0000
Subject: [GFA] <GGGGGGGGGGGGGGGGGGGG>   0603zz1-
X-UIDL: 11b99b6701407a1e50bee25cf1a17700

06/03/99 12:07:39 AM   <GGGGGGGGGGGGGGGGGGGG>   0603zz1-

Haledamnedluyah!  Predictable wordwrap!  Well, on the screen, anyway.

Make yourself a text file to load & print (to screen).  It can have 
line lengths of any size.

This will wrap & print the remainder in a 2nd line.  The wrap-point 
is set by rect.right - play with it.

Line spacing is set by rect.top=rect.top+35 - play with it.  This 
needs to reflect line height according to the font size selected.

<G>
TomR.
-------------------------------------------------------------------
' ophir04.lst from DrawText() :PRIMARY by Ophir Daniel
' An attempt by TomR. to work out wordwrap.  Ha!
' Adds a fileselect & gets more than one line. <GGGGGGGGGGG>!
@Initialise
@OpenObjects
@CreateMainWindow("GfawhelpClass","Gfaw Window")
@Add_Menu
~ShowWindow(hWndMain&,1)
~MoveWindow(hWndMain&,0,0,_X ,_Y - 10,TRUE)
WHILE GetMessage(*msg.,NULL,NULL,NULL)
  ~TranslateMessage(*msg.)
  ~DispatchMessage(*msg.)
WEND
@CloseObjects


PROCEDURE Initialise
  cx& = GETDEVCAPS(HORZRES)
  cy& = GETDEVCAPS(VERTRES)
  dv&  = _DRIVE
  dr$ = DIR$(0)

  TYPE tagWNDCLASS:
  - WORD style
  - LONG lpFNWndProc
  - WORD cbClsExtra
  - WORD cbWndExtra
  - WORD hInstance
  - WORD hIcon
  - WORD hCursor
  - WORD hbrBackground
  - LONG lpszMenuName
  - LONG lpszClassName
  ENDTYPE
  tagWNDCLASS:wndclass.
  //
  TYPE tagRECT:
  - SHORT left
  - SHORT top
  - SHORT right
  - SHORT bottom
  ENDTYPE
  tagRECT: rect.
  //
  TYPE tagPAINTSTRUCT:
  - SHORT  hdc
  - USHORT fErase
  - SHORT  x1
  - SHORT  y1
  - SHORT  x2
  - SHORT  y2
  - USHORT fRestore
  - USHORT fIncUpdate
  - CHAR(16) rgbReserved$
  ENDTYPE
  tagPAINTSTRUCT: ps.
  //
  TYPE tagMSG:
  - WORD   hwnd
  - INT   message
  - WORD wParam
  - LONG lParam
  - DWORD  time
  - LONG  pt
  ENDTYPE
  tagMSG:msg.
  //
  TYPE tagPOINT:
  - SHORT  x
  - SHORT y
  ENDTYPE
  tagPOINT:pt.
  //
RETURN


PROCEDURE CreateMainWindow(ClassName$,title$)
  ClassName$ = ClassName$ + CHR$(0)
  title$ = title$ + CHR$(0)
  _CB (11)= MainWindowProc(wwwl)
  wndclass.style         = CS_HREDRAW | CS_VREDRAW | WS_CAPTION
  wndclass.lpFNWndProc   = _CB(11)
  wndclass.cbClsExtra    = 0
  wndclass.cbWndExtra    = 0
  wndclass.hInstance     = _INSTANCE
  wndclass.hIcon         = LoadIcon  ( _INSTANCE,101 )
  wndclass.hCursor       = LoadCursor( 0, IDC_ARROW )
  wndclass.hbrBackground = GetStockObject( WHITE_BRUSH )
  wndclass.lpszMenuName  = NULL
  wndclass.lpszClassName = V:ClassName$
  ~RegisterClass( V: wndclass.)
  st%   =  WS_CAPTION | WS_CLIPCHILDREN | WS_OVERLAPPEDWINDOW
  hWndMain& = CreateWindow(ClassName$, title$, st%, 10, 10, _X - 20, _Y -
20, 0, 0, _INSTANCE, 0)
RETURN


PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
  SWITCH message&
  CASE WM_SIZE
    ~GetClientRect(hWndMain&,*rect.)
    ~MoveWindow(hWndStatus&,-2,rect.bottom - 20,rect.right + 4,25,1)
  CASE WM_MENUSELECT
    @menuselectinfo(wParam&)
  CASE WM_COMMAND
    SWITCH (wParam&)
    CASE 107,809
      ~PostMessage(hWndMain&,WM_CLOSE,0,0)
    CASE 121,808
      @about
    ENDSWITCH
    RETVAL 0
  CASE WM_PAINT
    hdc& = BeginPaint(hWndMain&, V:ps.)
    ~GetClientRect(hWndMain&,*rect.)
    ~SetBkMode(hdc&,TRANSPARENT)
    ~SetTextColor(hdc&,RGB(0,0,127))
    '    ~GetClientRect(hdc&,*rect.) ' would be printable area of printer page
    '    Chas$ = STR$(rect.top) + " " + STR$(rect.left) + " " +
STR$(rect.right) + " " + STR$(rect.bottom) + "     "
    '    Chas$ = STR$(cx&) + "  " + STR$(cy&)
    '    Chas$ = "Now is the time for bullhockey to come to a halt so zee
world can breathe!  I didn't see any wrap happening until this attempt!!"
    'a&=DrawText(hd&,addr_s%,n&,addr_r%,f&)
    '=>>a&:  returns text height.
    '=>>hd&:  display area handle
    '=>>addr_s%:  pointer to the string to be drawn
    '=>>n&:  string length in bytes
    '=>>addr_r%:  pointer to a RECT data structure which contains the
coordinates of the rectangle where the text is to be drawn.
    '=>>f&:  method of text formatting. It can assume the following values:
    OPEN "i",#1,n$
    rect.right = rect.right - 250 ' had to get shorter than my text lines
    DO UNTIL EOF(#1)
      INPUT #1,Chas$
      Chas& = LEN(Chas$)
      ~DrawText(hdc&,Chas$,Chas&,*rect.,DT_WORDBREAK | DT_LEFT)
      '      ~EndPaint(hWndMain&, V:ps.) ' not req'd for this demo
      '      RETVAL 0 ' ditto
      rect.top = rect.top + 35 ' this factor line-height-dependent
      ' Need to check if a line was actually wrapped - this makes
      ' large gaps between lines that are just empty lines.
    LOOP
    CLOSE #1
  CASE WM_DESTROY
    ~PostQuitMessage(0)
    RETVAL 0
  DEFAULT
    RETVAL DefWindowProc(hWnd&, message&, wParam&, lParam%)
  ENDSWITCH
RETURN


PROCEDURE OpenObjects
  StatusBarFont& =
CreateFont(12,5,0,0,100,0,0,0,ANSI_CHARSET,OUT_DEFAULT_PRECIS,
CLIP_DEFAULT_PRECIS, PROOF_QUALITY,VARIABLE_PITCH | FF_ROMAN, "Helv")
  tollbitmap& = LoadBitmap(_INSTANCE,101)
  yelBrush& = CreateSolidBrush(RGB(255,255,200))
  FILESELECT "*.*","",n$
RETURN


PROCEDURE Add_Menu
  main_menu& = CreateMenu()
  file_menu& = CreatePopupMenu()
  edit_menu& = CreatePopupMenu()
  help_menu& = CreatePopupMenu()
  //
  ~AppendMenu(file_menu&,MF_STRING,101,"&New")
  ~AppendMenu(file_menu&,MF_STRING,102,"&Open")
  ~AppendMenu(file_menu&,MF_STRING,103,"&Save")
  ~AppendMenu(file_menu&,MF_STRING,104,"Save &As")
  ~AppendMenu(file_menu&,MF_SEPARATOR,-1,"")

  ~AppendMenu(file_menu&,MF_STRING,105,"&Print")
  ~AppendMenu(file_menu&,MF_STRING,106,"Printer Set&up")
  ~AppendMenu(file_menu&,MF_SEPARATOR,-1,"")
  ~AppendMenu(file_menu&,MF_STRING,107,"E&xit")
  ~AppendMenu(main_menu&,MF_POPUP,file_menu&,"&File")
  //
  ~AppendMenu(edit_menu&,MF_STRING,111,"&Cut")
  ~AppendMenu(edit_menu&,MF_STRING,112,"C&opy")
  ~AppendMenu(edit_menu&,MF_STRING,113,"&Paste")
  ~AppendMenu(main_menu&,MF_POPUP,edit_menu&,"&Edit")
  //
  ~AppendMenu(help_menu&,MF_STRING,121,"&About")
  ~AppendMenu(main_menu&,MF_POPUP,help_menu&,"&Help")
  //
  ~SetMenu(hWndMain&,main_menu&)
RETURN


PROCEDURE CloseObjects
  ~DeleteObject(StatusBarFont&)
  ~DeleteObject(tollbitmap&)
  ~DeleteObject(yelBrush&)
RETURN


PROCEDURE about
  licence$ = " by Dale Bryant"
  button_style% = WS_VISIBLE | WS_CHILD | BS_PUSHBUTTON /* push button style
  DLG 3D ON //option to try with and without (DLG 3D ON)
  DIALOG #5,_X / 4,_Y / 4,318,180 + 45,"About Program",WS_SYSMENU,-15,"MS
Sans Serif"
    CONTROL "",200,"static",SS_CENTER,40,10,250,18
    CONTROL "",201,"static",SS_CENTER,40,10 + 20,250,18
    CONTROL "",202,"static",SS_CENTER,40,10 + 20 + 30,250,18
    CONTROL "",203,"static",SS_CENTER,40,10 + 20 + 30 + 30,250,18
    CONTROL "",204,"static",SS_CENTER,40,10 + 20 + 30 + 30 + 20,250,18
    CONTROL "",205,"static",SS_CENTER,40,10 + 20 + 30 + 30 + 20 + 25,250,18
    CONTROL "",104,"static",$10000007,5,5,305,160 + 30
    CONTROL "",105,"static",$10000009,6,6,305,160 + 30
    ICON "#1",2,10,10,1,1,SS_ICON
    ICON "#1",3,275,10,1,1,SS_ICON
    CONTROL "&OK",206,"button",button_style%,(325 / 2) - 31,10 + 20 + 30 +
30 + 20 + 30 + 20,62,25
  ENDDIALOG
  DLG FILL 5,RGB(192,192,192)
  _WIN$(DLGITEM(5,200)) = "Create WIndow"
  _WIN$(DLGITEM(5,201)) = "From GFAWHELP File"
  _WIN$(DLGITEM(5,202)) = "Collected - Written - Compiled"
  _WIN$(DLGITEM(5,203)) = "Using Help Magic"
  _WIN$(DLGITEM(5,204)) = licence$
  _WIN$(DLGITEM(5,205)) = "Freeware"
  SHOWDIALOG #5
  @hndlabout
RETURN


PROCEDURE hndlabout
  REPEAT
    PEEKEVENT
  UNTIL MENU(1) = 30 AND MENU(12) = 206 OR MENU(1) = 4
  DLG 3D OFF
  CLOSEDIALOG  #5
RETURN






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 21:59:48 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JCWV-00NNiaC>; Sat, 6 Mar 1999 09:33:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA15720; Sat, 6 Mar 1999 09:18:27 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E0F5CC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Mar 1999 09:19:32 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Windows NT 4.0
X-UIDL: 2a4881051814d2e66eb4dfb412e6cd44

Hi!

I check my application in this way:

  a% = GetVersion ()
  '
  IF HIBYTE (LOWORD (a%)) = 95 && HIBYTE (HIWORD (a%))
    w95! = TRUE
  ELSE IF HIBYTE (LOWORD (a%)) = 10 && !(LOBYTE (HIWORD (a%)))
   w95! = TRUE
    nt! = TRUE
  ELSE IF HIBYTE (LOWORD (a%)) = 10 && LOBYTE (HIWORD (a%))
    w95! = FALSE
    nt! = FALSE
  ENDIF

Eberhard


>Hi!
>
>When I check the Windows version on WinNT 4.0 I get 3.10 and not 4.0 as I
>thought. I want to check the version because my program has some features
>that Windows 95 and NT have, but Windows 3.1 has not. For example the
>progress bar or long file names.
>
>Is there another way to check if the Windows version has specific
>capabilities?
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 21:59:49 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JDLx-00NSTCC>; Sat, 6 Mar 1999 10:26:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA15854; Sat, 6 Mar 1999 10:11:36 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E10244.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Mar 1999 10:12:43 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] A way to the RichEdit control

X-UIDL: 693c48cd027b4c4b718fe36e366732c3

Hi!

At Freitag, 5. Mrz 1999 21:04 you wrote:


>At 17:57 05.03.1999 +0100, you wrote:
>>By the way, to write my richedit.exe I had needed about two months.
>>It's not simple. E.g.: to load rtf or txt files you must work with stream
>>functions and a hand full structures.
>
>:-))))) I know - that was why I made also tests in 32bit C instead of
>a 16 bit language first.
>
>>Otherwise the riched.dll works very good until the limit size of 3532
lines.
>>Because I don't know.
>
>Is the limit set by lines or by RTF characters? - On the other hand I am
>not very astonished; this could be a limitation of 16 Bit (64KB segment).

>
>Do You know if the 16bit RICHED.DLL is "free" or redistributable?
>(May be a part of a free software packet for example)?


I mean, this MS DLL is so free like riched32.dll or all other MS DLLs.

I only found out, that in my application RTF- or TXT files are always
limited
at 3582 lines.
e.g.: Loading txt file with 237 107 bytes, the richedit window shows 3282
lines.
Saving this text as txt file, you have a file size of 86 054 bytes.
Saving this file as rtf file, you have a file size of 104 291 bytes.

I don't know about the limitation. No description in any books.
But more I don't want know. For me it was a good example for learning
programing. Thats all.

Eberhard.




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 22:01:44 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JETb-00NSTCC>; Sat, 6 Mar 1999 11:38:35 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA15992; Sat, 6 Mar 1999 11:23:58 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E11325.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990306102351.BIIP18255@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 6 Mar 1999 10:23:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 6 Mar 1999 10:23:51 +0000
Subject: [GFA] I donno!   0603zz2-
X-UIDL: 1abd89ee70e88a456b5784fc7cad5fc1

06/03/99 04:21:07 AM   I donno!   0603zz2-

Ok - prints to printer in selected font @ about selected size.

Doesn't like me anymore for some reason.

HELP!  HELP!  HELP!  HELP!  HELP!  HELP!  HELP!  HELP!  HELP!
--------------------------------------------------------------' ophir05.lst
from DrawText() :PRIMARY by Ophir Daniel
' An attempt by TomR. to work out wordwrap.  Ha!
' Adds the printer.
@Initialise
@OpenObjects
@CreateMainWindow("GfawhelpClass","Gfaw Window")
@Add_Menu
~ShowWindow(hWndMain&,1)
~MoveWindow(hWndMain&,0,0,_X ,_Y - 10,TRUE)
WHILE GetMessage(*msg.,NULL,NULL,NULL)
  ~TranslateMessage(*msg.)
  ~DispatchMessage(*msg.)
WEND
@CloseObjects


PROCEDURE Initialise
  cx& = GETDEVCAPS(HORZRES)
  cy& = GETDEVCAPS(VERTRES)
  dv&  = _DRIVE
  dr$ = DIR$(0)

  TYPE tagWNDCLASS:
  - WORD style
  - LONG lpFNWndProc
  - WORD cbClsExtra
  - WORD cbWndExtra
  - WORD hInstance
  - WORD hIcon
  - WORD hCursor
  - WORD hbrBackground
  - LONG lpszMenuName
  - LONG lpszClassName
  ENDTYPE
  tagWNDCLASS:wndclass.
  //
  TYPE tagRECT:
  - SHORT left
  - SHORT top
  - SHORT right
  - SHORT bottom
  ENDTYPE
  tagRECT: rect.
  //
  TYPE tagPAINTSTRUCT:
  - SHORT  hdc
  - USHORT fErase
  - SHORT  x1
  - SHORT  y1
  - SHORT  x2
  - SHORT  y2
  - USHORT fRestore
  - USHORT fIncUpdate
  - CHAR(16) rgbReserved$
  ENDTYPE
  tagPAINTSTRUCT: ps.
  //
  TYPE tagMSG:
  - WORD   hwnd
  - INT   message
  - WORD wParam
  - LONG lParam
  - DWORD  time
  - LONG  pt
  ENDTYPE
  tagMSG:msg.
  //
  TYPE tagPOINT:
  - SHORT  x
  - SHORT y
  ENDTYPE
  tagPOINT:pt.
  //
RETURN


PROCEDURE CreateMainWindow(ClassName$,title$)
  ClassName$ = ClassName$ + CHR$(0)
  title$ = title$ + CHR$(0)
  _CB (11)= MainWindowProc(wwwl)
  wndclass.style         = CS_HREDRAW | CS_VREDRAW | WS_CAPTION
  wndclass.lpFNWndProc   = _CB(11)
  wndclass.cbClsExtra    = 0
  wndclass.cbWndExtra    = 0
  wndclass.hInstance     = _INSTANCE
  wndclass.hIcon         = LoadIcon  ( _INSTANCE,101 )
  wndclass.hCursor       = LoadCursor( 0, IDC_ARROW )
  wndclass.hbrBackground = GetStockObject( WHITE_BRUSH )
  wndclass.lpszMenuName  = NULL
  wndclass.lpszClassName = V:ClassName$
  ~RegisterClass( V: wndclass.)
  st%   =  WS_CAPTION | WS_CLIPCHILDREN | WS_OVERLAPPEDWINDOW
  hWndMain& = CreateWindow(ClassName$, title$, st%, 10, 10, _X - 20, _Y -
20, 0, 0, _INSTANCE, 0)
RETURN


PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
  SWITCH message&
  CASE WM_SIZE
    ~GetClientRect(hWndMain&,*rect.)
    ~MoveWindow(hWndStatus&,-2,rect.bottom - 20,rect.right + 4,25,1)
  CASE WM_MENUSELECT
    @menuselectinfo(wParam&)
  CASE WM_COMMAND
    SWITCH (wParam&)
    CASE 107,809
      ~PostMessage(hWndMain&,WM_CLOSE,0,0)
    CASE 121,808
      @about
    ENDSWITCH
    RETVAL 0
  CASE WM_PAINT
    hdc& = BeginPaint(hWndMain&, V:ps.)
    ~GetClientRect(hWndMain&,*rect.)
    ~SetBkMode(hdc&,TRANSPARENT)
    ~SetTextColor(hdc&,RGB(0,0,127))
    @Print_One()
  CASE WM_DESTROY
    ~PostQuitMessage(0)
    RETVAL 0
  DEFAULT
    RETVAL DefWindowProc(hWnd&, message&, wParam&, lParam%)
  ENDSWITCH
RETURN


PROCEDURE OpenObjects
  StatusBarFont& =
CreateFont(12,5,0,0,100,0,0,0,ANSI_CHARSET,OUT_DEFAULT_PRECIS,
CLIP_DEFAULT_PRECIS, PROOF_QUALITY,VARIABLE_PITCH | FF_ROMAN, "Helv")
  tollbitmap& = LoadBitmap(_INSTANCE,101)
  yelBrush& = CreateSolidBrush(RGB(255,255,200))
RETURN


PROCEDURE Add_Menu
  main_menu& = CreateMenu()
  file_menu& = CreatePopupMenu()
  edit_menu& = CreatePopupMenu()
  help_menu& = CreatePopupMenu()
  //
  ~AppendMenu(file_menu&,MF_STRING,101,"&New")
  ~AppendMenu(file_menu&,MF_STRING,102,"&Open")
  ~AppendMenu(file_menu&,MF_STRING,103,"&Save")
  ~AppendMenu(file_menu&,MF_STRING,104,"Save &As")
  ~AppendMenu(file_menu&,MF_SEPARATOR,-1,"")

  ~AppendMenu(file_menu&,MF_STRING,105,"&Print")
  ~AppendMenu(file_menu&,MF_STRING,106,"Printer Set&up")
  ~AppendMenu(file_menu&,MF_SEPARATOR,-1,"")
  ~AppendMenu(file_menu&,MF_STRING,107,"E&xit")
  ~AppendMenu(main_menu&,MF_POPUP,file_menu&,"&File")
  //
  ~AppendMenu(edit_menu&,MF_STRING,111,"&Cut")
  ~AppendMenu(edit_menu&,MF_STRING,112,"C&opy")
  ~AppendMenu(edit_menu&,MF_STRING,113,"&Paste")
  ~AppendMenu(main_menu&,MF_POPUP,edit_menu&,"&Edit")
  //
  ~AppendMenu(help_menu&,MF_STRING,121,"&About")
  ~AppendMenu(main_menu&,MF_POPUP,help_menu&,"&Help")
  //
  ~SetMenu(hWndMain&,main_menu&)
RETURN


PROCEDURE CloseObjects
  ~DeleteObject(StatusBarFont&)
  ~DeleteObject(tollbitmap&)
  ~DeleteObject(yelBrush&)
RETURN


PROCEDURE about
  licence$ = " by Dale Bryant"
  button_style% = WS_VISIBLE | WS_CHILD | BS_PUSHBUTTON /* push button style
  DLG 3D ON //option to try with and without (DLG 3D ON)
  DIALOG #5,_X / 4,_Y / 4,318,180 + 45,"About Program",WS_SYSMENU,-15,"MS
Sans Serif"
    CONTROL "",200,"static",SS_CENTER,40,10,250,18
    CONTROL "",201,"static",SS_CENTER,40,10 + 20,250,18
    CONTROL "",202,"static",SS_CENTER,40,10 + 20 + 30,250,18
    CONTROL "",203,"static",SS_CENTER,40,10 + 20 + 30 + 30,250,18
    CONTROL "",204,"static",SS_CENTER,40,10 + 20 + 30 + 30 + 20,250,18
    CONTROL "",205,"static",SS_CENTER,40,10 + 20 + 30 + 30 + 20 + 25,250,18
    CONTROL "",104,"static",$10000007,5,5,305,160 + 30
    CONTROL "",105,"static",$10000009,6,6,305,160 + 30
    ICON "#1",2,10,10,1,1,SS_ICON
    ICON "#1",3,275,10,1,1,SS_ICON
    CONTROL "&OK",206,"button",button_style%,(325 / 2) - 31,10 + 20 + 30 +
30 + 20 + 30 + 20,62,25
  ENDDIALOG
  DLG FILL 5,RGB(192,192,192)
  _WIN$(DLGITEM(5,200)) = "Create WIndow"
  _WIN$(DLGITEM(5,201)) = "From GFAWHELP File"
  _WIN$(DLGITEM(5,202)) = "Collected - Written - Compiled"
  _WIN$(DLGITEM(5,203)) = "Using Help Magic"
  _WIN$(DLGITEM(5,204)) = licence$
  _WIN$(DLGITEM(5,205)) = "Freeware"
  SHOWDIALOG #5
  @hndlabout
RETURN


PROCEDURE hndlabout
  REPEAT
    PEEKEVENT
  UNTIL MENU(1) = 30 AND MENU(12) = 206 OR MENU(1) = 4
  DLG 3D OFF
  CLOSEDIALOG  #5
RETURN


PROCEDURE Print_One()
  DLG PRINT WIN(1),PD_ALLPAGES,Pdc&
  lpdevnamebuffer% = GlobalLock(_DI)
  ~GlobalFree(lpdevnamebuffer%)
  SETDC Pdc&
  IF Pdc&
    cxmax& = GETDEVCAPS(HORZRES)
    cymax& = GETDEVCAPS(VERTRES)
    cxdpi& = GETDEVCAPS(LOGPIXELSX)
    cydpi& = GETDEVCAPS(LOGPIXELSY)
    ~Escape(Pdc&,GETPHYSPAGESIZE,0,0,V:pxymax%)  // gives bigger page than
devcaps(10)
    pxmax& = LOWORD(pxymax%) // get printer maximum horizontal pixels
    pymax& = HIWORD(pxymax%) // get printer maximum vertical pixels
    '    FREEDC dc&
  ENDIF
  DLG FONT 1,Pdc&,CF_BOTH | CF_EFFECTS,0,0,0,""
  FILESELECT #"Select file to print...","*.*","",np$
  DIM printer_x_y&(1)
  @Set_A_Font()
  STARTDOC "CHARTEST"
  @Stampa()
  SETFONT OEM_FIXED_FONT
  FREEFONT printfont&
  NEW FRAME
  ENDDOC
  SETDC _DC(1)
  FREEDC Pdc&
RETURN


PROCEDURE Stampa()
  ChArLiE& = 1
  @Set_A_Font()
  OPEN "i", #1, np$

  rect.top = 0
  rect.left = 0
  rect.right = cxmax& - 300 ' set to right built-in margin
  rect.bottom = cymax&

  WHILE NOT EOF(#1)
    LINE INPUT #1, Chas$
    '    INPUT #1,Chas$
    Chas& = LEN(Chas$)
    caz% ++
    l% = caz% * 20
    ~DrawText(Pdc&,Chas$,Chas&,*rect.,DT_WORDBREAK | DT_LEFT)
    rect.top = rect.top + _DX '35 ' this factor line-height-dependent
    IF caz% = 20 THEN
      caz% = 0
      NEW FRAME
      @Set_A_Font()
    ENDIF
  WEND
  CLOSE #1
  ChArLiE& = 0
RETURN


PROCEDURE Set_A_Font()
  SETFONT printfont&
  ~Escape(Pdc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
  IF ChArLiE& = 1 THEN GOTO ScRuNcH
  RFONT  WIDTH w&,HEIGHT h&
  neww& = w& / 2 * printer_x_y&(0) / _X
  newh& = h& / 2 * printer_x_y&(1) / _X
  ScRuNcH:
  RFONT ITALIC italic&
  RFONT UNDERLINE underline&
  RFONT STRIKEOUT strikeout&
  RFONT CHARSET charset&
  RFONT CLIPPRECISION clipprecision&
  RFONT QUALITY quality&
  RFONT PITCH pitch&
  RFONT FAMILY family&
  RFONT WEIGHT weight&
  RFONT ORIENTATION orientation&
  RFONT ESCAPEMENT escapement&
  FONT ITALIC italic&, UNDERLINE underline&, STRIKEOUT strikeout&
  FONT CHARSET charset&, CLIPPRECISION clipprecision&, QUALITY quality&
  FONT QUALITY quality&, PITCH pitch&, FAMILY family&, WEIGHT weight&
  FONT WIDTH neww&, HEIGHT newh&, ORIENTATION orientation&, ESCAPEMENT
escapement&
  FONT TO printfont&
RETURN






---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 22:01:47 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JEpZ-00NLKUC>; Sat, 6 Mar 1999 12:01:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA16061; Sat, 6 Mar 1999 11:46:43 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E11876.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 06 Mar 1999 10:25:08 +0100
In-Reply-To: <36E072A0.BeroList-2.5.9@aachen.linux.de>
References: <36E05DC8.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] Network communications
X-UIDL: aa20d814249757da2288b596d861a8f1

At 23:58 05.03.99 +0100, Sjaak Aarnoutse wrote:

>> A am running a program on some computers in a local area network. Is there
>> an easy way do exchange information between the programs? 
>
>It depends on your needs, are we talking about massive transfers? 

No, its just some strings. Up to 100 bytes per transfer and there are some
seconds between each transfer. 

I am developing a program that keeps track of the opened MDI windows in a
particular program. When two or more MDI client windows are opened my
program presents a warning message. This already works an a single machine
but I need to take care that on every machine in the network a particular
MDI client is opened only once at a time.

The MDI program is a system for developing database applications. It is not
a good thing if two or more developers work on the same application object,
so I want to ckeck this.

>Does the information have to be private shielded for other 
>workstations? 

That's not neccessary.

>Probably the easiest way to communicate between workstations is 
>to do file-based I/O on a shared drive. This method would isolate 
>you from all network complexity.

That's how I am doing it now.

>If you only want to exchange status-info, you can even do a lot by 
>manipulating the the filename or filedate of a certain shared file or 
>just testing the mere existence of a certain file. 

What I need to know is if a machine who sent some data is still running
when I read the data. I use a file where the machine stores it's time as a
string and when I read two different times I know that the machine is still
running.

>If you want to exchange lots of data make sure to keep files open 
>for a minimum of time, and make sure your programs react well on 
>predictable  "file opened by another user" errors

I still haven figured out what happens when two or more machines try to
open a shared file for write access. I think I have to work with TRY/CATCH.


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 22:01:48 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JIa7-00NRHjC>; Sat, 6 Mar 1999 16:01:35 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA16443; Sat, 6 Mar 1999 15:20:08 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E14A92.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 06 Mar 1999 13:45:25 +0100
In-Reply-To: <36E0F5CC.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] Windows NT 4.0
X-UIDL: 35526cb98575023f1612495c444d2bd7

At 09:19 06.03.99 +0100, Eberhard Funck wrote:
>Hi!
>
>I check my application in this way:
>
>  a% = GetVersion ()
>  '
>  IF HIBYTE (LOWORD (a%)) = 95 && HIBYTE (HIWORD (a%))
>    w95! = TRUE
>  ELSE IF HIBYTE (LOWORD (a%)) = 10 && !(LOBYTE (HIWORD (a%)))
>   w95! = TRUE
>    nt! = TRUE
>  ELSE IF HIBYTE (LOWORD (a%)) = 10 && LOBYTE (HIWORD (a%))
>    w95! = FALSE
>    nt! = FALSE 
>  ENDIF

This does not work. At least on my computer running Windows 98.


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 22:01:49 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JJoA-00NRHjC>; Sat, 6 Mar 1999 17:20:10 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA16608; Sat, 6 Mar 1999 16:39:00 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E15CFF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Mar 1999 16:40:03 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Windows NT 4.0
X-UIDL: 86d66beda048d2c32f9c36006e5c375c

Hi,

I have forgotten something.
Excuse me please.

a% = GetVersion ()
w95! = FALSE, w98! = FALSE, nt! = FALSE, w311! = FALSE
'
IF HIBYTE (LOWORD (a%)) = 95 && HIBYTE (HIWORD (a%))
   w95! = TRUE
ELSE HIBYTE (LOWORD (a%)) = 95 && !(HIBYTE (HIWORD (a%)))
   w98! = TRUE
ELSE IF HIBYTE (LOWORD (a%)) = 10 && !(LOBYTE (HIWORD (a%)))
   nt! = TRUE
ELSE IF HIBYTE (LOWORD (a%)) = 10 && LOBYTE (HIWORD (a%))
   w311! = TRUE 
ENDIF

This works on my computers at Windows 3.11, 95, 98 and NT 4.0

Greetings

Eberhard



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 22:01:49 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JJon-00NSTDC>; Sat, 6 Mar 1999 17:20:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA16665; Sat, 6 Mar 1999 17:06:04 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E16350.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Mar 1999 08:04:25 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Windows NT 4.0
X-UIDL: 81a7ff01789b9f2b60420f410dd8c93a

Hi Eberhard,
When I run this it reports w98 and I am using W95.
Dale

----- Original Message -----
From: Eberhard Funck <funck@hildesheim.sgh-net.de>
To: <gfabasic@aachen.linux.de>
Sent: Saturday, March 06, 1999 7:40 AM
Subject: Re: [GFA] Windows NT 4.0


>Hi,
>
>I have forgotten something.
>Excuse me please.
>
>a% = GetVersion ()
>w95! = FALSE, w98! = FALSE, nt! = FALSE, w311! = FALSE
>'
>IF HIBYTE (LOWORD (a%)) = 95 && HIBYTE (HIWORD (a%))
>   w95! = TRUE
>ELSE HIBYTE (LOWORD (a%)) = 95 && !(HIBYTE (HIWORD (a%)))
>   w98! = TRUE
>ELSE IF HIBYTE (LOWORD (a%)) = 10 && !(LOBYTE (HIWORD (a%)))
>   nt! = TRUE
>ELSE IF HIBYTE (LOWORD (a%)) = 10 && LOBYTE (HIWORD (a%))
>   w311! = TRUE
>ENDIF
>
>This works on my computers at Windows 3.11, 95, 98 and NT 4.0
>
>Greetings
>
>Eberhard
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 06 22:01:50 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JJrL-00NSTOC>; Sat, 6 Mar 1999 17:23:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA16681; Sat, 6 Mar 1999 17:08:56 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E163FB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Mar 1999 08:07:14 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Windows NT 4.0
X-UIDL: 4ec52b9fa217c88f43fae5596a14133e

I am running 95 and this reports 98.

----- Original Message -----
From: Michael Weigand <michael-weigand@foni.net>
To: <gfabasic@aachen.linux.de>
Sent: Saturday, March 06, 1999 4:45 AM
Subject: Re: [GFA] Windows NT 4.0


>At 09:19 06.03.99 +0100, Eberhard Funck wrote:
>>Hi!
>>
>>I check my application in this way:
>>
>>  a% = GetVersion ()
>>  '
>>  IF HIBYTE (LOWORD (a%)) = 95 && HIBYTE (HIWORD (a%))
>>    w95! = TRUE
>>  ELSE IF HIBYTE (LOWORD (a%)) = 10 && !(LOBYTE (HIWORD (a%)))
>>   w95! = TRUE
>>    nt! = TRUE
>>  ELSE IF HIBYTE (LOWORD (a%)) = 10 && LOBYTE (HIWORD (a%))
>>    w95! = FALSE
>>    nt! = FALSE
>>  ENDIF
>
>This does not work. At least on my computer running Windows 98.
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 07 12:15:00 1999
Return-Path: <vware@gmx.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JOXH-00NSTSC>; Sat, 6 Mar 1999 22:23:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA17346; Sat, 6 Mar 1999 22:07:49 +0100
From: Georg Veichtlbauer <vware@gmx.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E1AA14.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Mar 1999 22:07:48 +0100 (MET)
X-Authenticated-Sender: #0000929469@gmx.net
X-Authenticated-IP: [195.3.96.69]
X-Mailer: WWW-Mail 1.5 (Global Message Exchange)
Subject: Re: [GFA] Windows NT 4.0
X-UIDL: 3f30cce1b670c0b96385c1e95ed57a87

Here's a routine to determine the exact Windows- Version. It works fine on
Windows 95,98 and NT. It should also work on Win 3.1 with Win32s.

Georg Veichtlbauer

--------------------------------------------------

TYPE OSVERSIONINFO: //Declare required TYPE
- LONG dwOsVersionInfoSize
- LONG dwMajorVersion
- LONG dwMinorVersion
- LONG dwBuildNumber
- LONG dwPlatformId
- CHAR*128 szCSDVersion$
ENDTYPE
DIM OSVERSIONINFO:vInfo.
DLL #1,"kernel" //Declare functions for WOW!
  DECL DWORD LoadLibraryEx32W(L,L,L) AS 513
  DECL BOOL FreeLibrary32W(L) AS 514
  DECL DWORD GetProcAddress32W(L,L) AS 515
  DECL DWORD CallProc32W_1(L,L,L,L) AS 517
ENDDLL
hInst32% = @@LoadLibraryEx32W("kernel32",0,0) //Load Kernel32.dll
Adresse_wininfo% = @@GetProcAddress32W(hInst32%,"GetVersionExA") //Adress
for GetVersionEx
fAddressConvert& = $1
vInfo.dwOsVersionInfoSize = LEN(vInfo.)
Return% = @@CallProc32W_1(V:vInfo.,Adresse_wininfo%,fAddressConvert&,1)
//Use WOW!
Plattform% = vInfo.dwPlatformId
Major% = vInfo.dwMajorVersion
Minor% = vInfo.dwMinorVersion
IF Return% <> 0 THEN
  SELECT  Plattform% //Platform
  CASE 2
    Platform$ = "Windows NT (WIN32)"
  CASE 1
    Platform$ = "Windows 95/98 (WIN32)"
  CASE 0
    Platform$ = "Windows 3.1 (WIN32s)"
  ENDSELECT
  ma$ = TRIM$(STR$(Major%)) //Major- Version
  mi$ = TRIM$(STR$(Minor%)) //Minor- Version
  IF LEN(mi$) = 1 THEN mi$ = "0" + mi$
  IF Plattform% = 2
    B$ = STR$(vInfo.dwBuildNumber)
  ELSE
    B$ = STR$(vInfo.dwBuildNumber AND 65535)
  ENDIF
  Vers$ = ma$ + "." + mi$ + "." + B$ //Version
  Info$ = vInfo.szCSDVersion$ //Extension (i.e. "B" for Win95)
  IF SYSMETRIC(SM_DEBUG) = 1 //Debug- Version?
    debug$ = "Yes"
  ELSE
    debug$ = "No"
  ENDIF
  MESSAGE Platform$ + CHR$(13) + Vers$ + " " + Info$ + CHR$(13) + "Debug-
Version: "+debug$,"Windows- Version",MB_OK | MB_ICONINFORMATION,n&
ELSE
  MESSAGE "An error has occured!","Windows- Version",MB_OK |
MB_ICONSTOP,n&
ENDIF
IF win95! = TRUE THEN ~@@FreeLibrary32W(hInst32%) //Free Kernel32
FREEDLL 1

---
Sent through Global Message Exchange - http://www.gmx.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 07 12:15:02 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JOoy-00NQdDC>; Sat, 6 Mar 1999 22:41:20 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA17426; Sat, 6 Mar 1999 22:26:39 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E1AE72.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Mar 1999 22:26:36 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Windows NT 4.0

X-UIDL: 38288edda6f010ca002f9bbf56bcb649

Hallo Dale,

You wrote:
at Datum: Samstag, 6. Mrz 1999 17:07



>Hi Eberhard,
>When I run this it reports w98 and I am using W95.


>>a% = GetVersion ()
>>w95! = FALSE, w98! = FALSE, nt! = FALSE, w311! = FALSE
>>'
>>IF HIBYTE (LOWORD (a%)) = 95 && HIBYTE (HIWORD (a%))
>>   w95! = TRUE
>>ELSE HIBYTE (LOWORD (a%)) = 95 && !(HIBYTE (HIWORD (a%)))
>>   w98! = TRUE
>>ELSE IF HIBYTE (LOWORD (a%)) = 10 && !(LOBYTE (HIWORD (a%)))
>>   nt! = TRUE
>>ELSE IF HIBYTE (LOWORD (a%)) = 10 && LOBYTE (HIWORD (a%))
>>   w311! = TRUE
>>ENDIF
>>
>>This works on my computers at Windows 3.11, 95, 98 and NT 4.0


I have checked this on my two computers with 3.11 / 95B and 98 / NT 4.0
It's OK on my sytems.
95 -->HIBYTE (HIWORD (a%)) != 0
98 -->HIBYTE (HIWORD (a%)) = 0


Greetings

Eberhard



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 07 12:15:03 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JPUK-00NRHjC>; Sat, 6 Mar 1999 23:24:04 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA17539; Sat, 6 Mar 1999 23:07:46 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E1B817.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 6 Mar 1999 14:06:06 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Windows NT 4.0
X-UIDL: f984f36981f71466d306ae752ce092ae

Ok Eberhard, I will check it again.
Dale

----- Original Message -----
From: Eberhard Funck <funck@hildesheim.sgh-net.de>
To: <gfabasic@aachen.linux.de>
Sent: Saturday, March 06, 1999 1:26 PM
Subject: Re: [GFA] Windows NT 4.0


>Hallo Dale,
>
>You wrote:
>at Datum: Samstag, 6. Mrz 1999 17:07
>
>
>
>>Hi Eberhard,
>>When I run this it reports w98 and I am using W95.
>
>
>>>a% = GetVersion ()
>>>w95! = FALSE, w98! = FALSE, nt! = FALSE, w311! = FALSE
>>>'
>>>IF HIBYTE (LOWORD (a%)) = 95 && HIBYTE (HIWORD (a%))
>>>   w95! = TRUE
>>>ELSE HIBYTE (LOWORD (a%)) = 95 && !(HIBYTE (HIWORD (a%)))
>>>   w98! = TRUE
>>>ELSE IF HIBYTE (LOWORD (a%)) = 10 && !(LOBYTE (HIWORD (a%)))
>>>   nt! = TRUE
>>>ELSE IF HIBYTE (LOWORD (a%)) = 10 && LOBYTE (HIWORD (a%))
>>>   w311! = TRUE
>>>ENDIF
>>>
>>>This works on my computers at Windows 3.11, 95, 98 and NT 4.0
>
>
>I have checked this on my two computers with 3.11 / 95B and 98 / NT 4.0
>It's OK on my sytems.
>95 -->HIBYTE (HIWORD (a%)) != 0
>98 -->HIBYTE (HIWORD (a%)) = 0
>
>
>Greetings
>
>Eberhard
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 07 12:15:05 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JV4e-00NRI5C>; Sun, 7 Mar 1999 05:21:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA18146; Sun, 7 Mar 1999 05:07:15 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E20C5C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990307040701.BNRT3511@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 7 Mar 1999 04:07:01 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 7 Mar 1999 04:07:01 +0000
Subject: [GFA] font selection   0603zz3-
X-UIDL: 333a62ad851a20cad3e204f0fb68bcf7

06/03/99 10:04:11 PM   font selection   0603zz3-

I'm not getting my font - please show me why.
-------------------------------------------------
' ophir06.lst from DrawText() :PRIMARY by Ophir Daniel
' An attempt by TomR. to work out wordwrap.  Ha!
' Adds a fileselect & gets more than one line. <GGGGGGGGGGG>!
' Adds font selection but doesn't get the font!
@Initialise
@OpenObjects
@CreateMainWindow("GfawhelpClass","Gfaw Window")
@Add_Menu
~ShowWindow(hWndMain&,1)
~MoveWindow(hWndMain&,0,0,_X ,_Y - 10,TRUE)
WHILE GetMessage(*msg.,NULL,NULL,NULL)
  ~TranslateMessage(*msg.)
  ~DispatchMessage(*msg.)
WEND
@CloseObjects


PROCEDURE Initialise
  cx& = GETDEVCAPS(HORZRES)
  cy& = GETDEVCAPS(VERTRES)
  dv&  = _DRIVE
  dr$ = DIR$(0)

  TYPE tagWNDCLASS:
  - WORD style
  - LONG lpFNWndProc
  - WORD cbClsExtra
  - WORD cbWndExtra
  - WORD hInstance
  - WORD hIcon
  - WORD hCursor
  - WORD hbrBackground
  - LONG lpszMenuName
  - LONG lpszClassName
  ENDTYPE
  tagWNDCLASS:wndclass.
  //
  TYPE tagRECT:
  - SHORT left
  - SHORT top
  - SHORT right
  - SHORT bottom
  ENDTYPE
  tagRECT: rect.
  //
  TYPE tagPAINTSTRUCT:
  - SHORT  hdc
  - USHORT fErase
  - SHORT  x1
  - SHORT  y1
  - SHORT  x2
  - SHORT  y2
  - USHORT fRestore
  - USHORT fIncUpdate
  - CHAR(16) rgbReserved$
  ENDTYPE
  tagPAINTSTRUCT: ps.
  //
  TYPE tagMSG:
  - WORD   hwnd
  - INT   message
  - WORD wParam
  - LONG lParam
  - DWORD  time
  - LONG  pt
  ENDTYPE
  tagMSG:msg.
  //
  TYPE tagPOINT:
  - SHORT  x
  - SHORT y
  ENDTYPE
  tagPOINT:pt.
  //
RETURN


PROCEDURE CreateMainWindow(ClassName$,title$)
  ClassName$ = ClassName$ + CHR$(0)
  title$ = title$ + CHR$(0)
  _CB (11)= MainWindowProc(wwwl)
  wndclass.style         = CS_HREDRAW | CS_VREDRAW | WS_CAPTION
  wndclass.lpFNWndProc   = _CB(11)
  wndclass.cbClsExtra    = 0
  wndclass.cbWndExtra    = 0
  wndclass.hInstance     = _INSTANCE
  wndclass.hIcon         = LoadIcon  ( _INSTANCE,101 )
  wndclass.hCursor       = LoadCursor( 0, IDC_ARROW )
  wndclass.hbrBackground = GetStockObject( WHITE_BRUSH )
  wndclass.lpszMenuName  = NULL
  wndclass.lpszClassName = V:ClassName$
  ~RegisterClass( V: wndclass.)
  st%   =  WS_CAPTION | WS_CLIPCHILDREN | WS_OVERLAPPEDWINDOW
  hWndMain& = CreateWindow(ClassName$, title$, st%, 10, 10, _X - 20, _Y -
20, 0, 0, _INSTANCE, 0)
RETURN


PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
  SWITCH message&
  CASE WM_SIZE
    ~GetClientRect(hWndMain&,*rect.)
    ~MoveWindow(hWndStatus&,-2,rect.bottom - 20,rect.right + 4,25,1)
  CASE WM_MENUSELECT
    @menuselectinfo(wParam&)
  CASE WM_COMMAND
    SWITCH (wParam&)
    CASE 107,809
      ~PostMessage(hWndMain&,WM_CLOSE,0,0)
    CASE 121,808
      @about
    ENDSWITCH
    RETVAL 0
  CASE WM_PAINT
    hdc& = BeginPaint(hWndMain&, V:ps.)
    ~GetClientRect(hWndMain&,*rect.)
    ~SetBkMode(hdc&,TRANSPARENT)
    ~SetTextColor(hdc&,RGB(0,0,127)) ' does absolutely nothing!
    OPEN "i",#1,n$
    rect.right = rect.right - 250 ' had to get shorter than my text lines
    DO UNTIL EOF(#1)
      LINE INPUT #1,Chas$
      Chas& = LEN(Chas$)
      IF Chas& < 2 THEN GOTO EmptyLine
      ~DrawText(hdc&,Chas$,Chas&,*rect.,DT_WORDBREAK | DT_CENTER)
      rect.top = rect.top + 35 // (h& * 2) ' this factor line-height-dependent
      ~EndPaint(hWndMain&, V:ps.) ' not req'd for this demo
      RETVAL 0 ' ditto
      EmptyLine:
    LOOP
    CLOSE #1
  CASE WM_DESTROY
    ~PostQuitMessage(0)
    RETVAL 0
  DEFAULT
    RETVAL DefWindowProc(hWnd&, message&, wParam&, lParam%)
  ENDSWITCH
RETURN


PROCEDURE OpenObjects
  StatusBarFont& =
CreateFont(12,5,0,0,100,0,0,0,ANSI_CHARSET,OUT_DEFAULT_PRECIS,
CLIP_DEFAULT_PRECIS, PROOF_QUALITY,VARIABLE_PITCH | FF_ROMAN, "Helv")
  tollbitmap& = LoadBitmap(_INSTANCE,101)
  yelBrush& = CreateSolidBrush(RGB(255,255,200))
  FILESELECT "*.*","",n$
  DLG FONT 1,hdc&,CF_BOTH | CF_EFFECTS,0,0,0,""
  RFONT  WIDTH w&,HEIGHT h&
  ChArLiE& = 1
  FONT TO screenfont&
  @Set_A_Font()
  SETFONT screenfont&
RETURN


PROCEDURE Add_Menu
  main_menu& = CreateMenu()
  file_menu& = CreatePopupMenu()
  edit_menu& = CreatePopupMenu()
  help_menu& = CreatePopupMenu()
  //
  ~AppendMenu(file_menu&,MF_STRING,101,"&New")
  ~AppendMenu(file_menu&,MF_STRING,102,"&Open")
  ~AppendMenu(file_menu&,MF_STRING,103,"&Save")
  ~AppendMenu(file_menu&,MF_STRING,104,"Save &As")
  ~AppendMenu(file_menu&,MF_SEPARATOR,-1,"")

  ~AppendMenu(file_menu&,MF_STRING,105,"&Print")
  ~AppendMenu(file_menu&,MF_STRING,106,"Printer Set&up")
  ~AppendMenu(file_menu&,MF_SEPARATOR,-1,"")
  ~AppendMenu(file_menu&,MF_STRING,107,"E&xit")
  ~AppendMenu(main_menu&,MF_POPUP,file_menu&,"&File")
  //
  ~AppendMenu(edit_menu&,MF_STRING,111,"&Cut")
  ~AppendMenu(edit_menu&,MF_STRING,112,"C&opy")
  ~AppendMenu(edit_menu&,MF_STRING,113,"&Paste")
  ~AppendMenu(main_menu&,MF_POPUP,edit_menu&,"&Edit")
  //
  ~AppendMenu(help_menu&,MF_STRING,121,"&About")
  ~AppendMenu(main_menu&,MF_POPUP,help_menu&,"&Help")
  //
  ~SetMenu(hWndMain&,main_menu&)
RETURN


PROCEDURE CloseObjects
  ~DeleteObject(StatusBarFont&)
  ~DeleteObject(tollbitmap&)
  ~DeleteObject(yelBrush&)
RETURN


PROCEDURE about
  licence$ = " by Dale Bryant"
  button_style% = WS_VISIBLE | WS_CHILD | BS_PUSHBUTTON /* push button style
  DLG 3D ON //option to try with and without (DLG 3D ON)
  DIALOG #5,_X / 4,_Y / 4,318,180 + 45,"About Program",WS_SYSMENU,-15,"MS
Sans Serif"
    CONTROL "",200,"static",SS_CENTER,40,10,250,18
    CONTROL "",201,"static",SS_CENTER,40,10 + 20,250,18
    CONTROL "",202,"static",SS_CENTER,40,10 + 20 + 30,250,18
    CONTROL "",203,"static",SS_CENTER,40,10 + 20 + 30 + 30,250,18
    CONTROL "",204,"static",SS_CENTER,40,10 + 20 + 30 + 30 + 20,250,18
    CONTROL "",205,"static",SS_CENTER,40,10 + 20 + 30 + 30 + 20 + 25,250,18
    CONTROL "",104,"static",$10000007,5,5,305,160 + 30
    CONTROL "",105,"static",$10000009,6,6,305,160 + 30
    ICON "#1",2,10,10,1,1,SS_ICON
    ICON "#1",3,275,10,1,1,SS_ICON
    CONTROL "&OK",206,"button",button_style%,(325 / 2) - 31,10 + 20 + 30 +
30 + 20 + 30 + 20,62,25
  ENDDIALOG
  DLG FILL 5,RGB(192,192,192)
  _WIN$(DLGITEM(5,200)) = "Create WIndow"
  _WIN$(DLGITEM(5,201)) = "From GFAWHELP File"
  _WIN$(DLGITEM(5,202)) = "Collected - Written - Compiled"
  _WIN$(DLGITEM(5,203)) = "Using Help Magic"
  _WIN$(DLGITEM(5,204)) = licence$
  _WIN$(DLGITEM(5,205)) = "Freeware"
  SHOWDIALOG #5
  @hndlabout
RETURN


PROCEDURE hndlabout
  REPEAT
    PEEKEVENT
  UNTIL MENU(1) = 30 AND MENU(12) = 206 OR MENU(1) = 4
  DLG 3D OFF
  CLOSEDIALOG  #5
RETURN


PROCEDURE Set_A_Font()
  '  SETFONT font&
  IF ChArLiE& = 1 THEN GOTO ScRuNcH
  ~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
  RFONT  WIDTH w&,HEIGHT h&
  neww& = w& / 2 * printer_x_y&(0) / _X
  newh& = h& / 2 * printer_x_y&(1) / _X
  ScRuNcH:
  RFONT ITALIC italic&
  RFONT UNDERLINE underline&
  RFONT STRIKEOUT strikeout&
  RFONT CHARSET charset&
  RFONT CLIPPRECISION clipprecision&
  RFONT QUALITY quality&
  RFONT PITCH pitch&
  RFONT FAMILY family&
  RFONT WEIGHT weight&
  RFONT ORIENTATION orientation&
  RFONT ESCAPEMENT escapement&
  FONT ITALIC italic&, UNDERLINE underline&, STRIKEOUT strikeout&
  FONT CHARSET charset&, CLIPPRECISION clipprecision&, QUALITY quality&
  FONT QUALITY quality&, PITCH pitch&, FAMILY family&, WEIGHT weight&
  '  FONT WIDTH neww&, HEIGHT newh&, ORIENTATION orientation&, ESCAPEMENT
escapement&
  FONT WIDTH w&, HEIGHT h&, ORIENTATION orientation&, ESCAPEMENT escapement&
  '  FONT TO font&
RETURN





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 07 12:15:08 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JYwb-00NLIeC>; Sun, 7 Mar 1999 09:29:53 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA18638; Sun, 7 Mar 1999 09:15:18 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E2467C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 06 Mar 1999 22:37:41 +0100
In-Reply-To: <36E1AA14.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] Windows NT 4.0
X-UIDL: 4d0462de0a9ecf49bf0bda7c330677d6

At 22:07 06.03.99 +0100, Georg Veichtlbauer wrote:

>Here's a routine to determine the exact Windows- Version. It works fine on
>Windows 95,98 and NT. It should also work on Win 3.1 with Win32s.

Looks quite interesting. But all the routines that were posted don't
distinguish between Windows NT 3.51 and 4.0. That can be a problem, because
WinNT 4.0 has the new controls that were introduced in Win 95, like to
progress bar, the drag list control or the status bar.

So how do I know if the program runs on Win NT 3.51?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 07 12:15:09 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JZii-00NNjIC>; Sun, 7 Mar 1999 10:19:36 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA18752; Sun, 7 Mar 1999 10:05:21 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E25235.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Mar 1999 04:04:52 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] font selection   0603zz3-
X-UIDL: 168c18c94f532d10e59fd840865f8536

Tom 

' SETFONT screenfont& ' selects a the font 'screenfont&' into the current
DC. 
However, when you called SETFONT, you have not yet created the window whose
DC you wish to use.
Selecting the font within the BEGINPAINT/ENDPAINT construct as shown below
works fine.

In fact, there is noplace else that you could set the font and have it used
by the first instance of he WM_PAINT handler.

Until the window is created, you cant get its DC, and until you Get its DC,
you cant set its font. But it is created at about the same time as it is
first painted. Sot there is noplace outside the callback that you could put
your setfont statement.

Furthermore, it appears that the  Beginpaint/endpaint consruct also
executes a savedc/ restoredc, so that any objects selected outside the
beginpaint/endpaint construct are lost. (this may be different with
different classs of window, but I dunno... see GETDC in win sdk for more
confusion.

Read comments with "  ***************  " below.

***************************************************************************
*********************

PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
  SWITCH message&
  CASE WM_SIZE
    ~GetClientRect(hWndMain&,*rect.)
    ~MoveWindow(hWndStatus&,-2,rect.bottom - 20,rect.right + 4,25,1)
  CASE WM_MENUSELECT
    @menuselectinfo(wParam&)
  CASE WM_COMMAND
    SWITCH (wParam&)
    CASE 107,809
      ~PostMessage(hWndMain&,WM_CLOSE,0,0)
    CASE 121,808
      @about
    ENDSWITCH
    RETVAL 0
  CASE WM_PAINT
    hdc& = BeginPaint(hWndMain&, V:ps.)  // we dont have a handle to the dc
until this point ****************
    TEXT 0,60, "hdc& from beginapaint = " + STR$(hdc&)
   
 ~GetClientRect(hWndMain&,*rect.)
    ~SetBkMode(hdc&,TRANSPARENT)
    ~SetTextColor(hdc&,RGB(0,0,127)) ' does absolutely nothing!
    ~SelectObject(hdc&,screenfont&)  // This line must go here   
****************************

    OPEN "i",#1,n$
    rect.right = rect.right - 250 ' had to get shorter than my text lines
    DO UNTIL EOF(#1)
      LINE INPUT #1,Chas$
      Chas& = LEN(Chas$)
      IF Chas& < 2 THEN GOTO EmptyLine
      ~DrawText(hdc&,Chas$,Chas&,*rect.,DT_WORDBREAK | DT_CENTER)
      rect.top = rect.top + 35 // (h& * 2) ' this factor
line-height-dependent
      ~EndPaint(hWndMain&, V:ps.)  // This line should not be here (unless
i misunderstand the logic) **************
      RETVAL 0 ' ditto
      EmptyLine:

    LOOP
       ~EndPaint(hWndMain&, V:ps.) // ******************** This line should
 be moved to  here ************
  CLOSE #1
  CASE WM_DESTROY
    ~PostQuitMessage(0)
    RETVAL 0
  DEFAULT
    RETVAL DefWindowProc(hWnd&, message&, wParam&, lParam%)
  ENDSWITCH
RETURN

PROCEDURE Set_A_Font()  //  Not used in this demo, Confusing name, you are
only creating a font here  ***********
  IF ChArLiE& = 1 THEN GOTO ScRuNcH
  ~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
  RFONT  WIDTH w&,HEIGHT h&
  neww& = w& / 2 * printer_x_y&(0) / _X
  newh& = h& / 2 * printer_x_y&(1) / _X

  // Get rid of the garbage in the middle
  FONT WIDTH neww&, HEIGHT newh&, ORIENTATION orientation&, ESCAPEMENT
escapement&
  ' FONT WIDTH w&, HEIGHT h&, ORIENTATION orientation&, ESCAPEMENT
escapement&
  FONT TO font&  // This is identical to:     font&=CreateFont()  
*************************
RETURN

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 07 12:15:10 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JalL-00NPdrC>; Sun, 7 Mar 1999 11:26:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA18879; Sun, 7 Mar 1999 11:10:42 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E261B5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Mar 1999 11:11:47 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Windows NT 4.0

X-UIDL: 248bd5f1143685118e0f22787ba1c196

Hi,

You wrote
at Sonntag, 7. Mrz 1999 09:16

>>Here's a routine to determine the exact Windows- Version. It works fine on
>>Windows 95,98 and NT. It should also work on Win 3.1 with Win32s.
>
>Looks quite interesting. But all the routines that were posted don't
>distinguish between Windows NT 3.51 and 4.0. That can be a problem, because
>WinNT 4.0 has the new controls that were introduced in Win 95, like to
>progress bar, the drag list control or the status bar.
>
>So how do I know if the program runs on Win NT 3.51?


Now it's your way to find out how you can check Win NT 3.51.
I cann't only check systems that I have and this I have done for a long time
because I had needed for myself.
Only through self tests you can learn many about programing in Window.
Now you have two versions of check the systems. Try it now.

Greetings

Eberhard





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:28 1999
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JecE-00NSTfC>; Sun, 7 Mar 1999 15:33:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA19301; Sun, 7 Mar 1999 15:17:11 +0100
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E29B4F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Mar 1999 15:15:05 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3155.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
X-Sender: 333200002801-0001@t-online.de
Subject: Re: [GFA] font selection   0603zz3-
X-UIDL: cceba6ebdbc91e517a01aa63716914d4

Hi Tom,
Without investigating your problem in detail, 
maybe you will have success with the _Font$ GFA variable.
I'm using this to overcome font problems araising 
when transfering programs from W95/98  to NT 4.0 , e.g. :

  _Font$ ="Arial,14,w6"
  FONT TO fnt&
  _Font$ ="System,16,w7,7,q2,f34,p513"
  FONT TO fnz&
  _Font$ ="Arial,24,w11"
  FONT TO fnx&
  _Font$ ="Arial,22,w11,e900,o900"
  FONT TO fny&
asf.

Juergen


>06/03/99 10:04:11 PM   font selection   0603zz3-
>
>I'm not getting my font - please show me why.
>-------------------------------------------------
>' ophir06.lst from DrawText() :PRIMARY by Ophir Daniel
>' An attempt by TomR. to work out wordwrap.  Ha!
>' Adds a fileselect & gets more than one line. <GGGGGGGGGGG>!
>' Adds font selection but doesn't get the font!
> .....



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:29 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Jg34-00NSTcC>; Sun, 7 Mar 1999 17:05:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA19483; Sun, 7 Mar 1999 16:50:14 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E2B128.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Mar 1999 10:49:33 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] font selection   0603zz3-
X-UIDL: a75ff0e254ff56847921da75ae423ed4

Tom 

' SETFONT screenfont& ' selects a the font 'screenfont&' into the current
DC. 
However, when you called SETFONT, you have not yet created the window whose
DC you wish to use.
Selecting the font within the BEGINPAINT/ENDPAINT construct as shown below
works fine.

In fact, there is no place else that you could set the font and have it
used by the first instance of he WM_PAINT handler.

Until the window is created, you cant get its DC, and until you Get its DC,
you cant set its font. But it is created at about the same time as it is
first painted. Sot there is noplace outside the callback that you could put
your setfont statement.

Furthermore, it appears that the  Beginpaint function initializes the DC,
so that any objects selected outside the beginpaint/endpaint construct are
lost. (this may differ with different classes of window, but I dunno... see
GETDC in win sdk for more confusion, Beginpaint docs do not say) 

Can anyone enlighten us?

Read  "  ***********  " below.

***************************************************************************
*********************

PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
  SWITCH message&
  CASE WM_SIZE
    ~GetClientRect(hWndMain&,*rect.)
    ~MoveWindow(hWndStatus&,-2,rect.bottom - 20,rect.right + 4,25,1)
  CASE WM_MENUSELECT
    @menuselectinfo(wParam&)
  CASE WM_COMMAND
    SWITCH (wParam&)
    CASE 107,809
      ~PostMessage(hWndMain&,WM_CLOSE,0,0)
    CASE 121,808
      @about
    ENDSWITCH
    RETVAL 0
  CASE WM_PAINT
    hdc& = BeginPaint(hWndMain&, V:ps.)  // we dont have a handle to the dc
until this point ****************
    TEXT 0,60, "hdc& from beginapaint = " + STR$(hdc&)
   
 ~GetClientRect(hWndMain&,*rect.)
    ~SetBkMode(hdc&,TRANSPARENT)
    ~SetTextColor(hdc&,RGB(0,0,127)) ' does absolutely nothing!
    ~SelectObject(hdc&,screenfont&)  // This line must go here   
****************************

    OPEN "i",#1,n$
    rect.right = rect.right - 250 ' had to get shorter than my text lines
    DO UNTIL EOF(#1)
      LINE INPUT #1,Chas$
      Chas& = LEN(Chas$)
      IF Chas& < 2 THEN GOTO EmptyLine
      ~DrawText(hdc&,Chas$,Chas&,*rect.,DT_WORDBREAK | DT_CENTER)
      rect.top = rect.top + 35 // (h& * 2) ' this factor
line-height-dependent
      ~EndPaint(hWndMain&, V:ps.)  // This line should not be here (unless
i misunderstand the logic) **************
      RETVAL 0 ' ditto
      EmptyLine:

    LOOP
       ~EndPaint(hWndMain&, V:ps.) // ******************** This line should
 be moved to  here ************
  CLOSE #1
  CASE WM_DESTROY
    ~PostQuitMessage(0)
    RETVAL 0
  DEFAULT
    RETVAL DefWindowProc(hWnd&, message&, wParam&, lParam%)
  ENDSWITCH
RETURN

PROCEDURE Set_A_Font()  //  Not used in this demo, Confusing name, you are
only creating a font here  ***********
  ~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
  RFONT  WIDTH w&,HEIGHT h&
  neww& = w& / 2 * printer_x_y&(0) / _X
  newh& = h& / 2 * printer_x_y&(1) / _X

  // Get rid of the garbage in the middle

  FONT WIDTH neww&, HEIGHT newh&, ORIENTATION orientation&, ESCAPEMENT
escapement&
  FONT TO font&  // This is identical to:     font&=CreateFont()  
*************************
RETURN

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:34 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JhWP-00NRHyC>; Sun, 7 Mar 1999 18:39:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA19672; Sun, 7 Mar 1999 18:23:41 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E2C706.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Mar 1999 12:23:14 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] font selection   0603zz3-
X-UIDL: a7d35e9c8f78ace7fd002b4cc43d96ed

Brent,

>Furthermore, it appears that the  Beginpaint function initializes the DC,
so that any objects selected outside the beginpaint/endpaint construct are
lost. (this may differ with different classes of window, but I dunno... see
GETDC in win sdk for more confusion, Beginpaint docs do not say) <

The correct way to programme in Windows, so I've heard; :)

You should select objects into the DC that you want just after you receive
the handle to the DC, this could be after Beginpaint() or after GetDC();
use the GDI calls that are needed and then put back the old objects before
you release the DC, which is done either with EndPaint() or ReleaseDC().
You should always release a DC after it's been used.

  ~BeginPaint(hhWnd&, *ps.)

  hOldObject& = SelectObject(ps.hdc, hfont&)

      do stuff -- then before you release the DC

  ~SelectObject(ps.hdc, hOldObject&)

  ~EndPaint(hhWnd&, *ps.)




Selecting and deselecting objects is very quick so there's very little
overhead.

When the DC handle is returned it is likely that it's a different handle to
the the previous time, or subsequent time. Test it! If you use GFA commands
the GFA machine may look after a lot of this for you, I don't know 'cos I
use API's mostly.


  CASE WM_PAINT
    ~BeginPaint(hhWnd&, *ps.)
    mystr$ = STR$(ps.hdc)
    ~TextOut(ps.hdc, 30, 80, V:mystr$, LEN(mystr$))
    ~EndPaint(hhWnd&, *ps.)
    RETVAL 0

So, you can get a different DC handle each time. Hope that helps.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:35 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Jhki-00NRHTC>; Sun, 7 Mar 1999 18:54:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA19711; Sun, 7 Mar 1999 18:39:25 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E2CAB0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990307173915.DBIF17114@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 7 Mar 1999 17:39:15 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 7 Mar 1999 17:39:15 +0000
Subject: Re: [GFA] font selection   0603zz3-
X-UIDL: 718c749b01c3bf88553d075797db0912

Brent
Thank you.  Will check the location of when the DC is known.
As to the garbage in the middle... what I took this from made a pass
thru the whole routine every time it started a new page & when I tried
to eliminate that before I got a drop-back to system font.  This is one
of the many areas I have to rely strictly on what I can find because I
am not really on top of it... I am hanging on by the hair on my chinny
chin chin.  When I copy something into something else +/- verbatum, I
don't look for static or failure but... that's often what I get.

I wanted to try to get to the screen with the fonts from a printing 
routine so I could get what I want from it & THEN go to the printer.  I
am getting very tired of thinking what I want is NOT unusual but for
which I find no example to play with.  There are a ton of things I know
very well *somebody* has worked out but for some reason have NOT put
out an example of how to do it.

I got all sorts of B.S. responses about how difficult it is to scroll
text in a normal window.  I went thru ALL of the tons of examples I have
& discovered that in _ONE_, a fullscreen window that loads ASCII (text),
sort of as an offhanded, off-the-cuff, by-the-way,-you-can do..., situation
has scrolling text that works in every way except that keeping the mouse
button down does NOT keep the scrolling going.  *THIS* example is large
& appears to be primarilary on making graphic drawings by-the-numbers
w/o user intervention.  There are no real examples of using fonts & wrap
in the same example... to printer OR screen.

Thank you for pointing out why I'm missing the gun on getting the font
into play.  As you see it, it is the only way it even gets anything on screen.
<G>
TomR.

At 04:04 AM 07/03/99 -0500, you wrote:
>Tom 
>
>' SETFONT screenfont& ' selects a the font 'screenfont&' into the current
>DC. 
>However, when you called SETFONT, you have not yet created the window whose
>DC you wish to use.
>Selecting the font within the BEGINPAINT/ENDPAINT construct as shown below
>works fine.
>
>In fact, there is noplace else that you could set the font and have it used
>by the first instance of he WM_PAINT handler.
>
>Until the window is created, you cant get its DC, and until you Get its DC,
>you cant set its font. But it is created at about the same time as it is
>first painted. Sot there is noplace outside the callback that you could put
>your setfont statement.
>
>Furthermore, it appears that the  Beginpaint/endpaint consruct also
>executes a savedc/ restoredc, so that any objects selected outside the
>beginpaint/endpaint construct are lost. (this may be different with
>different classs of window, but I dunno... see GETDC in win sdk for more
>confusion.
>
>Read comments with "  ***************  " below.
>
>***************************************************************************
>*********************
>
>PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
>  SWITCH message&
>  CASE WM_SIZE
>    ~GetClientRect(hWndMain&,*rect.)
>    ~MoveWindow(hWndStatus&,-2,rect.bottom - 20,rect.right + 4,25,1)
>  CASE WM_MENUSELECT
>    @menuselectinfo(wParam&)
>  CASE WM_COMMAND
>    SWITCH (wParam&)
>    CASE 107,809
>      ~PostMessage(hWndMain&,WM_CLOSE,0,0)
>    CASE 121,808
>      @about
>    ENDSWITCH
>    RETVAL 0
>  CASE WM_PAINT
>    hdc& = BeginPaint(hWndMain&, V:ps.)  // we dont have a handle to the dc
>until this point ****************
>    TEXT 0,60, "hdc& from beginapaint = " + STR$(hdc&)
>   
> ~GetClientRect(hWndMain&,*rect.)
>    ~SetBkMode(hdc&,TRANSPARENT)
>    ~SetTextColor(hdc&,RGB(0,0,127)) ' does absolutely nothing!
>    ~SelectObject(hdc&,screenfont&)  // This line must go here   
>****************************
>
>    OPEN "i",#1,n$
>    rect.right = rect.right - 250 ' had to get shorter than my text lines
>    DO UNTIL EOF(#1)
>      LINE INPUT #1,Chas$
>      Chas& = LEN(Chas$)
>      IF Chas& < 2 THEN GOTO EmptyLine
>      ~DrawText(hdc&,Chas$,Chas&,*rect.,DT_WORDBREAK | DT_CENTER)
>      rect.top = rect.top + 35 // (h& * 2) ' this factor
>line-height-dependent
>      ~EndPaint(hWndMain&, V:ps.)  // This line should not be here (unless
>i misunderstand the logic) **************
>      RETVAL 0 ' ditto
>      EmptyLine:
>
>    LOOP
>       ~EndPaint(hWndMain&, V:ps.) // ******************** This line should
> be moved to  here ************
>  CLOSE #1
>  CASE WM_DESTROY
>    ~PostQuitMessage(0)
>    RETVAL 0
>  DEFAULT
>    RETVAL DefWindowProc(hWnd&, message&, wParam&, lParam%)
>  ENDSWITCH
>RETURN
>
>PROCEDURE Set_A_Font()  //  Not used in this demo, Confusing name, you are
>only creating a font here  ***********
>  IF ChArLiE& = 1 THEN GOTO ScRuNcH
>  ~Escape(dc&,GETPHYSPAGESIZE,0,0,V:printer_x_y&(0))
>  RFONT  WIDTH w&,HEIGHT h&
>  neww& = w& / 2 * printer_x_y&(0) / _X
>  newh& = h& / 2 * printer_x_y&(1) / _X
>
>  // Get rid of the garbage in the middle
>  FONT WIDTH neww&, HEIGHT newh&, ORIENTATION orientation&, ESCAPEMENT
>escapement&
>  ' FONT WIDTH w&, HEIGHT h&, ORIENTATION orientation&, ESCAPEMENT
>escapement&
>  FONT TO font&  // This is identical to:     font&=CreateFont()  
>*************************
>RETURN
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:37 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JjYB-00NQdxC>; Sun, 7 Mar 1999 20:49:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA19982; Sun, 7 Mar 1999 20:34:03 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E2E591.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 7 Mar 1999 11:32:17 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] News Letter
X-UIDL: addd874d5458f3e523463aa89bb94c63

If you would like to subscribe to the 'Not Affiliated With GFA' news letter
send email to:

adbryant@gfa.net
or
adbryant@msn.com

with SUBSCRIBE in the subject field.


http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:39 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JkWD-00NRHjC>; Sun, 7 Mar 1999 21:51:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA20108; Sun, 7 Mar 1999 21:36:19 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E2F439.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Mar 1999 15:35:56 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] font selection   0603zz3-
X-UIDL: 6007b3b470d933645a687e8c2c8d2e0e



Here's a wierd feature:

In Ophirs program, if you do any drawing outside a callback, any objects
selected to the DC before or inside the BEGIN/ENDPAINT construct are
normally deselected at endpaint.  ( I have not been able to duplicate this
feature using GFA windows. I suspect it has to do with the style parameters
of the window opened by ophirs program, not sure )

However, an excetion exists in Ophir's program,

 If you use 'OPEN, #1,n$', and if  n$=""  then endpaint will not deselect
the items, and the program will not generate a filenotfound error.
. 

  CASE WM_PAINT
    hdc& = BeginPaint(hWndMain&, V:ps.)
         ~SetTextColor(hdc&,RGB(0,0,255)) 
         ~SelectObject(hdc&,screenfont&)
         OPEN "i",#1,n$                             // no error on m$="",
also fixes EndPaint if n$=""
         CLOSE #1
         RETVAL 0 ' ditto
    ~EndPaint(hWndMain&, V:ps.) ' not req'd for this demo

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:40 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JkaA-00NSTfC>; Sun, 7 Mar 1999 21:55:30 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA20126; Sun, 7 Mar 1999 21:40:40 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E2F52C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 7 Mar 1999 15:40:18 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] font selection   0603zz3-
X-UIDL: 1bcb3af6653bc82a0d3cd34c7fc68fec

>>>>>
When the DC handle is returned it is likely that it's a different handle to
the the previous time, or subsequent time. Test it! If you use GFA commands
the GFA machine may look after a lot of this for you, I don't know 'cos I
use API's mostly.
<<<<<<<

This was the case in Ophirs program using API commands,

GFA commands seem to maintain a constant DC, encouraging some sloppy habits
on my part. 

Thanks,

BD

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:41 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10JmgQ-00NSpcC>; Mon, 8 Mar 1999 00:10:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA20428; Sun, 7 Mar 1999 23:54:33 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E31498.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990307225426.HVM37@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 7 Mar 1999 22:54:26 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 7 Mar 1999 22:54:26 +0000
Subject: [GFA] using drawtext on a printer
X-UIDL: 1a2437f39f66a2e8d65ee2d1161e3e88

There is no way to describe what I see & remain within the limits
imposed on this list.  Changes occur from one run to the next.

Therefore, I hereby conceed that it will take a very clever person
to get anything onscreen _&_ to the printer in a font of choice &
formatted for appearance.  It will then take a very generous person
to share the final working routine with the rest of the world.  I
am generous, but I am no clever enough for the task.

I yield.  I concede.  I give up.
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:46 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m10K0jt-00NST8C>; Mon, 8 Mar 1999 15:10:37 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K0jh-00alThC>; Mon, 8 Mar 1999 15:10:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA21945; Mon, 8 Mar 1999 14:12:37 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E3DDD2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
 via Gauntlet (3.0) Mon, 08 Mar 1999 14:13:05 --100
Date: Mon, 8 Mar 1999 14:13:26 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: [GFA] examples for Winsock.Dll ?
X-UIDL: 6b7eb9d1496dcae4ec44b47e2980062a

Hi !

Has anyone tried to interact with the Winsock.Dll for sending/receiving a
packet ?

Michael

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:50 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K2cn-00NRHfC>; Mon, 8 Mar 1999 17:11:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA22258; Mon, 8 Mar 1999 16:53:55 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E403A0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 8 Mar 1999 16:04:23 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: [GFA] TWAIN
X-UIDL: 74a81ca59e7e8fcebf9f3bf5128f1540

Hi!

Has anyone experiences in using GFA and TWAIN?

Many thanks in advance
Yours
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:52 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K3Tx-00NT2CC>; Mon, 8 Mar 1999 18:06:21 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA22374; Mon, 8 Mar 1999 17:49:40 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E41089.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Mar 1999 17:50:43 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] TWAIN

X-UIDL: 2779e01b793ad898e69c44a627daf06e

Hi,

Thomas wrote Montag, 8. Mrz 1999 16:57

>Has anyone experiences in using GFA and TWAIN?
>
>Many thanks in advance
>Yours
>Thomas

I have it in the last weeks.
Look at internet: www.twain.org and download the
description with an excample in C.
I have implemented some function of this excample to my
great bitmap program. It works very well with all scanner that I found
by friends and in my work.
I will send the source code of my application to Dale Bryant, if it's
finished.

Good luck and good nerves, it's not simple.

Eberhard




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:53 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K4ok-00NRHXC>; Mon, 8 Mar 1999 19:31:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA22547; Mon, 8 Mar 1999 19:15:42 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E424CB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 8 Mar 1999 10:13:45 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] PHOTOS
X-UIDL: 06f3c4f0755b2c0fdf7cabed7dd8fc8d

If you program in GFA I would like to post your photo on the GFAWHELP web
page. Added early today was the photo of John Findlay, the author of
GIFLOAD.ZIP.   This is a program everyone should download as John uses no
libraries to load and display interlaced and non-interlaced gifs.
Don't miss it. URL below.



http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Mon Mar 08 19:41:54 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K4qk-00NRHEC>; Mon, 8 Mar 1999 19:33:58 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA22558; Mon, 8 Mar 1999 19:17:43 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E4252C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Mar 1999 10:15:58 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] TWAIN
X-UIDL: dfd08effe26e39f51ea386557df2137a

Just in time!  I just purchased a new HP scanner.  COME ON EBERHARD!! (g)

----- Original Message -----
From: Eberhard Funck <funck@hildesheim.sgh-net.de>
To: <gfabasic@aachen.linux.de>
Sent: Monday, March 08, 1999 8:50 AM
Subject: Re: [GFA] TWAIN


>Hi,
>
>Thomas wrote Montag, 8. Mrz 1999 16:57
>
>>Has anyone experiences in using GFA and TWAIN?
>>
>>Many thanks in advance
>>Yours
>>Thomas
>
>I have it in the last weeks.
>Look at internet: www.twain.org and download the
>description with an excample in C.
>I have implemented some function of this excample to my
>great bitmap program. It works very well with all scanner that I found
>by friends and in my work.
>I will send the source code of my application to Dale Bryant, if it's
>finished.
>
>Good luck and good nerves, it's not simple.
>
>Eberhard
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:12:22 1999
Return-Path: <tarq@corpse.free-online.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K5El-00NSpJC>; Mon, 8 Mar 1999 19:58:47 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA22636; Mon, 8 Mar 1999 19:41:20 +0100
From: "Russell Hayward" <tarq@corpse.free-online.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E42AB6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
  by cask.force9.net with SMTP; 8 Mar 1999 18:44:44 -0000
  by coors.free-online.net with SMTP; 8 Mar 1999 18:32:28 -0000
Date: Mon, 8 Mar 1999 18:37:52 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] Wallpaper Position
X-UIDL: 8b64e744529ccbd4883c765f1d40d6d0

Hi everybody,

I've got a problem that is really annoying. I've used John Findlay's very useful
listing to change the desktop wallpaper but I can't find out how to set it to
tiled or centre position. Can anyone help?

Also I've just signed up with an ISP which has given me unlimited webspace, so
if anyone is running out of room on their site and would like a place to put
some of their larger downloads email me at tarquin@baphead.freeserve.co.uk and
I'll see if it's possible, please don't send me the files, I don't want to have
to wait 15 minutes to recieve my mail!

Ta'ra,
Russell Hayward

Website:     http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:12:57 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K6ct-00NPgtC>; Mon, 8 Mar 1999 21:27:47 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA22808; Mon, 8 Mar 1999 21:11:32 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E43FDF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Mar 1999 15:11:01 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Wallpaper Position
X-UIDL: d2b8a36a39abca97687e316f501169aa

Russell,

Look in WIN.INI under the [Desktop] section. You can work out the details
by changing the settings and then looking again.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:12:58 1999
Return-Path: <bbrown1@ciaccess.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K7Dn-00NPieC>; Mon, 8 Mar 1999 22:05:55 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA22897; Mon, 8 Mar 1999 21:49:56 +0100
From: "Bev Brown" <bbrown1@ciaccess.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E448D8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Mar 1999 15:49:36 -0500
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36E424CB.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] PHOTOS
X-UIDL: c2fa2497a4220e4131d0d1f856fafaa2

Dale Now after receiving that photo from you why is Goofy in the Photo list
for GFA <G>


                    >>>>>Lou


> -----Original Message-----
> From: Dale Bryant [mailto:adbryant@email.msn.com]
> Sent: Monday, March 08, 1999 1:14 PM
> To: gfabasic@aachen.linux.de
> Subject: [GFA] PHOTOS
>
>
> If you program in GFA I would like to post your photo on the GFAWHELP web
> page. Added early today was the photo of John Findlay, the author of
> GIFLOAD.ZIP.   This is a program everyone should download as John uses no
> libraries to load and display interlaced and non-interlaced gifs.
> Don't miss it. URL below.
>
>
>
http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:12:59 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K7FR-00NQXzC>; Mon, 8 Mar 1999 22:07:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA22913; Mon, 8 Mar 1999 21:52:12 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E44960.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Mar 1999 12:50:27 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] PHOTOS
X-UIDL: f544b83777b443bc98b46bc2011adb64

That is not funny, Brown!!!(G)
----- Original Message -----
From: Bev Brown <bbrown1@ciaccess.com>
To: <gfabasic@aachen.linux.de>
Sent: Monday, March 08, 1999 12:49 PM
Subject: RE: [GFA] PHOTOS


>Dale Now after receiving that photo from you why is Goofy in the Photo list
>for GFA <G>
>
>
>                    >>>>>Lou
>
>
>> -----Original Message-----
>> From: Dale Bryant [mailto:adbryant@email.msn.com]
>> Sent: Monday, March 08, 1999 1:14 PM
>> To: gfabasic@aachen.linux.de
>> Subject: [GFA] PHOTOS
>>
>>
>> If you program in GFA I would like to post your photo on the GFAWHELP web
>> page. Added early today was the photo of John Findlay, the author of
>> GIFLOAD.ZIP.   This is a program everyone should download as John uses no
>> libraries to load and display interlaced and non-interlaced gifs.
>> Don't miss it. URL below.
>>
>>
>>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net/adbryant
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:00 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K8yo-00NPh9C>; Mon, 8 Mar 1999 23:58:34 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA23142; Mon, 8 Mar 1999 23:42:22 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E46341.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Mar 1999 17:41:14 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="b3c3d2f8-d5a7-11d2-9d86-00805fea3c3d"
Subject: [GFA] drawtext()  to screen
X-UIDL: c00f16c7405cd9fbf8865d1beed5cc64

Tom

Heres a simple solution for screen draws.

Brent

Attachment Converted: "c:\programme\eudora\attach\DRWTXT01.LST"
From ???@??? Tue Mar 09 19:13:03 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10K9h1-00NSTjC>; Tue, 9 Mar 1999 00:44:15 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA23242; Tue, 9 Mar 1999 00:28:47 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E46E1F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990308232841.KUKV3037@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 8 Mar 1999 23:28:41 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 8 Mar 1999 23:28:41 +0000
Subject: [GFA] printing w/ fonts   0803xx1-
X-UIDL: dd6c7e8e49a200cf8e3b79849f2f697f

08/03/99 05:22:52 PM   printing w/ fonts   0803xx1-

Below is Eberhard's entry into the fray.  Perhaps experimentation w/ 
DrawText will make formatting to the printer possible.  The routine as 
is works great - thanks, Eberhard.  I added some comments to point out 
things I had to look for. <G>  TomR. (2 lines wrapped by Eudora)
---------------------------------------------------
' print.lst by Eberhard Funck  (+ some comments by TomR.)
DLL #1,"commdlg.com"
  DECL BOOL GetOpenFileName(l)
  DECL BOOL PrintDlg(l)
  DECL BOOL ChooseFont(l)
ENDDLL

DLL #2,"gdi"
  DECL INT  AbortDoc(w)
  DECL INT  StartDoc(w,l)
  DECL INT  StartPage(w)
  DECL INT  EndPage(w)
  DECL INT  EndDoc(w)
ENDDLL
'
'=>>And here is the routine to display the choosefont, dlg and print;
Types ()
cf% = MALLOC (LEN (CHOOSEFONT:))
pd% = MALLOC (LEN (PRINTDLG:))
OPENW #1, 0, 0, 600, 480,-1
' text on sreen without WM_PAINT (no redraw)
@SetTextToScreen (WIN(1))
@PrintJob (WIN(1))
'
DO
  GETEVENT
UNTIL MENU(1) = 4
'
CLOSEW #1
~MFREE (pd%)
~MFREE (cf%)
FREEDLL 1
FREEDLL 2
END
'
PROCEDURE Types()
  TYPE RECT:
  - USHORT left
  - USHORT top
  - USHORT right
  - USHORT bottom
  ENDTYPE
  RECT: rect.
  '
  TYPE LOGFONT:      /* lf */
  - WORD   lfHeight
  - WORD   lfWidth
  - WORD   lfEscapement
  - WORD   lfOrientation
  - WORD   lfWeight
  - BYTE  lfItalic
  - BYTE  lfUnderline
  - BYTE  lfStrikeOut
  - BYTE  lfCharSet
  - BYTE  lfOutPrecision
  - BYTE  lfClipPrecision
  - BYTE  lfQuality
  - BYTE  lfPitchAndFamily
  - CHAR*32  lfFaceName$
  ENDTYPE
  LOGFONT: lf.
  '
  TYPE TEXTMETRIC:   /* tm */
  - WORD  tmHeight
  - WORD  tmAscent
  - WORD  tmDescent
  - WORD  tmInternalLeading
  - WORD  tmExternalLeading
  - WORD  tmAveCharWidth
  - WORD  tmMaxCharWidth
  - WORD  tmWeight
  - BYTE tmItalic
  - BYTE tmUnderlined
  - BYTE tmStruckOut
  - BYTE tmFirstChar
  - BYTE tmLastChar
  - BYTE tmDefaultChar
  - BYTE tmBreakChar
  - BYTE tmPitchAndFamily
  - BYTE tmCharSet
  - WORD  tmOverhang
  - WORD  tmDigitizedAspectX
  - WORD  tmDigitizedAspectY
  ENDTYPE
  TEXTMETRIC: tm.
  '
  TYPE DOCINFO:
  - WORD cbSize
  - LONG lpszDocName
  - LONG lpszOutput
  ENDTYPE
  DOCINFO: di.

  TYPE PRINTDLG:
  - DWORD  lStructSize
  - WORD  hwndOwner
  - WORD  hDevMode
  - WORD  hDevNames
  - WORD  hdc
  - DWORD  flags
  - WORD  nFromPage
  - WORD  nToPage
  - WORD  nMinPage
  - WORD  nMaxPage
  - WORD  nCopies
  - WORD  hInstance
  - DWORD  lCustData
  - LONG  lpfnPrintHook
  - LONG  lpfnSetupHook
  - LONG  lpPrintTemplateName
  - LONG  lpSetupTemplateName
  - WORD  hPrintTemplate
  - WORD  hSetupTemplate
  ENDTYPE
  PRINTDLG: pd.
  '
  TYPE CHOOSEFONT:    /* cf */
  - DWORD   cflStructSize
  - WORD     cfhwndOwner
  - WORD     cfhDC
  - LONG       cflpLogFont
  - WORD     cfiPointSize
  - DWORD   cfFlags
  - DWORD   cfrgbColors
  - LONG       cflCustData
  - LONG       cflpfnHook
  - LONG       cflpTemplateName
  - WORD     cfhInstance
  - LONG       cflpszStyle
  - WORD     cfnFontType
  - WORD     cfnSizeMin
  - WORD     cfnSizeMax
  CHOOSEFONT: cf.
RETURN

PROCEDURE SetTextToScreen(hWnd&)
  ' choose your font
  MEMBFILL cf%, LEN (cf.), 0
  '
  {cf%}.cflStructSize = LEN (cf.)
  {cf%}.cfhwndOwner = hWnd&
  {cf%}.cflpLogFont = *lf.  /* after selection result in logfont structure
  {cf%}.cfFlags = CF_SCREENFONTS | CF_EFFECTS | CF_INITTOLOGFONTSTRUCT
  {cf%}.cfrgbColors = RGB (0, 0, 0)
  IF ^ChooseFont (cf%)
    scrfnt& = CreateFontIndirect ({cf%}.cflpLogFont) // in *lf. the same font
  ELSE
    // set default font
  ENDIF
  '
  ' IF WM_PAINT all function beneath //
  // WM_PAINT
  // hdcScr& = BeginPaint (hWnd&, *ps.)
  '
  hdcScr& = GetDC(hWnd&) // delete with WM_PAINT
  ' only for screen fonts
  oldfont& = SelectObject (hdcScr&, scrfnt&)
  '
  Test$ = "This is Font: " + lf.lfFaceName$ + CHR$(0)
  ~GetClientRect (hWnd&, *rect.)
  ~SetTextColor (hdcScr&, RGB (255, 0, 0))
  ' draw center text in the first line (in middle of window DT_SINGLELINE |
DT_CENTER | DT_VCENTER)
  ~DrawText (hdcScr&, V:Test$, LEN (Test$) - 1, *rect., DT_CENTER)
  '
  ~SelectObject (hdcScr&, oldfont&)
  '
  //~DeleteObject (scrfnt&)
  //~EndPaint(hWnd&, *ps.)
  // RETURN
  '
  ' important to release screen DC without WM_PAINT
  ~ReleaseDC (hWnd&, hdcScr&)
  ~DeleteObject (scrfnt&)
RETURN
'
PROCEDURE PrintJob(hWnd&)
  ' choose your font
  MEMBFILL cf%, LEN (cf.), 0
  '
  {cf%}.cflStructSize = LEN (cf.)
  {cf%}.cfhwndOwner = hWnd&
  {cf%}.cflpLogFont = *lf.  /* after selection result in logfont structure
  {cf%}.cfFlags = CF_SCREENFONTS | CF_EFFECTS | CF_INITTOLOGFONTSTRUCT
  {cf%}.cfrgbColors = RGB (0, 0, 0)
  IF ^ChooseFont (cf%)
    '
    MEMBFILL pd%, LEN (pd.), 0
    '
    {pd%}.lStructSize = LEN(pd.)
    {pd%}.hwndOwner   = hWnd&
    {pd%}.flags  = PD_RETURNDC
    {pd%}.nFromPage    = 1
    {pd%}.nToPage    = $FFFF
    {pd%}.nMinPage    = 1
    {pd%}.nMaxPage    = $FFFF
    {pd%}.nCopies     = 1

    IF ^PrintDlg(pd%)
      '
      hDCPrinter&     = {pd%}.hdc
      '
      Dpiy& = GetDeviceCaps (hDCPrinter&, LOGPIXELSY)
      '
      margin& = 10  ' left margine (TomR.)
      ' here you must change the font height for printing
      height& = (Dpiy& / 120) * lf.lfHeight  /* printer resolution / display
resolution
      font$ = lf.lfFaceName$
      prfnt& =
CreateFont(height&,0,0,0,lf.lfWeight,lf.lfItalic,0,0,0,0,0,0,0,font$)
      '
      ' only for screen fonts
      ' displfont& = CreateFontIndirect ({cf%}.cflpLogFont)
      '
      oldfont& = SelectObject (hDCPrinter&, prfnt&)
      '
      ' metrical size of printing font
      ~GetTextMetrics (hDCPrinter&, *tm.)
      yChar& = tm.tmHeight + tm.tmExternalLeading
      xChar& = tm.tmAveCharWidth
      '
      doc$ = "Test" + CHR$(0)
      di.cbSize      = LEN(di.)
      di.lpszDocName = V:doc$
      di.lpszOutput  = NULL
      '
      ~^StartDoc(hDCPrinter&, *di.)
      ~^StartPage(hDCPrinter&)
      '
      actualside& = 30  '  lines to print per page (TomR.)
      actualLine& = 0
      Test$ = "This should show up on your printer." + CHR$(0)
      FOR i& = 0 TO 60
        ~TextOut(hDCPrinter&, margin& * xChar&, actualLine& * yChar&,
V:Test$, LEN (Test$) - 1)
        ' Not quite the same as DrawText, which allows formatting (TomR.)
        actualLine& ++
        IF actualLine& > actualside&  ' the line counter (TomR.)
          ~^EndPage(hDCPrinter&)  /* same like NEWFRAME
          ' new side printer must new learn
          oldfont& = SelectObject (hDCPrinter&, prfnt&)
          actualLine& = 0
          ~^StartPage(hDCPrinter&)
        ENDIF
      NEXT i&
      '
      ~^EndDoc (hDCPrinter&)
      '  forget never, free resources
      ~SelectObject (hDCPrinter&, oldfont&)
      ~DeleteDC(hDCPrinter&)
      ~DeleteObject (prfnt&)
      '
    ENDIF // PrintDLG
  ENDIF   // ChooseFont
RETURN
'


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:05 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KAER-00NRHYC>; Tue, 9 Mar 1999 01:18:47 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA23329; Tue, 9 Mar 1999 01:03:35 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E4763F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 8 Mar 1999 16:01:08 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] WHY NOT?
X-UIDL: ce626581f9f28320c0782fb2ba75e07b

Is there any way to use both the ToolMenu by Roland Walter and the GFA
fixdebug module?
Dale
http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:06 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KAS6-00NSTUC>; Tue, 9 Mar 1999 01:32:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA23363; Tue, 9 Mar 1999 01:18:21 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E479B1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990309001813.RGI4224@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 9 Mar 1999 00:18:13 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 9 Mar 1999 00:18:13 +0000
Subject: Re: [GFA] drawtext()  to screen
X-UIDL: db75d63a4117d46961a19166aef67e71

Brent
Thanks - will look.  I'm getting awfully close to just dropping
the whole thing.  I keep running into things I don't understand
& the usual response from gurus is "it's difficult".  It seems
that I always attack the hardest to do or what I want to do has
never been worked out or made public.  Examples hardly ever have
much to do with my desires <G>.  I get off into the very deep
end every time I try something new.

Thanks for sending what you did - I'll look into it shortly.
<G>
TomR.



At 05:41 PM 08/03/99 -0500, you wrote:
>Tom
>
>Heres a simple solution for screen draws.
>
>Brent
>
>Attachment Converted: C:\WORLDNET\DOWNLOAD\DRWTXT01.LST
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:07 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KCeH-00NPh9C>; Tue, 9 Mar 1999 03:53:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA23583; Tue, 9 Mar 1999 03:12:11 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E49464.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Mar 1999 21:11:41 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="09a4187f-d5bf-11d2-91fd-00805fea3fcf"
Subject: [GFA] Drawtext
X-UIDL: 6e5d52d94f2a2e10ba532605a1bbe905

Heres an update on using DrawText() (What a pain in the ass any function
that wont work in a metafile should not exist)

2 questions

1)  I'm having trouble using API functions in the WM_ERASEBKGND handler.
GFA works OK, but Im trying to learn the API. Any advice?

2) Finding the proper offset to print a page is like pulling teeth.
Starting the print at large negative offsets, doesnt put the
text where i expect it to go in the window, even though the offsets are all
multiples of the fontheight. Any ideas?

Brent

Attachment Converted: "c:\programme\eudora\attach\DRWTXT02.LST"
From ???@??? Tue Mar 09 19:13:09 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KChu-00NQZ7C>; Tue, 9 Mar 1999 03:57:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA23603; Tue, 9 Mar 1999 03:16:13 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E49552.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 8 Mar 1999 21:15:49 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] drawtext()  to screen
X-UIDL: 7e898ae8d63b27c725c25e9cd44ef14d

>>>>>>>
Thanks - will look.  I'm getting awfully close to just dropping
the whole thing.  I keep running into things I don't understand
& the usual response from gurus is "it's difficult".  It seems
that I always attack the hardest to do or what I want to do has
never been worked out or made public.  Examples hardly ever have
much to do with my desires <G>.  I get off into the very deep
end every time I try something new.
<<<<<<<<

Tom

Drawtext is simple, but may have some drawbacks (see my last post). I dunno

There are plenty of samples of wordwrap functions for basic on CIS and the
Net.

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:10 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KEYN-00NPh0C>; Tue, 9 Mar 1999 05:55:39 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA23870; Tue, 9 Mar 1999 05:39:51 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E4B700.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990309043947.EIZJ14672@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 9 Mar 1999 04:39:47 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 9 Mar 1999 04:39:47 +0000
Subject: Re: [GFA] drawtext()  to screen
X-UIDL: c2f557277a2058377dec5df383e33d93

Brent
Don't have access to CIS & have spent hrs chasing nothings on the net.
I get a lot of search flubs - am starting to think I donno how to look
for anything.

Yeah, I think DrawText has a few problems, but it's the best I can do
for the moment.
<G>
TomR.


At 09:15 PM 08/03/99 -0500, you wrote:
>>>>>>>>
>Thanks - will look.  I'm getting awfully close to just dropping
>the whole thing.  I keep running into things I don't understand
>& the usual response from gurus is "it's difficult".  It seems
>that I always attack the hardest to do or what I want to do has
>never been worked out or made public.  Examples hardly ever have
>much to do with my desires <G>.  I get off into the very deep
>end every time I try something new.
><<<<<<<<
>
>Tom
>
>Drawtext is simple, but may have some drawbacks (see my last post). I dunno
>
>There are plenty of samples of wordwrap functions for basic on CIS and the
>Net.
>
>Brent
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:11 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KEjU-00NRHEC>; Tue, 9 Mar 1999 06:07:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA23904; Tue, 9 Mar 1999 05:51:51 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E4B9CC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990309045146.DPVC26725@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 9 Mar 1999 04:51:46 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 9 Mar 1999 04:51:46 +0000
Subject: [GFA] Brent's drawtext01/02
X-UIDL: af41489afd990ad4cdc0b4922c6be58a

I like'em both!
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:12 1999
Return-Path: <vo@schoeller.at>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KGGv-00NNjIC>; Tue, 9 Mar 1999 07:45:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA24174; Tue, 9 Mar 1999 07:28:55 +0100
From: Vogel Michael <vo@schoeller.at>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E4D091.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
 via Gauntlet (3.0) Tue, 09 Mar 1999 07:29:03 --100
Date: Tue, 9 Mar 1999 07:30:00 +0100 
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain
Subject: [GFA] APM - Advanced Power Management
X-UIDL: 560c27c30da461fa23fcddb855499a66

Hi -

does anyone has definitions of calls for Advanced Power Management (included
in DOS, Wfw 3.x, etc.) ?

Thanks,
	Michael

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:13 1999
Return-Path: <a.szalay@mail.matav.hu>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KHUF-00NRHgC>; Tue, 9 Mar 1999 09:03:35 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA24323; Tue, 9 Mar 1999 08:48:14 +0100
From: "Andras Szalay" <a.szalay@mail.matav.hu>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E4E328.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  by mail.matav.hu with SMTP; 9 Mar 1999 08:47:48 +0100
Date: Tue, 9 Mar 1999 09:03:52 +0100
MIME-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7BIT
Priority: normal
X-mailer: Pegasus Mail for Win32 (v3.01b)
Subject: Re: [GFA] Re: One question to all...
X-UIDL: 85f98eb71de7dcef9b0615ed69a8db63

Dear Joris,

I copied here the part of my sound analysis program that does
low, band and high pass filtering. This is one of the most simple
digital filters, and the parameters can be controlled very easily.
Regards
			Andras


' lng% : length of the sample in 16 bit words
' a&()  : array of 16 bit words (the portion of the 16 bit mono WAV 
file where the samples begin)
' f       : frequency (Hz)
' q      : Q
 amp : amplitude factor
' m&   : filter mode ; 1:LPF 2:BPF 3:HPF
' srt% : sample rate (Hz)
' amp : scaling factor; normally 1. Increase it if output level is too 
low, decrease it if overflow happens.
'
f = f / srt%
a = 2 * COS(2 * PI * f) * EXP(-PI * f / q)
b = EXP(-2 * PI * f / q)
c = (1 - a + b)  //LPF
IF m& = 2 OR m& = 4
  c = COS(2 * PI * f) * SQR(1 - a + b)  //BPF
ENDIF
d1 = 0
d2 = 0
ovfl! = FALSE
' *** FILTER LOOP ***
FOR n% = 0 TO lng%
  i = a&(n%)
  o = a * d1 - b * d2 + c * i
  SELECT m&
  CASE 1
    fno = o  // LPF
  CASE 2
    fno = o - d1  // BPF
  CASE 3
    fno = o - (d1 + d1) + d2  // HPF
  ENDSELECT
  fno = amp * fno
  ' **** SATURATION ***
  IF fno > 32767
    fno = 32767
    ovfl! = TRUE
  ELSE IF fno < -32768
    fno = -32768
    ovfl! = TRUE
  ENDIF
  ' ***
  a&(n%) = fno
  d2 = d1
  d1 = o
NEXT n%
IF ovfl!
  PRINT "OVERFLOW!!! "
  KEYGET k
ENDIF

Andras Szalay
Szechenyi u. 8
2040 BUDAORS
HUNGARY
Tel: (36)23 44 10 71
Fax: (36)23 44 11 03

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:14 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KJu9-00NSTUC>; Tue, 9 Mar 1999 11:38:29 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA24600; Tue, 9 Mar 1999 11:22:44 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E50762.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990309102232.BKNR21739@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 9 Mar 1999 10:22:32 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 9 Mar 1999 10:22:32 +0000
Subject: Re: [GFA] APM - Advanced Power Management
X-UIDL: 82a454c0761b855c115f0ab294024e6a

Michael
I have the BIG helpfile on my site from Win3.1 SDK v2.0 - it may cover your
need.
TiGeR1.webjump.com
<G>
TomR.


At 07:30 AM 09/03/99 +0100, you wrote:
>Hi -
>
>does anyone has definitions of calls for Advanced Power Management (included
>in DOS, Wfw 3.x, etc.) ?
>
>Thanks,
>	Michael
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:15 1999
Return-Path: <vph-bensberg@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KN7P-00NT29C>; Tue, 9 Mar 1999 15:04:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA24964; Tue, 9 Mar 1999 14:46:46 +0100
From: vph-bensberg@t-online.de (Thomas Gonschor)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E53753.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 08:40:20 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36E41089.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Sender: 02204410-0001@t-online.de
Subject: AW: [GFA] TWAIN
X-UIDL: ea7528bf0a47cedf34a3651f7c5dd178

Hi Eberhard!

> Good luck and good nerves, it's not simple.

Yes, I will believe it ... :-)

Kind regards
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:16 1999
Return-Path: <tarq@corpse.free-online.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m10KNEN-00NTXiC>; Tue, 9 Mar 1999 15:11:35 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KNEG-00alUHC>; Tue, 9 Mar 1999 15:11:28 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA24962; Tue, 9 Mar 1999 14:46:39 +0100
From: "Russell Hayward" <tarq@corpse.free-online.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E53753.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  by cask.force9.net with SMTP; 9 Mar 1999 13:50:49 -0000
  by coors.free-online.net with SMTP; 9 Mar 1999 13:40:54 -0000
Date: Tue, 9 Mar 1999 13:46:10 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] Wallpaper Position
X-UIDL: 8668997ee0d674c31abf2c276260fd99

Hi,

Thanks for your quick answer John. There is a little problem though. The person
I am writing this program for is at university and uses Windows NT with
non-administrator status. Would it be possible to change that, or any part of
the WIN.INI file under those circumstances?

Thanks,
Russell Hayward

Website:     http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub

-----Original Message-----
From: John Findlay <Jayef@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: 08 March 1999 8:30pm
Subject: [GFA] Wallpaper Position


Russell,

Look in WIN.INI under the [Desktop] section. You can work out the details
by changing the settings and then looking again.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org










---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:17 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KP2Q-00NSrBC>; Tue, 9 Mar 1999 17:07:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA25227; Tue, 9 Mar 1999 16:51:21 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E55464.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 10:48:56 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Drawtext
X-UIDL: 41c3cf464340674232f06f9070e6da48

Brent,

>>1)  I'm having trouble using API functions in the WM_ERASEBKGND handler
From ???@??? Tue Mar 09 19:13:18 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KPXZ-00NSqeC>; Tue, 9 Mar 1999 17:39:33 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA25264; Tue, 9 Mar 1999 17:06:21 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E5580B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 17:07:20 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Drawtext

X-UIDL: 22f446b708fa38c0557d6132aaf47aff

Hallo Brent,

-----Ursprngliche Nachricht-----
Von: John Findlay <Jayef@compuserve.com>
An: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Datum: Dienstag, 9. Mrz 1999 16:53
Betreff: [GFA] Drawtext


>Brent,
>
>>>1)  I'm having trouble using API functions in the WM_ERASEBKGND handler


Here the definition from API-help:

WM_ERASEBKGND
hdc = (HDC) wParam; /* device-context handle */

An application sends the WM_ERASEBKGND message when the window background
must be erased (for example, when a window is resized). The message is sent
to prepare an invalidated portion of a window for painting.

Parameter Description

hdc Value of wParam. Identifies the device context.

Returns

An application should return nonzero if it erases the background; otherwise,
it should return zero.

Comments

The DefWindowProc function erases the background by using the class
background brush specified by the hbrBackground member of the WNDCLASS
structure. If hbrBackground is NULL, the application should process the
WM_ERASEBKGND message and erase the background.

An application should return nonzero in response to WM_ERASEBKGND if it
processes the message and erases the background; this indicates that no
further erasing is required. If the application returns zero, the window
will remain marked for erasing. (Typically, this indicates that the fErase
member of the PAINTSTRUCT structure will be TRUE.)

Eberhard


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:19 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KQpU-00NSpGC>; Tue, 9 Mar 1999 19:02:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA25461; Tue, 9 Mar 1999 18:33:08 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E56C3D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 12:32:01 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Drawtext
X-UIDL: 661ec0fb01e09ce1907c21fed4760402

>>1)  I'm having trouble using API functions in the WM_ERASEBKGND handler


>Here the definition from API-help


Hello Eberhard,

Thanks for your reply.

My problem is that inside the WM_ERASEBKGND handler, the API functions I
use  (commented out) are ineffective, while the GFA commands work fine.

From my code, can you suggest a correct way to fill the screen with a
single color?

Thanks, 

 Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Tue Mar 09 19:13:20 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KQrI-00NSpGC>; Tue, 9 Mar 1999 19:04:00 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA25477; Tue, 9 Mar 1999 18:35:36 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E56CCD.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 12:35:05 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Drawtext
X-UIDL: 7311729fa165fe5f239f193e0dbb437e

>>1)  I'm having trouble using API functions in the WM_ERASEBKGND handler


John,

No text in your email after the above line.

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:46:51 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KRIv-00NSqnC>; Tue, 9 Mar 1999 19:32:33 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA25549; Tue, 9 Mar 1999 19:04:16 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E57390.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 13:03:55 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Wallpaper Position
X-UIDL: 75095915d1d31b8966d155a8dc94369f

Russell,

>Would it be possible to change that, or any part of the WIN.INI file under
those circumstances?

Sorry, I don't know.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:46:52 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KROG-00NSqMC>; Tue, 9 Mar 1999 19:38:04 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA25580; Tue, 9 Mar 1999 19:09:50 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E574D3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 13:09:17 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Drawtext
X-UIDL: a57c080c45d93d1df87d68e34cb16fd1

Brent,

>John, No text in your email after the above line.<

Yes, strange that, here it is again.





>>1)  I'm having trouble using API functions in the WM_ERASEBKGND handler
From ???@??? Wed Mar 10 22:46:55 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KSqb-00NSosC>; Tue, 9 Mar 1999 21:11:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA25804; Tue, 9 Mar 1999 20:37:56 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E5897D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 20:39:01 +0100
MIME-Version: 1.0
Content-Type: multipart/mixed;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Drawtext
X-UIDL: b15f4fe9b127fda13e2abf47e0d8de91

------=_NextPart_000_000D_01BE6A6C.DD4EE520
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 8bit

Hi Brent,
Here your source code. the background of the main window is now yellow.WM_ERASEBKGND and WM_CREATE will be not send through the
GFA Basic CallBack function / never!!!!

But your little demo application is very gooDatum: Dienstag, 9. Mdrz 1999 18:48
Betreff: Re: [GFA] Drawtext
>>>1)  I'm having trouble using API functions in the WM_ERASEBKGND handler
>
>
>>Here the definition from API-help
>
>
>Hello Eberhard,
>
>Thanks for your reply.
------=_NextPart_000_000D_01BE6A6C.DD4EE520
Content-Type: application/octet-stream;
	name="Drwtxt03.lst"

Content-Disposition: attachment;
	filename="Drwtxt03.lst"

Attachment Converted: "c:\programme\eudora\attach\Drwtxt03.lst"
DO
  GETEVENT
LOOP UNTIL MENU(1) =3D 4@CloseObjects

ENDPROCEDURE Initialise
  cx& =3D GETDEVCAPS(HORZRES)
  cy& =3D GETDEVCAPS(VERTRES)
  dv&  =3D _DRIVE
  dr$ =3D DIR$(0)
  //
  TYPE tagRECT:
  - SHORT left
  - SHORT top
  - SHORT right
  - SHORT bottom
  ENDTYPE
  tagRECT: rectwin.
  tagRECT: recttext.

  TYPE tagPOINT:
  - SHORT x
  - SHORT y
  ENDTYPE
  tagPOINT:pt.
  //
RETURNPROCEDURE CreateMainWindow
  cy& =3D cy& - 50   // smaller than screen
  cy& =3D cy& - MOD(cy&, fntheight& )  // does not result in perfect =
paging in client area
  //
  // restore the GFA Basic size of full window
  xres& =3D _X, yres& =3D _Y
  '
  OPENW #1,0, 0, 0, 0  , 48
  '  TITLEW #1,"File =3D  " + n$
  TITLEW #1,"Use PageUp and PageDown keys to scroll"
  hWndMain& =3D WIN(1)
  '
  // create a yellow brush, in CloseObjects delete the brush
  hBrush& =3D CreateSolidBrush (RGB (255, 255, 0))
  // set a new window brush
  ~SetClassWord (hWndMain&, GCW_HBRBACKGROUND, hBrush&)
  // you !!!!must!!!! sizing the window
  ~MoveWindow (hWndMain&, 10, 10, xres& - 20, cy& + 20, TRUE)
  '
  CB WIN(1),0 TO -1,MainWindowProc()
  rectwin.top =3D 0
  rectwin.right =3D  _X - 1
  rectwin.left =3D 0
  rectwin.bottom =3D cy& - 1
  recttext. =3D rectwin.  // text rect at same point as window
RETURN

PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
  LOCAL ps$=3DSTRING$(100,0)
  SWITCH message&
    '
  CASE WM_KEYDOWN    // keyboard message
    SWITCH wParam&
      '
    CASE 34 // pagedown key
      IF ABS(recttext.top - cy&) < ht&
        recttext.top =3D recttext.top - cy&
        ~InvalidateRect(hWnd&,*rectwin.,TRUE)
      ENDIF    CASE 33 //pageup key
      IF recttext.top + cy& <=3D 0
        recttext.top =3D recttext.top + cy&
        ~InvalidateRect(hWnd&,*rectwin.,TRUE)
      ENDIF
      '
    CASE 38 //lu
    CASE 40 //ld
    ENDSELECT

    // !!!!!!!forget this mesage. This message in a real window =
procedure
    // will send, if the window has no brush
    //wnd.hbrBackground =3D NULL (wndclass structure)
    // in GFA Basic has the window always a white brush.
    '
    //CASE WM_ERASEBKGND
    ' hdc& =3D GetDC (hWnd&)
    ' ~FillRect(hdc&, V:ps$ + 4, WHITE_BRUSH)    // this does not work
    ' ~ReleaseDC(hWnd&,hdc&)
    //WIN #(1)
    //RGBCOLOR $ffffff    //white   this works
    //DEFFILL 0
    //PBOX 0,0,_X,_Y    //RETVAL 0
    '
  CASE WM_PAINT
    '   ~InvalidateRect(hWnd&,*rectwin.,TRUE)  // use only for scroll =
and stretch
    hdc& =3D BeginPaint(hWnd&, V:ps$)
    ~SetBkMode(hdc&,TRANSPARENT)
    ~SetBkColor(hdc&,RGB(255,255,255))
    ~SetTextColor(hdc&,RGB(0,0,255))
    ~SelectObject(hdc&,screenfont&)
    SETDC hdc&
    IF EXIST(n$)
      //Note that asize% must be less than 64k  in drawtext()
      ht& =3D DrawText(hdc&,adrmem%,asize%,*recttext.,DT_WORDBREAK | =
DT_LEFT)
    ENDIF
    ~EndPaint(hWnd&, V:ps$) ' not req'd for this demo
    RETVAL 0
  ENDSWITCH
RETURN

PROCEDURE OpenObjects
  FILESELECT #"Select a file to display on screen","*.*","",n$
  DLG FONT 1,hdc&,CF_BOTH | CF_EFFECTS,0,0,0,""
  FONT TO screenfont&
  SETFONT screenfont&
  RFONT HEIGHT fntheight&
  fntheight& =3D ABS(fntheight& )  IF EXIST(n$)  //  Get some space and load the file
    OPEN "i",#1,n$
    asize% =3D LOF( #1)
    hmem& =3D GlobalAlloc(2,asize%)
    adrmem% =3D GlobalLock(hmem&)
    ~  GlobalUnlock (hmem&)    CLOSE #1
    BLOAD n$, adrmem%
  ENDIF
RETURN

PROCEDURE CloseObjects
  ~DeleteObject (hBrush&)
  ~DeleteObject(screenfont&)
  ~  GlobalFree(hmem&)
  CLOSEW #1
RE------=_NextPart_000_000D_01BE6A6C.DD4EE520--
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org
-------

From ???@??? Wed Mar 10 22:46:57 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KUBv-00NSpJC>; Tue, 9 Mar 1999 22:37:31 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA26005; Tue, 9 Mar 1999 22:08:45 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E59EDB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 16:08:25 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Drawtext
X-UIDL: 339a47a73da5f58bc1c25e78724e9621

>>John, No text in your email after the above line.<

>Yes, strange that, here it is again.

Still no info.

Is this a file attachment that is not coming through?

Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:46:58 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KUC2-00NSTUC>; Tue, 9 Mar 1999 22:37:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA26007; Tue, 9 Mar 1999 22:08:58 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E59EDB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 16:08:32 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Drawtext
X-UIDL: 05fa45cefb4ced8132c6e0b5b3215e96

>>>
Here your source code. the background of the main window is now yellow.
WM_ERASEBKGND and WM_CREATE will be not send through the
GFA Basic CallBack function / never!!!!
<<<<

Eberhart,

Thanks.

However, I do not want DefWindowsProc() to do my painting.

The reason is the way WIN95 generates its WM_NCPAINT and WM_PAINT messages
when the titlebar is grabbed on a partially hidden window.

In most programs (not this one) I want my callback to paint the background
and forground in response to the WM_ERASEBKGND message to prevent screen
flash in W95.

Do you know why fillrect() does not work in my example?

Thanks BD.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:47:00 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KUbm-00NSqbC>; Tue, 9 Mar 1999 23:04:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA26072; Tue, 9 Mar 1999 22:35:37 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E5A50F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 16:34:00 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Changed Title!
X-UIDL: 63d12595d67f1c5a9745c1d445a8f714

Hi Brent,

>Is this a file attachment that is not coming through?<

No, I don't know what's going on. This is the 4th time I've sent this
message, only sent an attachment the first time. Returned to sender!!
Didn't try sending it again. Perhaps BeroList v2.5.6 has a grudge against
me.

I'll keep it short so as to trick BeroList v2.5.6 :-)

Why do you want to process WM_WM_ERASEBKGND? Generally not needed.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:47:01 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KVL4-00NST9C>; Tue, 9 Mar 1999 23:51:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA26210; Tue, 9 Mar 1999 23:23:00 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E5B02A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 9 Mar 1999 17:22:35 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Changed Title!
X-UIDL: d67563e157ae5386b82b73d3aea25da4

>>  Why do you want to process WM_WM_ERASEBKGND? Generally not needed.


The reason is the way WIN95 generates its WM_NCPAINT and WM_PAINT messages
when the titlebar is grabbed on a partially hidden window.

It generates  WM_NCPAINT when the bar is grabbed, and a WM_PAINT when it is
first moved, causing a flash due to the 2 WM_ERASEBKGND messages (that is,
only if you also do the forground painting from the WM_ERASEBKGND
handler)..

The only way I know to prevent that is to insert logic in the WM_ERASEBKGND
handler to prevent the double erase. 
(not shown in this progam)

Its merely an aesthetic thing.

Brent.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:47:02 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KVL7-00NSTPC>; Tue, 9 Mar 1999 23:51:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA26206; Tue, 9 Mar 1999 23:22:22 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E5B008.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Tue, 09 Mar 1999 23:21:28 +0100
In-Reply-To: <36E5897D.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] MONITOR command?
X-UIDL: bbef38e776e03fb0a173ecf6abdab27a

Hi!

This is taken from the mdi4.gfw sample source:

/* create hot button windows
W& = 43,H& = 20
MONITOR 0
FOR J|=0 TO 9
  MONITOR 1

HOT_BUTTON&(J|)=CreateWindow("BUTTON","Hot"+STR$(J|),WS_VISIBLE|WS_CHILDWIND
OW|BS_PUSHBUTTON,5+J|*(W&+5),3,W&,H&,WIN(0),J|,_INSTANCE,0)
  MONITOR 2
NEXT J|
MONITOR 3

I can't find any information about the MONITOR command. Any ideas?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:47:02 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KYd6-00NQdOC>; Wed, 10 Mar 1999 03:21:52 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA26655; Wed, 10 Mar 1999 02:52:42 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E5E15F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990310015223.EGGN8694@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Mar 1999 01:52:23 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Mar 1999 01:52:23 +0000
Subject: Re: [GFA] Drawtext
X-UIDL: 806138df61a274f5c6211c50fcc13d82

John likes those one-liners <G>
TomR.



At 01:09 PM 09/03/99 -0500, you wrote:
>Brent,
>
>>John, No text in your email after the above line.<
>
>Yes, strange that, here it is again.
>
>
>
>
>
>>>1)  I'm having trouble using API functions in the WM_ERASEBKGND handler


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:47:03 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KdQT-00NQdZC>; Wed, 10 Mar 1999 08:29:09 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA27248; Wed, 10 Mar 1999 08:01:09 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E6299F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Mar 1999 01:59:54 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] MONITOR command?
X-UIDL: 079e2ba8e1a8ad19bb53d725bca7bf35

MONITOR is for use in debugging

MONITOR [n] calls interrupt $3 and passes the value n in processor
registers AX and DX. The command 
is intended for inserting of breakpoints in compiled programs.

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:47:04 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m10KhIC-00NQdZC>; Wed, 10 Mar 1999 12:36:52 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KhHl-00alUFC>; Wed, 10 Mar 1999 12:36:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA27649; Wed, 10 Mar 1999 11:57:45 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E66118.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990310105732.BJEF8807@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 10 Mar 1999 10:57:32 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 10 Mar 1999 10:57:32 +0000
Subject: [GFA] printing w/ fonts   1003xx1-
X-UIDL: 624d52249a05a164f9d8a42180e4a857

10/03/99 04:45:06 AM   printing w/ fonts   1003xx1-

OK - this version functions properly but does NOT have wrap (yet).
For the moment, any line too long at any given font loses it's excess.

Obtaining a Dc for the printer has an option... it MUST be obtained
before starting the printjob, but using the call for the Dc OR calling
the DLGPRINT - either one - is workable.

I don't know where *this* comes from:   PrtCharw& = w& * cxmax& / 800
but that 800 controls the actual char height & width.  I would rather
work with _DX, but 800 seems about right.
-----------------------------------------------------------------------
' maybe3f.lst  from Printinf.lst by J.R. Musselman
' modified by TomR. to query & use the printer's printable area
TITLEW #1, "  Will self-close."
OPENW #1,0,0,_X ,_Y,48
PRINT " maybe3f.lst  from Printinf.lst by J.R. Musselman"
PRINT " modified by TomR. to query & use the printer's printable area"
PRINT " will print multi-page docs in font & size selected.  back to wrap!"
PrtInit  //include this line first.
@Get_Info()
IF @PrtJobStart THEN
  DO UNTIL EOF(#10)
    LINE INPUT #10,brp$
    PrtLine(0,brp$,TRUE)
  LOOP
ENDIF
PrtJobEnd
CLOSE #10
CLOSEW #1
END


PROCEDURE PrtInit
  FILESELECT #"Print","",".txt",finame$  //  bring in finame$ from program!
  OPEN "i",#10,finame$
  PrtJobName$ = finame$
  PrtLn& = 0  //used internally by printer routines
  PrtPg& = 0  //used internally by printer routines
RETURN


PROCEDURE PrtLine(Indent,lnout$,AddLineFeed!)  ' ' Lnout$
  IF lnout$ <> "" THEN
    IF Indent >= 0 THEN
      TEXT Indent * PrtDPI&,@PrtRow(PrtLn&),lnout$
    ELSE IF Indent = -1
      TEXT (cxmax& - TXTLEN(lnout$)) / 2,@PrtRow(PrtLn&),lnout$
    ELSE IF Indent = -2
      TEXT cxmax& - TXTLEN(lnout$) - PrtDPI& * .5,@PrtRow(PrtLn&),lnout$
    ENDIF
  ENDIF
  IF AddLineFeed! THEN
    PrtLn& ++
    IF PrtLn& * PrtCharh& => cymax& THEN
      PrtJobNewPage
    ENDIF
  ENDIF
RETURN


FUNCTION PrtRow(PrtLn&)
  RETURN (PrtLn& - 1) * PrtCharh&
ENDFUNC


FUNCTION PrtJobStart
  LOCAL Setup&,w&,h&,italic&,underline&,strikeout&
  LOCAL
charset&,clipprecision&,quality&,pitch&,family&,weight&,orientation&,escapem
,ent&
  PrtPg& = 0        //Global variable to indicate the current page number
  PrtLn& = 0        //Global variable to indicate current line number on a page
  DEFMOUSE 2      //Hour glass debug- not working
  GETEVENT
  PrtDPI& = GetDeviceCaps(prtdc&,LOGPIXELSX)
  cxmax& = GetDeviceCaps(prtdc&,HORZRES)
  cymax& = GetDeviceCaps(prtdc&,VERTRES)

  IF _AX = 0 THEN RETURN 0
  DLG FONT 1,prtdc&,CF_PRINTERFONTS,0,0,0,""
  IF _AX = 0 THEN RETURN 0
  SETDC prtdc&
  RFONT  WIDTH w&,HEIGHT h&
  '  Use the printer's actual print area, NOT the whole page (TomR.)
  PrtCharw& = w& * cxmax& / 800
  PrtCharh& = ABS(h& * cymax& / 800)
  RFONT ITALIC italic&
  RFONT UNDERLINE underline&
  RFONT STRIKEOUT strikeout&
  RFONT CHARSET charset&
  RFONT CLIPPRECISION clipprecision&
  RFONT QUALITY quality&
  RFONT PITCH pitch&
  RFONT FAMILY family&
  RFONT WEIGHT weight&
  RFONT ORIENTATION orientation&
  RFONT ESCAPEMENT escapement&
  FONT ITALIC italic&, UNDERLINE underline&, STRIKEOUT strikeout&
  FONT CHARSET charset&, CLIPPRECISION clipprecision&, QUALITY quality&
  FONT QUALITY quality&, PITCH pitch&, FAMILY family&, WEIGHT weight&
  FONT WIDTH PrtCharw&, HEIGHT PrtCharh&, ORIENTATION
orientation&,ESCAPEMENT escapement&
  FONT TO PrtFont&
  STARTDOC PrtJobName$
  SETFONT PrtFont&
  PrtJobNewPage
  RETURN TRUE
ENDFUNC


PROCEDURE PrtJobNewPage
  LOCAL ii,d$
  IF PrtLn& THEN
    NEW FRAME
  ENDIF
  SETFONT PrtFont&
  PrtLn& = 1
  PrtPg& ++
  mt$ = @tim$() + " on " + @get_date$()
  PrtLine(0,mt$,FALSE)
  PrtLine(-1,PrtJobName$,FALSE)
  PrtLine(-2,"Page " + STR$(PrtPg&),TRUE)
  PrtLine(0,"",TRUE)  //blankLine
RETURN


PROCEDURE PrtJobEnd
  FREEFONT PrtFont&
  NEW FRAME
  ENDDOC
  SETDC _DC(1)
  FREEDC prtdc&
  DEFMOUSE 0      //normal pointer
RETURN


PROCEDURE Get_Info()
  prtdc& = PrinterDC()  ' must have one of these two BEFORE 'IF @PrtJobStart
THEN'
  '  DLG PRINT WIN(1),PD_ALLPAGES,prtdc&
RETURN


FUNCTION get_date$()
  LOCAL temp$,ctr%,i%
  LOCAL mon$="JanFebMarAprMayJunJulAugSepOctNovDec"
  LOCAL day$="SunMonTueWedThuFriSat"
  ~INTR($21,_AH = $2A)
  temp$ = MID$(day$,3 * _AL + 1,3) + ", " + STR$(_DL) + " " + MID$(mon$,3 *
_DH - 2,3)
  temp$ = temp$ + " " + STR$(_CX)
  RETURN temp$
ENDFUNC


FUNCTION tim$()
  tm$ = TIME$
  IF VAL(LEFT$(tm$,2)) =< 12 THEN
    tm$ = tm$ + " a.m."
  ENDIF
  IF VAL(LEFT$(tm$,2)) > 12 THEN
    tm1 = VAL(LEFT$(tm$,2)) - 12
    tm1$ = STR$(tm1),tm2$ = RIGHT$(tm$,6)
    tm$ = tm1$ + tm2$ + " p.m."
  ENDIF
  RETURN tm$
ENDFUNC


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:47:09 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10KkrE-00NSpAC>; Wed, 10 Mar 1999 16:25:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA28081; Wed, 10 Mar 1999 16:07:00 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E69BCB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Mar 1999 10:05:42 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Drawtext
X-UIDL: 24e7657402ebd88f5e98a26ea12079af





>John likes those one-liners <G><


(         )

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Wed Mar 10 22:47:10 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Klvg-00NTXXC>; Wed, 10 Mar 1999 17:33:56 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA28317; Wed, 10 Mar 1999 17:16:18 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E6AC02.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 10 Mar 1999 17:17:55 +0100
MIME-Version: 1.0
Content-Type: multipart/mixed;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Drawtext
X-UIDL: 09a483c179775ee4a413f85eb40294fe

------=_NextPart_000_0028_01BE6B19.EFF7C720
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

Hi Brent,GFW-file as attetchment.
It will be show you, how you can draw a rectangle as window background
in the WM_PAINT message.

!!! Forget the WM_ERASEBKGND and WM_CREATE message.
Both do not work in a GFA Basic CalBack function.
WM_ERASEBKGND will be sending only from application, if the
window background brush is NULL. In GFA Basic the window
has always the white brush.Greetings 
Eberhard
------=_NextPart_000_0028_01BE6B19.EFF7C720
Content-Type: application/octet-stream;
	name="Drwtxt03.lst"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
	filename="Drwtxt03.lst"//drwtxt02.gfw  B.Deck
// Imroved version puts file input in separate PROC openobjects
//
// Heres a text to screen printer that uses Drawtext().
// Hit pageup or page down to scroll
// It does downward scrolling by setting increasingly negative rect.top.
//
// SetWindowOrg() may be a better method.
//
// Note that DrawText() does not work on metafiles (Win SDK)
// Note that asize%  must be less than 64k in DrawText()
// Also, Drawtext must draw the entire text, just to get some in the
// clipping region of the window.  So later pages are slower.
//
// Finally my attempts to get perfect clean paging (no text cutoff by =
borders)
// by setting the rectangle and page increment sizes to a multiple of =
the font
// height in PROC CreateMainWindow()  have failed. Either my arithmetic =
is off
// or drawtext uses a nonuniform line spacing. If anyone knows, please =
advise.
//
//
@Initialise
@OpenObjects
@CreateMainWindow
  GETEVENT
LOOP UNTIL MENU(1) =3D 4@CloseObjects

ENDPROCEDURE Initialise
  cx& =3D GETDEVCAPS(HORZRES)
  cy& =3D GETDEVCAPS(VERTRES)
  dv&  =3D _DRIVE
  dr$ =3D DIR$(0)
  //
  TYPE tagRECT:
  - SHORT left
  - SHORT top
  - SHORT right
  - SHORT bottom
  ENDTYPE
  tagRECT: rectwin.
  tagRECT: recttext.

  TYPE tagPOINT:
  - SHORT x
  - SHORT y
  ENDTYPE
  tagPOINT:pt.
  //
RETURN> PROCEDURE CreateMainWindow
  cy& =3D cy& - 50   // smaller than screen
  cy& =3D cy& - MOD(cy&, fntheight& )  // does not result in perfect =
paging in client area
  //
  // restore the GFA Basic size of full window
  xres& =3D _X, yres& =3D _Y
  '
  OPENW #1,10, 10, _X - 20, cy& + 20  , 48
  '  TITLEW #1,"File =3D  " + n$
  TITLEW #1,"Use PageUp and PageDown keys to scroll"
  hWndMain& =3D WIN(1)
  '
  // create a yellow brush, in CloseObjects delete the brush
  //hBrush& =3D CreateSolidBrush (RGB (255, 255, 0))
  // set a new window brush
  //~SetClassWord (hWndMain&, GCW_HBRBACKGROUND, hBrush&)
  // you !!!!must!!!! sizing the window
  //~MoveWindow (hWndMain&, 10, 10, xres& - 20, cy& + 20, TRUE)
  '
  CB WIN(1),0 TO -1,MainWindowProc()
  rectwin.top =3D 0
  rectwin.right =3D  _X - 1
  rectwin.left =3D 0
  rectwin.bottom =3D cy& - 1
  recttext. =3D rectwin.  // text rect at same point as window
RETURN

> PROCEDURE MainWindowProc(hWnd&, message&, wParam&, lParam%)
  LOCAL ps$=3DSTRING$(100,0)
  SWITCH message&
    '
  CASE WM_KEYDOWN    // keyboard message
    SWITCH wParam&
      '
    CASE 34 // pagedown key
      IF ABS(recttext.top - cy&) < ht&
        recttext.top =3D recttext.top - cy&
        ~InvalidateRect(hWnd&,*rectwin.,TRUE)
      ENDIF    CASE 33 //pageup key
      IF recttext.top + cy& <=3D 0
        recttext.top =3D recttext.top + cy&
        ~InvalidateRect(hWnd&,*rectwin.,TRUE)
      ENDIF
      '
    CASE 38 //lu
    CASE 40 //ld
    ENDSELECT

    // !!!!!!!forget this mesage. This message in a real window =
procedure
    // will send, if the window has no brush
    //wnd.hbrBackground =3D NULL (wndclass structure)
    // in GFA Basic has the window always a white brush.
    '
    //CASE WM_ERASEBKGND   !!!!In GFA Basic this will not work!!!!
    ' hdc& =3D GetDC (hWnd&)
    ' ~FillRect(hdc&, V:ps$ + 4, WHITE_BRUSH)    // this does not work
    ' ~ReleaseDC(hWnd&,hdc&)
    //WIN #(1)
    //RGBCOLOR $ffffff    //white   this works
    //DEFFILL 0
    //PBOX 0,0,_X,_Y    //RETVAL 0
    '
  CASE WM_PAINT
    '   ~InvalidateRect(hWnd&,*rectwin.,TRUE)  // use only for scroll =
and stretch
    hdc& =3D BeginPaint(hWnd&, V:ps$)
    '
    // draw a filled recangle like pbox
    // first create and select the brush
    hBrush& =3D CreateSolidBrush (RGB (255, 255, 0))
    oldbrush& =3D SelectObject (hdc&, hBrush&)
    // create a pen with same color like brush (border)
    hPen& =3D CreatePen (PS_SOLID, 1, RGB (255, 255, 0))
    oldpen& =3D SelectObject (hdc&, hPen&)
    // draw rectangle that will fill with the brush
    ~GetClientRect (hWnd&, *rectwin.)
    ~Rectangle (hdc&, rectwin.left, rectwin.top, rectwin.right, =
rectwin.bottom)
    ~SetBkMode(hdc&,TRANSPARENT)
    ~SetBkColor(hdc&,RGB(255,255,255))
    ~SetTextColor(hdc&,RGB(0,0,255))
    ~SelectObject(hdc&,screenfont&)
    ///SETDC hdc&  why this in a callback function no GFA Basic calls
    IF EXIST(n$)
      //Note that asize% must be less than 64k  in drawtext()
      ht& =3D DrawText(hdc&,adrmem%,asize%,*recttext.,DT_WORDBREAK | =
DT_LEFT)
    ENDIF
    // delete pen and brush
    ~SelectObject (hdc&, oldbrush&)
    ~SelectObject (hdc&, oldpen&)
    ~DeleteObject (hBrush&)
    ~DeleteObject (hPen&)
    ~EndPaint(hWnd&, V:ps$) ' not req'd for this demo
    RETVAL 0
  ENDSWITCH
RETURN

> PROCEDURE OpenObjects
  FILESELECT #"Select a file to display on screen","*.*","",n$
  DLG FONT 1,hdc&,CF_BOTH | CF_EFFECTS,0,0,0,""
  FONT TO screenfont&
  SETFONT screenfont&
  RFONT HEIGHT fntheight&
  fntheight& =3D ABS(fntheight& )  IF EXIST(n$)  //  Get some space and load the file
    OPEN "i",#1,n$
    asize% =3D LOF( #1)
    hmem& =3D GlobalAlloc(2,asize%)
    adrmem% =3D GlobalLock(hmem&)
    ~  GlobalUnlock (hmem&)    CLOSE #1
    BLOAD n$, adrmem%
  ENDIF
RETURN

> PROCEDURE CloseObjects
  ~DeleteObject (hBrush&)
  ~DeleteObject(screenfont&)
  ~  GlobalFree(hmem&)
  CLOSEW #1
RE------=_NextPart_000_0028_01BE6B19.EFF7C720--
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 13 19:17:30 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10LWuh-00NSTPC>; Fri, 12 Mar 1999 19:44:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA00748; Fri, 12 Mar 1999 19:26:07 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E96D8B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Fri, 12 Mar 1999 18:39:57 +0100
In-Reply-To: <36E6AC02.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] MDI client area dimension
X-UIDL: b051bf7dcc8c93ef12a5ce10e789e846

Hi!

I want to get some informations about another MDI program. I already get
the handles of the parent window as well as the handles of the client
windows. Now I would like to get the width and the height of the area where
the client windows are displayed. Any ideas?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 13 19:17:31 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10LX8v-00NSosC>; Fri, 12 Mar 1999 19:58:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA00784; Fri, 12 Mar 1999 19:43:36 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E9713E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 12 Mar 1999 19:45:16 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] MDI client area dimension

X-UIDL: 5383cee0d43af866cc53e76d586560bc

Hi Michael,

If I undertand you, you wnat the dimensions of the client window
and you have the handle of it. The client area is the place, in which
display the child windows.

Try the API function:
TYPE RECT:
- USHORT left
- USHORT top
- USHORT right
- USHORT bottom
ENDTYPE
[DIM] RECT: rect.

~GetClientRect (hwndClient&, *rect.)
rect.left and rect.top always 0
width& = rect.right
height& = rect.bottom

I hope that's right.
Greetings

Eberhard
You wrote at Freitag, 12. Mrz 1999 19:30
Betreff: [GFA] MDI client area dimension


>Hi!
>
>I want to get some informations about another MDI program. I already get
>the handles of the parent window as well as the handles of the client
>windows. Now I would like to get the width and the height of the area where
>the client windows are displayed. Any ideas?
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 13 19:17:32 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10LZXi-00NSTPC>; Fri, 12 Mar 1999 22:32:30 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA01074; Fri, 12 Mar 1999 22:17:03 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E99563.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Fri, 12 Mar 1999 22:16:48 +0100
In-Reply-To: <36E9713E.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] MDI client area dimension
X-UIDL: 228df1526a0a5c0be50b3d994d982259

At 19:45 12.03.99 +0100, Eberhard Funck wrote:

>If I undertand you, you wnat the dimensions of the client window
>and you have the handle of it. The client area is the place, in which
>display the child windows.
>
>Try the API function:
>TYPE RECT:
>- USHORT left
>- USHORT top
>- USHORT right
>- USHORT bottom
>ENDTYPE
>[DIM] RECT: rect.
>
>~GetClientRect (hwndClient&, *rect.)
>rect.left and rect.top always 0
>width& = rect.right
>height& = rect.bottom
>
>I hope that's right.

That's right, thanks. Some days ago I already tried it this way, but it
didn't work. I messed up the data types and used LONG instead of USHORT. 


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sat Mar 13 19:17:33 1999
Return-Path: <mb-soft@rosenet.it>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10LaCq-00NSTUC>; Fri, 12 Mar 1999 23:15:00 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA01129; Fri, 12 Mar 1999 22:41:52 +0100
From: MB SOFT <mb-soft@rosenet.it>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36E99B08.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
  (SMTPD32-4.07) id AA111C3000B6; Fri, 12 Mar 1999 22:41:37 +0100
Date: Fri, 12 Mar 1999 22:40:48 GMT-1
X-Mailer: YAM 1.3.4 [020] - Amiga Mailer by Marcel Beck
Organization: MB SOFT di Maurizio Burato
MIME-Version: 1.0
Content-Type: text/plain
Subject: [GFA] Multimedia Mixer Control
X-UIDL: 640f9a5b3e7293db3623f07857b1d5ef

Hi,
anybody could show me a little exemple on how to control the Windows
multimedia mixer from GFA?
I would simply have the ability to open or close the LINE and/or CD input
level.

Maurizio Burato

--------------------------------------------------------------------------
MB SOFT di Burato Maurizio - Via G.Pallavicino 25 - 18038 Sanremo (ITALY)
voice/mail voice             +390184573555
fax/bbs                      +390184597197
mobile                       +393683198205
e-mail:                      mb-soft@rosenet.it
VAT:                         01073980086
--------------------------------------------------------------------------


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 14 05:07:33 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10LvSQ-00NSpQC>; Sat, 13 Mar 1999 21:56:30 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA03943; Sat, 13 Mar 1999 21:40:02 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EADE2E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 13 Mar 1999 12:37:43 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] BROWSE
X-UIDL: 211bb4c6e6f82d464a04a270a81212fe

Hi,
Does anyone have a goods browse dialog-routine with source code. Please!!
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun Mar 14 05:07:36 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10M1BB-00NRHSC>; Sun, 14 Mar 1999 04:03:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id DAA04617; Sun, 14 Mar 1999 03:48:15 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EB345A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 14 Mar 1999 03:51:41 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36EADE2E.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] BROWSE
X-UIDL: 1b79124465185df2893ba7789abacbbc

> Does anyone have a goods browse dialog-routine with source code. Please!!
"Browse" what, Dale? Directories? See my old source "The Multimedia Tool" which
collects filenames on drives. Dirty and quick, but works.

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:23:51 1999
Return-Path: <AlanLennon@usa.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10M8Ez-00NSpHC>; Sun, 14 Mar 1999 11:35:29 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA05640; Sun, 14 Mar 1999 11:19:21 +0100
From: Alan Lennon <AlanLennon@usa.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EB9E6C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v4.00.03.01 201-229-104-101) with ESMTP
          id <19990314101818.FSMW24376.mta2-svc@usa.net>
          for <gfabasic@linux.net.eu.org>; Sun, 14 Mar 1999 10:18:18 +0000
Date: Sun, 14 Mar 1999 10:17:01 +0000
X-Mailer: Mozilla 4.5 [en] (Win98; I)
X-Accept-Language: en
MIME-Version: 1.0
References: <36EADE2E.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] BROWSE
X-UIDL: 8e760c3eb011322d09dcd92c943c0dd6
Status: RO



Dale Bryant wrote:
> 
> Hi,
> Does anyone have a goods browse dialog-routine with source code. Please!!
> Dale
> 

FUNCTION browse$(al_start_path$)

  DIALOG #9,300,160,200 + w_adjust|,156 + h_adjust|,"Select
directory",style%,-14,"Times New Roman"
    CONTROL "",             401,     "static",   SS_LEFT,    10,   0,
180,  20
    CONTROL "Text",         400,"listbox",$10a00040 |
LBS_NOTIFY,10,20,180,100
    CONTROL "OK",           IDOK,    "button",   $10000000,  10, 125, 
85,  24
    CONTROL "Cancel",       IDCANCEL,"button",   $10000000, 105, 125, 
85,  24
  ENDDIALOG

  exit_browse! = FALSE
  ~DlgDirList(DLG(9),"C:\",400,401,$4010 | $8000)
  browse_path$ = SPACE$(256)
  DO
    PEEKEVENT
    IF MENU(1) = 30  OR MENU(12) = 400 OR (HIWORD(MENU(13)) =
LB_SELECTSTRING)
      SELECT MENU(6)
      CASE 400
        ~DlgDirSelect(DLG(9),V:browse_path$,400)
        ~DlgDirList(DLG(9),ZTRIM$(browse_path$),400,401,$4010 | $8000 |
$2000)
      CASE IDOK
        return_path$ = _WIN$(DLGITEM(9,401))
        exit_browse! = TRUE
      CASE IDCANCEL
        return_path$ = al_start_path$
        exit_browse! = TRUE
      ENDSELECT
    ENDIF
  LOOP UNTIL exit_browse!
  CLOSEDIALOG #9
  RETURN return_path$

ENDFUNC

Is this what you're looking for Dale? I've cut it from a working program
which is why the dialog box has an odd number.

Best regards Alan

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:17 1999
Return-Path: <CompuHelp@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10MWvu-00NT2NC>; Mon, 15 Mar 1999 13:57:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA07180; Mon, 15 Mar 1999 13:39:44 +0100
From: CompuHelp@t-online.de (CompuHelp@T-Online.de)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36ED10A9.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 15 Mar 1999 13:28:39 +0100
X-Mailer: T-Online eMail 2.0
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 0675893545-0001@t-online.de
Subject: [GFA] Compiler

X-UIDL: 16635d9aaf2c176fe526bbecca642f06
Status: RO

Hi all !

My own program runs in the Interpreter fine, but when
I use the Compiler to make an EXE File it doesnt run !

The Error Message under Win95 :

KEEP verursachte eine Allgemeine Schutzverletzung.

Can someone help me, please !!!

CU Ren


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:18 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Mau7-00NUHuC>; Mon, 15 Mar 1999 18:11:51 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA07265; Mon, 15 Mar 1999 17:55:34 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36ED4C6D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 15 Mar 1999 08:11:26 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] compiler error
X-UIDL: 514d4e20e102c66f48a2eb571efd8fd2
Status: RO

Hi all !

My own program runs in the Interpreter fine, but when
I use the Compiler to make an EXE File it doesnt run !

The Error Message under Win95 :

KEEP verursachte eine Allgemeine Schutzverletzung.

KEEP caused a general protection-injury.  (fault)
Can someone help me, please !!!

CU Ren



http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:18 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10MbAT-00NUOhC>; Mon, 15 Mar 1999 18:28:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA07280; Mon, 15 Mar 1999 18:06:45 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36ED4EED.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 15 Mar 1999 09:03:56 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] Programming Issues
X-UIDL: 1970e5f9bb0431284e11217c1ea99573
Status: RO

Hi,
If you are not on the 'Not Affiliated With GFA News Letter' mailing list do
not miss the tutorial by John Findlay on "Programming Issues"  John shows us
some great rules to follow in our programming.  The Programming Issue
tutorial is complimented by the example source code John has supplied for
the tutorial.  Go to the URL below and select "Letters' . The tutorial and
the tutorial source code are separated .ZIP files so be sure to download
both files.
Dale

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:19 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10MceY-00NUP3C>; Mon, 15 Mar 1999 20:03:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA07332; Mon, 15 Mar 1999 19:36:12 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36ED63E4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 15 Mar 1999 19:36:43 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] compiler error

X-UIDL: ee7290b8a3102c567e6ae13280976b1f
Status: RO

Hi,

You wrote at Montag, 15. Mrz 1999 17:58


My question: is keep the application name?

If your compiler has a checkbox "Use Toolhelp"
compile your application with this option.
If a GFA Basic message says " Peek, Poke, falsch"
than you have an memory error (bad pionter) or bad string or ....
It can be so much, therefore it's better, if we see your
application for checking.

Eberhard


>Hi all !
>
>My own program runs in the Interpreter fine, but when
>I use the Compiler to make an EXE File it doesnt run !
>
>The Error Message under Win95 :
>
>KEEP verursachte eine Allgemeine Schutzverletzung.
>
>KEEP caused a general protection-injury.  (fault)
>Can someone help me, please !!!
>
>CU Ren
>
>
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net/adbryant
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:23 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10MdOs-00NUPLC>; Mon, 15 Mar 1999 20:51:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA07370; Mon, 15 Mar 1999 20:36:44 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36ED7221.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 15 Mar 1999 14:34:41 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Compiler
X-UIDL: bdaee37411d95080ebb1345a575b1f30
Status: RO

>My own program runs in the Interpreter fine, but when
>I use the Compiler to make an EXE File it doesnt run !

If you have an array 

DIM a(x)   

and if x * sizeof(x)  > 64K 

then you must include the compiler directive:

$BIG a()


Just a guess.

Brent 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:25 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10MeRN-00NToIC>; Mon, 15 Mar 1999 21:58:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA11430; Mon, 15 Mar 1999 21:39:53 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36ED812E.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 15 Mar 1999 12:37:48 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] Fw:  Question to all GFA-Programmers
X-UIDL: 60bfca14bb4b6dc0ae4ff0f0420b349c
Status: RO


Forwarded to the GFA MAIL LIST
Subject: Question to all GFA-Programmers


>Hi Dale and all other GFA-User
>
>Have you an idea how i can get deeper Informations about the used CPU and
>takting-rate like "Intel Pentium II at 300 Mhz" in GFA under Windows 95/98
???
>
>The old Flags in GetWinFlags() shows only 486CPU-Flag as highest CPU. Thats
>not usefull to show the actual Processorclasses under Systeminfos in own
>Programs !
>
>Have anyone an idea ??? Please send mail to TecBerlin@aol.com !!!
>
>Bye ...
>




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:28 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Msur-00NUaLC>; Tue, 16 Mar 1999 13:25:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA11746; Tue, 16 Mar 1999 12:54:43 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EE578B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 16 Mar 1999 06:53:28 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] GIF Error!
X-UIDL: 86286204edaa0b9e3b2c1d100fb05798
Status: RO

Hello All,

Unfortunately I'm one of those humans that make mistakes - noticed an error
in the gif loader on Dales web page, it didn't free the memory. I've asked
Dale to replace the gifload.zip with the corrected version.

Thank you for your indulgence/tolerance/forbearance etc.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:28 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Mz3G-00NUVwC>; Tue, 16 Mar 1999 19:58:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA12109; Tue, 16 Mar 1999 19:41:04 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EEB6BD.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 16 Mar 1999 10:38:42 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] PHOTOS
X-UIDL: 374c4730190d2b6b4c12c3e9cf5e9cf3
Status: RO

I just can't believe that all you GFA programmers would let Tom Record beat
you in sending a photo for the GFA programmer photo page on the GFAWHELP web
site. Of course, I have no way of knowing if it really is Tom, but who would
do something like that to themselves?
Dale
p.s.
if you send me a photo I  will put your name on the GFANL list twice.)G)

http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:29 1999
Return-Path: <vware@gmx.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10N09U-00NTrQC>; Tue, 16 Mar 1999 21:09:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA12150; Tue, 16 Mar 1999 20:48:09 +0100
From: Georg Veichtlbauer <vware@gmx.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EEC673.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Tue, 16 Mar 1999 20:47:56 +0100 (MET)
X-Authenticated-Sender: #0000929469@gmx.net
X-Authenticated-IP: [195.3.67.11]
X-Mailer: WWW-Mail 1.5 (Global Message Exchange)
Subject: [GFA] Icons, TreeView
X-UIDL: 4cac77d7eca0309c5048ddefe907b693
Status: RO

Begging for help again...

Has anyone experiences with the W95- icon format?? Tom, what's up with
you? <G>

I've also some problem with this s... Tree-View control... Due to the help
of Roland (thank you!) I was able to create one. But I really have problems
to fill it with the WHOLE directory information of a drive. The source is
too big for the mailing list, but I will send a copy to Dale.. let's see what
will happen.. <G>


Thanks,
 Georg
---
Sent through Global Message Exchange - http://www.gmx.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:30 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10N0ZF-00NTr4C>; Tue, 16 Mar 1999 21:36:01 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA12185; Tue, 16 Mar 1999 21:20:00 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EECDDB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990316201938.JQUB28073@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 16 Mar 1999 20:19:38 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 16 Mar 1999 20:19:38 +0000
Subject: Re: [GFA] PHOTOS
X-UIDL: d9223b087c668dfafc38a43bc6d7c726
Status: RO

Dale
Are you jealous of that handsome devil?
<GGGGG>
TomR.


At 10:38 AM 16/03/99 -0800, you wrote:
>I just can't believe that all you GFA programmers would let Tom Record beat
>you in sending a photo for the GFA programmer photo page on the GFAWHELP web
>site. Of course, I have no way of knowing if it really is Tom, but who would
>do something like that to themselves?
>Dale
>p.s.
>if you send me a photo I  will put your name on the GFANL list twice.)G)
>
>http://gfa.net/adbryant
>http://gfawhelp.gfa.net/adbryant
>
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:31 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10N1D1-00NTr6C>; Tue, 16 Mar 1999 22:17:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA12217; Tue, 16 Mar 1999 22:01:35 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EED796.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990316210116.INA7848@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 16 Mar 1999 21:01:16 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 16 Mar 1999 21:01:16 +0000
Subject: Re: [GFA] Icons, TreeView
X-UIDL: 3702cfe8ea8343ff564fd81da3b38426
Status: RO

At 08:47 PM 16/03/99 +0100, you wrote:
>Begging for help again...
>
>Has anyone experiences with the W95- icon format?? Tom, what's up with
>you? <G>
>
+++ 1) haven't seen any specs on W95 desktop icons, but will try to see if
I can get inside one (if I can find it <G>).
2) Duh, I donno.

I've put the Win31SDK helpfile on my website if anybody wants it.  Will also
upload several more.  TiGeR1.webjump.com

Will shortly ask help in defining some things in "C".  Want to try to 
translate some things but am NOT having any success.  Have a bright light,
but remain in constant dark on this subject.

<G>
TomR.


>I've also some problem with this s... Tree-View control... Due to the help
>of Roland (thank you!) I was able to create one. But I really have problems
>to fill it with the WHOLE directory information of a drive. The source is
>too big for the mailing list, but I will send a copy to Dale.. let's see what
>will happen.. <G>
>
>
>Thanks,
> Georg
>---
>Sent through Global Message Exchange - http://www.gmx.net
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:32 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10N1fK-00NUpSC>; Tue, 16 Mar 1999 22:46:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA12251; Tue, 16 Mar 1999 22:28:44 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EEDDEC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990316212800.HIGR11527@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 16 Mar 1999 21:28:00 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 16 Mar 1999 21:28:00 +0000
Subject: [GFA] Help, please   1603xx1-
X-UIDL: 8e42ac783a3cc9cbc9d9b1d93e0709fe
Status: RO

16/03/99 03:24:30 PM   Help, please   1603xx1-

I would appreciate it very much if someone would translate the 
following to GFA-W.  I'm getting nowhere.

I would like to build a chart of the various items as written in "C" & 
as written in GFA-W.  I'll post a list of them when I have it 
completed.

Help is always appreciated!
<G>
TomR.


DWORD GetFileVersionInfoSize(lpszFileName, lpdwHandle)

LPCSTR lpszFileName;	/* address of buffer for filename	*/
DWORD FAR *lpdwHandle;	/* address of handle for info	*/


BOOL GetFileVersionInfo(lpszFileName, handle, cbBuf, lpvData)

LPCSTR lpszFileName;	/* address of buffer for filename	*/
DWORD handle;	/* file-version information	*/
DWORD cbBuf;	/* size of buffer	*/
void FAR* lpvData;	/* address of buffer for file-version info	*/

Also noted:
The wrong struct is used for TrueType fonts... small wonder scaling
them is so difficult.  The struct needed has 4 more entries in it.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:33 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10N3CC-00NUt3C>; Wed, 17 Mar 1999 00:24:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA12409; Wed, 17 Mar 1999 00:07:14 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EEF506.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 16 Mar 1999 15:04:44 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-Mimeole: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] PHOTOS
X-UIDL: fa633812fbe72f12e31f7f037fdcb879
Status: RO

Of course I am jealous! Did you see all of that white hair?
Dale

----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Tuesday, March 16, 1999 12:19 PM
Subject: Re: [GFA] PHOTOS


>Dale
>Are you jealous of that handsome devil?
><GGGGG>
>TomR.
>
>
>At 10:38 AM 16/03/99 -0800, you wrote:
>>I just can't believe that all you GFA programmers would let Tom Record
beat
>>you in sending a photo for the GFA programmer photo page on the GFAWHELP
web
>>site. Of course, I have no way of knowing if it really is Tom, but who
would
>>do something like that to themselves?
>>Dale
>>p.s.
>>if you send me a photo I  will put your name on the GFANL list twice.)G)
>>
>>http://gfa.net/adbryant
>>http://gfawhelp.gfa.net/adbryant
>>
>>
>>
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:35 1999
Return-Path: <rroriolo@redestb.es>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10NDIw-00NV4aC>; Wed, 17 Mar 1999 11:12:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA12610; Wed, 17 Mar 1999 10:56:06 +0100
From: rroriolo@redestb.es
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EF8D15.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by tinet0.redestb.es (Post.Office MTA v3.1 release PO203a
          ID# 0-0U10L2S100) with ESMTP id AAA50
          for <gfabasic@linux.net.eu.org>; Wed, 17 Mar 1999 10:55:31 +0100
          (Post.Office MTA v3.1.2 release (PO205-101c) ID# 0-0U10L2S100)
          with SMTP id AAA206 for <gfabasic@linux.net.eu.org>;
          Wed, 17 Mar 1999 11:06:17 +0100
X-Sender: rroriolo@pop3.redestb.es
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Wed, 17 Mar 1999 10:56:02 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] Long names
X-UIDL: aa15d6a555c4d8832fd5eac0c08cf751
Status: RO


Is there a way to make folders and shortcuts with long names?
For files, Roland Walter's procedures work like a breeze, but MKDIR refuses
to accept them...

Thanks in advance.

Roberto R. Oriolo
rroriolo@redestb.es


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:37 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10NJXP-00NVKCC>; Wed, 17 Mar 1999 17:51:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA12900; Wed, 17 Mar 1999 17:32:30 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36EFEA14.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 17 Mar 1999 17:29:54 +0100
References: <36EF8D15.BeroList-2.5.9@aachen.linux.de>
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: Re: [GFA] Long names

X-UIDL: fa36a18fd180e8b7f28298fe072d3ee7
Status: RO

rroriolo@redestb.es schrieb:
>
> Is there a way to make folders and shortcuts with long names?
> For files, Roland Walter's procedures work like a breeze, but MKDIR refuses
> to accept them...
>
> Thanks in advance.
>
> Roberto R. Oriolo
> rroriolo@redestb.es

Sorry I don't understand  "long shortcuts?? and MKDIR" and I don't know the 
procedures, but try this, it creates an folder and an file.

I saw an DLL-solution somewhere. But I don't know where, maybe it was the one 
above.

/* makes an folder 
NAME$ = "C:\windows\is this what you want" + CHR$(0)
~INTR($21,_AX = $7139,_DS = HIWORD(V:NAME$),_DX = LOWORD(V:NAME$))
/* ? _FL,_AX 

/* makes an file
flags% = 2 /* 0=readoly 1=writeonly 2=readwrite,do you like the shared modes ???
/* noinherit=$80 Nobuffering=$100 no_compress=$200 Aliashint=$400 /* 
NoCRITICAL=$2000 COMMIT=$4000
attr% = 0 /* 0=normal 1=read 2=hidden 4=SYSTEM 8=VOLUMENAME(ONLY 8+3)
/* $20=ARCHIVE
action% = $10 /* 1=open old $10=open new 2=Truncate
NAME$ = "C:\windows\is this what you want2" + CHR$(0)
aliashint%=0 /* here you can put a number for the DOS-Name of your File
_BX = flags%,_CX = attr%,_DX = action%,_DI = Aliashint%
handle& = INTR($21,_AX = $716c,_DS = HIWORD(V:NAME$),_SI = LOWORD(V:NAME$))
/* KEYGET a%
/* _AX=... 1=OPENED 2=CREATED 3=REPLACED
/* !!!!!!!!!!! write your file with the handle !!!!!!!!!!! */ 
~INTR($21,_AH = $3e,_BX = handle&)  /* close handle
*/KEYGET a%

I hope this helped you !

Regards / M.f.G.     Wilhelm Bckmann
=============================================================
Email:    Bueckmann.W@T-Online.de
Homepage: Http://home.t-online.de/home/bueckmann.w/homewb.htm


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:39 1999
Return-Path: <rroriolo@redestb.es>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10NTXy-00NVJPC>; Thu, 18 Mar 1999 04:32:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA14093; Thu, 18 Mar 1999 04:15:51 +0100
From: rroriolo@redestb.es
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F080DA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by tinet0.redestb.es (Post.Office MTA v3.1 release PO203a
          ID# 0-0U10L2S100) with ESMTP id AAA45
          for <gfabasic@linux.net.eu.org>; Thu, 18 Mar 1999 04:15:17 +0100
          (Post.Office MTA v3.1.2 release (PO205-101c) ID# 0-0U10L2S100)
          with SMTP id AAA203 for <gfabasic@linux.net.eu.org>;
          Thu, 18 Mar 1999 04:26:07 +0100
X-Sender: rroriolo@pop3.redestb.es
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Thu, 18 Mar 1999 04:17:15 +0100
In-Reply-To: <36EFEA14.BeroList-2.5.9@aachen.linux.de>
References: <36EF8D15.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: Re: [GFA] Long names
X-UIDL: e121cb9015bc12809c715143f17d6f04
Status: RO


Thanks to Wilhelm Bckmann for the help . The folders are created
successfully.

>/* makes an folder 
>NAME$ = "C:\windows\is this what you want" + CHR$(0)
>~INTR($21,_AX = $7139,_DS = HIWORD(V:NAME$),_DX = LOWORD(V:NAME$))
>/* ? _FL,_AX 

Roberto R. Oriolo
rroriolo@redestb.es


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:43 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10NfTi-00NVoCC>; Thu, 18 Mar 1999 17:17:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA16152; Thu, 18 Mar 1999 16:54:15 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F1328B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 18 Mar 1999 07:50:37 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Long names
X-UIDL: e272ecc293d8e3bb9fa36bb033ac2254
Status: RO

Yes, the folders are created successfully, but can you store anything in
them?(G)

----- Original Message -----
From: <rroriolo@redestb.es>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, March 17, 1999 7:17 PM
Subject: Re: [GFA] Long names



Thanks to Wilhelm Bckmann for the help . The folders are created
successfully.

>/* makes an folder
>NAME$ = "C:\windows\is this what you want" + CHR$(0)
>~INTR($21,_AX = $7139,_DS = HIWORD(V:NAME$),_DX = LOWORD(V:NAME$))
>/* ? _FL,_AX

Roberto R. Oriolo
rroriolo@redestb.es


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:43 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10NhTe-00NVp7C>; Thu, 18 Mar 1999 19:25:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA16484; Thu, 18 Mar 1999 19:08:48 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F15204.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 18 Mar 1999 19:05:40 +0100
References: <36F1328B.BeroList-2.5.9@aachen.linux.de>
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: Re:  [GFA] Long names

X-UIDL: 9f7b2fe556e92b09cbbe956f7a5fc83c
Status: RO

Dale Bryant schrieb:
> Yes, the folders are created successfully, but can you store anything in
> them?(G)

Yes I can !!!! (with the explorer). 
Or did you mean with Gfa Basic ?
It goes when you use the second part of my example, too 

Filename ist NAME$ = "C:\windows\is this what you want\this is a test"+chr$(0)
(terrible name for a file isn't it)

On my system it goes. 

Some further information to write a handle file:
With 
Intr($21,_AH=$40,BX=handle%,CS=howmany%,_DS=HIWORD(ADR%),_DX=LOWORD(ADR%)
you can write. you can only whrite 64KB 
With 
intr($21,_AH=$42,BX=handle%,_CX=HIWORD(howmany%),_DX=LOWORD(howmany),_AL=WHAT_DO
_YOU_WANT) you can set the Filecounter to a position.
WHAT_DO_YOU_WANT = 0 relativly to the beginning of the file. I always take this.
WHAT_DO_YOU_WANT = 1 relativly to the actually position.(+)
WHAT_DO_YOU_WANT = 2 relativly to the end of the file.

Interrupts will never die ( When Microsoft not Kill them.) !!!

Regards / M.f.G.     Wilhelm Bckmann
=============================================================
Email:    Bueckmann.W@T-Online.de
Homepage: Http://home.t-online.de/home/bueckmann.w/homewb.htm


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:46 1999
Return-Path: <rroriolo@redestb.es>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10NkqY-00NVzWC>; Thu, 18 Mar 1999 23:00:58 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA16883; Thu, 18 Mar 1999 22:45:17 +0100
From: rroriolo@redestb.es
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F184BC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          by tinet0.redestb.es (Post.Office MTA v3.1 release PO203a
          ID# 0-0U10L2S100) with ESMTP id AAA227
          for <gfabasic@linux.net.eu.org>; Thu, 18 Mar 1999 22:44:17 +0100
          (Post.Office MTA v3.1.2 release (PO205-101c) ID# 0-0U10L2S100)
          with SMTP id AAA174 for <gfabasic@linux.net.eu.org>;
          Thu, 18 Mar 1999 22:55:08 +0100
X-Sender: rroriolo@pop3.redestb.es
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Thu, 18 Mar 1999 22:45:35 +0100
In-Reply-To: <36F1328B.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: Re: [GFA] Long names
X-UIDL: 60188db1b1f868773a745151ad9baba9
Status: RO

At 07:50 18/03/99 -0800, Dale Bryant wrote:
>Yes, the folders are created successfully, but can you store anything in
>them?(G)

Yes, I can store other folders...DO and others inside them INFINITE LOOP (G).
----
Wilhelm Bckmann Says:
>Yes I can !!!! (with the explorer)

But I need to put in them (with GFABasic, not with Explorer!) shortcuts to
existing files with long names, without success till now...

Any ideas?

>Thanks to Wilhelm Bckmann for the help . The folders are created
successfully.
>/* makes an folder
>NAME$ = "C:\windows\is this what you want" + CHR$(0)
>~INTR($21,_AX = $7139,_DS = HIWORD(V:NAME$),_DX = LOWORD(V:NAME$))
>/* ? _FL,_AX

Roberto R. Oriolo
rroriolo@redestb.es



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:54 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10NzvB-00NW5uC>; Fri, 19 Mar 1999 15:06:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA17695; Fri, 19 Mar 1999 14:47:55 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F266A7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 19 Mar 1999 14:50:21 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36F184BC.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] Long names
X-UIDL: 1da108d81131b03a5faeb97307585400
Status: RO

> But I need to put in them (with GFABasic, not with Explorer!) shortcuts to
> existing files with long names, without success till now...
The only way to create shortcuts I know is the use of an DLL-function from the
Visual Basic Installation Toolkit (32bit). But because of a special
32bit-library (TLB-Format), it will not work with GFA-Basic16. Try to find
information about the API-functions around "ShellLink".
The C-Headerfile is SHLOBJ.h
But because the ShellLink-Functions work with filestreams I am sure that there
is no possibility to create links via gfa16 (except one finds out the fileformat
of LNK-files or someone has a 32-bit-C-Compiler which creates EXEs that don't
need external runtime-dlls.)

Bye, Joe



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:24:55 1999
Return-Path: <Bueckmann.W@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10O18c-00NWEHC>; Fri, 19 Mar 1999 16:24:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA17844; Fri, 19 Mar 1999 16:08:53 +0100
From: Bueckmann.W@t-online.de (Bueckmann.W)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F2793D.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 19 Mar 1999 16:06:07 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 05212704090-0001@t-online.de
Subject: [GFA] shortcuts

X-UIDL: 09a3cd23f9650fd120987d4dc999fa3b
Status: RO

Can somebody tell me more about the meaning of these shortcuts ??

Does it mean that your file is only once on the Disk but you have two refers 
in two folders to it ? I don't thing "scandisk" would like this very mutch !!


Regards / M.f.G.     Wilhelm Bckmann
=============================================================
Email:    Bueckmann.W@T-Online.de
Homepage: Http://home.t-online.de/home/bueckmann.w/homewb.htm


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:00 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10O83Z-00NWQrC>; Fri, 19 Mar 1999 23:47:57 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA18543; Fri, 19 Mar 1999 23:32:43 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F2E167.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 19 Mar 1999 23:35:02 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36F2793D.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] shortcuts
X-UIDL: 49d78a7f54aefe99743ebb9ecb2b486d
Status: RO

> Can somebody tell me more about the meaning of these shortcuts ??
>
> Does it mean that your file is only once on the Disk but you have two refers
> in two folders to it ?
The file is usually only once of a drive, but there may be multiple references
to it - that is the usual sense behind a link.

>I don't thing "scandisk" would like this very mutch !!
Scandisc has no problems with links. At all, a link is nothing else then a
special type of file which has to be parsed to find the corresponding
application. The link-file contains information about the icon to display, a
reference-counter, the application the link points to and so on. You can compare
it with a pif-file for MS-DOS-programs. A pif-file is nothing else than a link,
but allows special conditions like type of memory and type of window. You can
have as many copies of the same pif-file on your harddisk as you wish.

Bye, Joe




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:06 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OIDT-00NUg6C>; Sat, 20 Mar 1999 10:38:51 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA19200; Sat, 20 Mar 1999 10:10:36 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F376C4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990320090900.JFWE9925@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sat, 20 Mar 1999 09:09:00 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 20 Mar 1999 09:09:00 +0000
Subject: [GFA] ownsub.dll
X-UIDL: 8440e582deb221a8e52b71d538d90532
Status: RO

Ulrich Becker's ownsub.dll is something else!

The toolbar buttons it produces:
 0 cut
 1 copy
 2 paste
 3 previous or undo
 4 next or repeat
 5 exit
 6 new
 7 open
 8 save
 9 print preview or magnify (enlarge)
10 finger pointing to document... edit?
11 what is (help)
12 search or find
13 large blank page?
14 print
15 same as 13
16 from here on, all blank buttons

$4000 always on top
There *may* be more of these.

Has anybody managed to make contact with him?
<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:10 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OR5s-00NWKcC>; Sat, 20 Mar 1999 20:07:36 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA19824; Sat, 20 Mar 1999 19:52:54 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F3FF42.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 20 Mar 1999 19:51:04 +0100
In-Reply-To: <36F376C4.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] ownsub.dll
X-UIDL: e6d7a8efeed831e1d7265f9969fd41bb
Status: RO

Hi!

Today I downloaded the OwnSub.DDL. It's a fine piece of software, but
sometimes Windows 98 crashes after exiting the interpreter or a compiled
program. First the Explorer shows one or more error messages and then a
message box like this shows up:

  Fehler

  U.Becker Program Error  049

I noticed this behavior even when I declare the DLL, but not use any
function of it.

Any Ideas? What is Error 049?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:11 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10ORLH-00NWKnC>; Sat, 20 Mar 1999 20:23:31 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA19857; Sat, 20 Mar 1999 20:09:27 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F40302.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 20 Mar 1999 20:09:48 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] ownsub.dll

X-UIDL: cf924ad92096189d3ea1ca2a290bd508
Status: RO

Hi,

Error 049 = " Window not open/Fenster nicht geffnet"

GFA Basic send this error mesage, if If you want to draw
somethink in a not opend window.

Eberhard.

Samstag, 20. Mrz 1999 19:54
Betreff: Re: [GFA] ownsub.dll


>Hi!
>
>Today I downloaded the OwnSub.DDL. It's a fine piece of software, but
>sometimes Windows 98 crashes after exiting the interpreter or a compiled
>program. First the Explorer shows one or more error messages and then a
>message box like this shows up:
>
>  Fehler
>
>  U.Becker Program Error  049
>
>I noticed this behavior even when I declare the DLL, but not use any
>function of it.
>
>Any Ideas? What is Error 049?
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:11 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OUOG-00NWMAC>; Sat, 20 Mar 1999 23:38:48 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA20097; Sat, 20 Mar 1999 23:23:48 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F43092.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 20 Mar 1999 23:25:26 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36F376C4.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] ownsub.dll
X-UIDL: 471f6f3d39e8a1f87555bc4f815ff2eb
Status: RO

> 10 finger pointing to document... edit?
"Properties", not "edit".

Bye Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:12 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OWDS-00NWMnC>; Sun, 21 Mar 1999 01:35:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA20214; Sun, 21 Mar 1999 01:22:10 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F44C53.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 21 Mar 1999 01:24:00 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36F3FF42.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] ownsub.dll
X-UIDL: 69c1ea6653028f3fc76f835b729b082b
Status: RO

>   U.Becker Program Error  049
Means that a program names "U.Becker Program" raises Error 049 (Window not open)
(but still wants to draw into a window because there are (mostly
WM_PAINT-)messages that have not been handled.
I believe the reason is that you do not "shutdown" the DLL correctly before
closing your window.

Bye, Joe



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:12 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OWJk-00NWMYC>; Sun, 21 Mar 1999 01:42:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id BAA20230; Sun, 21 Mar 1999 01:27:48 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F44D9A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990321002553.CHRD15434@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 21 Mar 1999 00:25:53 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 21 Mar 1999 00:25:53 +0000
Subject: RE: [GFA] ownsub.dll
X-UIDL: 06f4290c481c4274de400ea2860b7db4
Status: RO

Don Giuseppi...
Thank you.  I have seen it somewhere, but couldn't remember where.

The large blank page... have an idea what *that* one is?  There's
no way to alter any of this & I have no idea if there's a way to
get it to use external *.bmps.  There's insufficient documentation 
on this marvelous *.dll, leaving it to chance & experimentation to
uncover what it can & cannot do.

I find no e-mail adrs for Mr. Becker & he appears to not respond to
snail mail sent from the U.S.

Frankly, I'd like to see the source for it - I *think* I'd like to
add a few features to it to reduce the number of *.dlls I might have
to send out with something.

Thanks for responding.
<G>
TomR.


At 11:25 PM 20/03/99 +0100, you wrote:
>> 10 finger pointing to document... edit?
>"Properties", not "edit".
>
>Bye Joe
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:13 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OaNW-00NWUaC>; Sun, 21 Mar 1999 06:02:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id FAA20430; Sun, 21 Mar 1999 05:08:36 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F48166.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 21 Mar 1999 05:10:25 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36F44D9A.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] ownsub.dll
X-UIDL: de344e14c8b8081166926a2530ed3592
Status: RO

Don Tiramisu,

> The large blank page... have an idea what *that* one is?
New :-)
To be honest: I cannot imagine what you mean this time, at all, I have not seen
the DLL :-) (or one of its results)

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:13 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OeqX-00NWVeC>; Sun, 21 Mar 1999 10:48:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA20746; Sun, 21 Mar 1999 10:35:21 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F4CDFB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 21 Mar 1999 04:31:05 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: RE: [GFA] ownsub.dll
X-UIDL: 3eac0a85e93f95ca84e46ca8c8ebc19b
Status: RO

Tom,

>There's insufficient documentation on this marvelous *.dll<

Eberhard has done a very good example, perhaps he'll send you it.
Eberhard's allows the adding and subtraction of buttons at run time.

Very fine example.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:14 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Ohdj-00NWWqC>; Sun, 21 Mar 1999 13:47:39 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA21063; Sun, 21 Mar 1999 13:34:09 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F4F7DB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 21 Mar 1999 11:19:51 +0100
In-Reply-To: <36F44C53.BeroList-2.5.9@aachen.linux.de>
References: <36F3FF42.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: RE: [GFA] ownsub.dll
X-UIDL: e993c49063407e2257367b37936d5624
Status: RO

At 01:24 21.03.99 +0100, Joe Hurst wrote:

>Means that a program names "U.Becker Program" raises Error 049 (Window not
open)
>(but still wants to draw into a window because there are (mostly
>WM_PAINT-)messages that have not been handled.
>I believe the reason is that you do not "shutdown" the DLL correctly before
>closing your window.

Now I discovered the problem: I already declared another dll als DLL #1. So
I changed the number and everything works fine!


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:14 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Ohdu-00NWWsC>; Sun, 21 Mar 1999 13:47:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA21065; Sun, 21 Mar 1999 13:34:10 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F4F7DB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 21 Mar 1999 11:35:41 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] ownsub.dll: Tooltip problem
X-UIDL: 8dfbd96bd1856ef40a4b921516194b23
Status: RO

Hi!

When I set a window to stay always on top the tooltips for the toolbar are
hidden by the window.

I am using the following code:

  ~SetWindowPos(DLG(10),-1,0,0,0,0,SWP_NOMOVE | SWP_NOSIZE) // Always on top

Is there a workaround?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:16 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OlBy-00NWZuC>; Sun, 21 Mar 1999 17:35:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA21338; Sun, 21 Mar 1999 17:19:26 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F52CB3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 21 Mar 1999 11:17:03 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] ownsub.dll: Tooltip problem
X-UIDL: 42c73a88f5ed2774e5827ae4dfb6016a
Status: RO

> ~SetWindowPos(DLG(10),-1,0,0,0,0,SWP_NOMOVE | SWP_NOSIZE) // Always on
top

Is there a workaround?
<

Do you really need the DLG to be always on top?

Is it because the DLG goes behind a GFA window? If it is, there are other
ways.


Anyway;

I assume the tooltip window is created by the dll and you don't have the
code; if that's so I can't see how you can effect it.

John 

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:17 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OlJc-00NWalC>; Sun, 21 Mar 1999 17:43:08 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA21360; Sun, 21 Mar 1999 17:30:04 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F52F14.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 21 Mar 1999 15:38:29 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] ownsub.dll: combobox?
X-UIDL: 07e4cad28b7182a1769ef36f805e4859
Status: RO

Hi!

I am using a toolbar with a combobox. I don't get any messages from the
combobox control, but I get messages from a toolbar button. I am using a
code like this:

  SELECT _Mess
  CASE WM_COMMAND
    ID& = _wParam
    SELECT ID&
    CASE 100     <--- ID of zthe combobox
      ALERT 1,"combobox",1,"OK",dummy
    CASE 101     <--- ID of a toolbox button
      ALERT 1,"toolbar button",1,"OK",dummy
    ...
    ENDSELECT
  ...
  ENDSELECT  

Ho do I get messages from the combobox?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:17 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OmBb-00NWb7C>; Sun, 21 Mar 1999 18:38:55 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA21442; Sun, 21 Mar 1999 18:24:26 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F53BE2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sun, 21 Mar 1999 18:23:58 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] ownsub.dll: combobox?

X-UIDL: 4778cc8f00dea4798392e03c1ea1430d
Status: RO

Hi Michael,

Somewhere in the source cose of this dll it fails the
the function ~SetParent (hwndCombo, HwndToolBar).

If this fails, you can't receive no messages from
the combobox. If in the dll creates a combobox only with
a GFA Basic control, it doesn't work. Also if it will be create
with CreateWindow ("Combobox"...., hwndToolbar,...)
it doesn't work. You must set the Parent definition.

Eberhard


You wrote at Sonntag, 21. Mrz 1999 17:29
Betreff: [GFA] ownsub.dll: combobox?


>Hi!
>
>I am using a toolbar with a combobox. I don't get any messages from the
>combobox control, but I get messages from a toolbar button. I am using a
>code like this:
>
>  SELECT _Mess
>  CASE WM_COMMAND
>    ID& = _wParam
>    SELECT ID&
>    CASE 100     <--- ID of zthe combobox
>      ALERT 1,"combobox",1,"OK",dummy
>    CASE 101     <--- ID of a toolbox button
>      ALERT 1,"toolbar button",1,"OK",dummy
>    ...
>    ENDSELECT
>  ...
>  ENDSELECT
>
>Ho do I get messages from the combobox?
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:19 1999
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OpjR-00NWi0C>; Sun, 21 Mar 1999 22:26:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA21763; Sun, 21 Mar 1999 22:12:49 +0100
From: Reuben <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F57156.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 08:05:59 +1000
Organization: RMC
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
References: <36F44C53.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] ownsub.dll
X-UIDL: 84811cb4c5bda58afa31a3c94abf34f3
Status: RO

Hmmm..


Could also be that the DLL tries to close a window that has not been previously
opened!

Reuben Carlsen
Sydney Oz'

Joe Hurst wrote:

> >   U.Becker Program Error  049
> Means that a program names "U.Becker Program" raises Error 049 (Window not open)
> (but still wants to draw into a window because there are (mostly
> WM_PAINT-)messages that have not been handled.
> I believe the reason is that you do not "shutdown" the DLL correctly before
> closing your window.
>
> Bye, Joe
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org



--
==========================================================================
                       Success is getting what you want
                      Happiness is wanting what you get
==========================================================================



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:19 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OpVc-00NWhvC>; Sun, 21 Mar 1999 22:11:48 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA21729; Sun, 21 Mar 1999 21:52:58 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F56D15.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sun, 21 Mar 1999 12:48:27 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] address
X-UIDL: 42c14b78ece8b1140f4acc27759a029a
Status: RO

Does anyone have an email address for Ulrich Becker? If so, please send it
to me.
Dale Bryant


http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:21 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Oq3i-00NWMhC>; Sun, 21 Mar 1999 22:47:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA21820; Sun, 21 Mar 1999 22:33:38 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F57637.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 21 Mar 1999 21:38:55 +0100
In-Reply-To: <36F52CB3.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] ownsub.dll: Tooltip problem
X-UIDL: 6c150f99a0831d6c0f6193d3c9d9469c
Status: RO

At 11:17 21.03.99 -0500, John Findlay wrote:

>Do you really need the DLG to be always on top?

This is a feature in my program. 

>Is it because the DLG goes behind a GFA window? If it is, there are other
>ways.

No. The Dialog is the main window. It contains the menubat, some controls,
and now the toolbar.


M!chael



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:21 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Oq3j-00NWhvC>; Sun, 21 Mar 1999 22:47:03 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA21823; Sun, 21 Mar 1999 22:33:41 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F5763B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 21 Mar 1999 21:38:55 +0100
In-Reply-To: <36F52CB3.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] ownsub.dll: Tooltip problem
X-UIDL: bc3a5640d21c15d97806a8743ca5bd02
Status: RO

At 11:17 21.03.99 -0500, John Findlay wrote:

>Do you really need the DLG to be always on top?

This is a feature in my program. 

>Is it because the DLG goes behind a GFA window? If it is, there are other
>ways.

No. The Dialog is the main window. It contains the menubat, some controls,
and now the toolbar.


M!chael



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:22 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Oq4P-00NWWVC>; Sun, 21 Mar 1999 22:47:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA21819; Sun, 21 Mar 1999 22:33:37 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F57636.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sun, 21 Mar 1999 22:31:12 +0100
In-Reply-To: <36F53BE2.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] ownsub.dll: combobox?
X-UIDL: d9f30f9e499cc08b4ab18ff3f750edd4
Status: RO

At 18:23 21.03.99 +0100, Eberhard Funck wrote:

>Somewhere in the source cose of this dll it fails the
>the function ~SetParent (hwndCombo, HwndToolBar).

I don't get it. Has somebody managed to get the number of the selected
combo box item? I would be thankful for a source code example...

M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:23 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OrWq-00NWi8C>; Mon, 22 Mar 1999 00:21:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA21992; Mon, 22 Mar 1999 00:07:27 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F58C37.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990321230527.BKEQ11356@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 21 Mar 1999 23:05:27 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 21 Mar 1999 23:05:27 +0000
Subject: Re: [GFA] ownsub.dll
X-UIDL: 74f5cad5e275ef106ed3308ef0a28a61
Status: RO

I feel left out.  I use it quite a bit but have never had an error
reach up & bite me.  My biggest problem with it is not knowing what
it is actually capable of (or not).  Some of it is undocumented.
<G>
TomR.



At 08:05 AM 22/03/99 +1000, you wrote:
>Hmmm..
>
>
>Could also be that the DLL tries to close a window that has not been previously
>opened!
>
>Reuben Carlsen
>Sydney Oz'
>
>Joe Hurst wrote:
>
>> >   U.Becker Program Error  049
>> Means that a program names "U.Becker Program" raises Error 049 (Window
not open)
>> (but still wants to draw into a window because there are (mostly
>> WM_PAINT-)messages that have not been handled.
>> I believe the reason is that you do not "shutdown" the DLL correctly before
>> closing your window.
>>
>> Bye, Joe
>>
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:23 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OrX5-00NWliC>; Mon, 22 Mar 1999 00:21:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA21994; Mon, 22 Mar 1999 00:07:31 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F58C37.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990321230532.BKFL11356@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Sun, 21 Mar 1999 23:05:32 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 21 Mar 1999 23:05:32 +0000
Subject: Re: [GFA] ownsub.dll: Tooltip problem
X-UIDL: d734c62610709c7196e75adefc317e62
Status: RO

Somehow, I *think* you'll find that an "always on top" window won't
be able to display tooltips.  You can't put anything on top of an 
"on top", as far as I understand things.
<G>
TomR.



At 09:38 PM 21/03/99 +0100, you wrote:
>At 11:17 21.03.99 -0500, John Findlay wrote:
>
>>Do you really need the DLG to be always on top?
>
>This is a feature in my program. 
>
>>Is it because the DLG goes behind a GFA window? If it is, there are other
>>ways.
>
>No. The Dialog is the main window. It contains the menubat, some controls,
>and now the toolbar.
>
>
>M!chael
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:24 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10OzK7-00NWoMC>; Mon, 22 Mar 1999 08:40:35 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA22451; Mon, 22 Mar 1999 08:26:30 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F6013C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 08:27:58 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
In-Reply-To: <36F48166.BeroList-2.5.9@aachen.linux.de>
Subject: RE: [GFA] ownsub.dll
X-UIDL: 5f98d4d7e2cc2384b2bb76149843afb6
Status: RO

Don TingelTangel,
the 2 big empty buttons ("large blank page") are bitmap-errors, I think (neither
the author of OwnSub used Icons or Bitmaps with unmasked background or he forgot
to implement the pictures - at all, they are not in).
I tried to take a look via Microangelo, but MA says that there are no resources
at all in the DLL. Therefor I believe the author didn't use a real resource-file
which was linked to the DLL: he uses compressed string-tables and internally
makes use of the LZExpand-Function which is available in the DLL, too. And if
that LZExpand is the same function which is available as GFA-Source, well, we
all know that it contains errors - and that will be the reason for the 2 defect
bitmaps.

Bye, Joe



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:30 1999
Return-Path: <CompuHelp@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P62v-00NWxeC>; Mon, 22 Mar 1999 15:51:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA22833; Mon, 22 Mar 1999 15:33:21 +0100
From: CompuHelp@t-online.de (CompuHelp@T-Online.de)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F6658A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 22 Mar 1999 14:49:53 +0100
X-Mailer: T-Online eMail 2.0
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 0675893545-0001@t-online.de
Subject: [GFA] DLG 3D

X-UIDL: a796c0ce277c3cb55377a359460f5dd8
Status: RO

Hi all!

In my Program I use DLG 3D ON and OFF.

In the Interpreter it works fine...
But when I make an EXE-File and start it,
a Dialog-Box appears and says "RUN-ONLY".
Here I can choose an .GFW File and the
Interpreter is starting.

When I dont use DLG 3D ON the EXE File
runs fine, too.

Can someone Help me, please !

CU, Ren


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:31 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P6E0-00NWwzC>; Mon, 22 Mar 1999 16:02:44 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA22843; Mon, 22 Mar 1999 15:44:07 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F667AC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990322144135.CKEW22704@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 22 Mar 1999 14:41:35 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 22 Mar 1999 14:41:35 +0000
Subject: RE: [GFA] ownsub.dll
X-UIDL: 4958c795a7950b6e9c0688280a9c72ca
Status: RO

Sir Joseph of Hurst
The bitmaps are in Win95, not the program.  There are 20 or 30 of them.
Would you like a copy of MS's LZE?
<G>
TomR.


At 08:27 AM 22/03/99 +0100, you wrote:
>Don TingelTangel,
>the 2 big empty buttons ("large blank page") are bitmap-errors, I think
(neither
>the author of OwnSub used Icons or Bitmaps with unmasked background or he
forgot
>to implement the pictures - at all, they are not in).
>I tried to take a look via Microangelo, but MA says that there are no resources
>at all in the DLL. Therefor I believe the author didn't use a real
resource-file
>which was linked to the DLL: he uses compressed string-tables and internally
>makes use of the LZExpand-Function which is available in the DLL, too. And if
>that LZExpand is the same function which is available as GFA-Source, well, we
>all know that it contains errors - and that will be the reason for the 2 defect
>bitmaps.
>
>Bye, Joe
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:31 1999
Return-Path: <Familie.Hopf@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P7bO-00NWxZC>; Mon, 22 Mar 1999 17:30:58 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA22988; Mon, 22 Mar 1999 17:13:14 +0100
From: Familie.Hopf@t-online.de (Thomas Hopf)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F67CA0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 16:49:00 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Sender: 320063944464-0001@t-online.de
Subject: [GFA] Win-Gfa

X-UIDL: 5eeafd0e569c4b6344dd8ef232b70ec4
Status: RO

Ich suche dringend das einfache Programm: Win Gfa
Ich benutze dieses in der Schule im Unterricht, doch ich msste es auch zuhause 
benutzen.
Knnten sie mir bitte mailen, wo ich dieses Programm erwerben kann.
Es ist sehr dringend.
Im Moment benutze ich qbasic, doch die Befehle , die ich in der Schule in WINGFA
schreibe funktionieren nicht auf qbasic.

Ich bitte um Antwort.


--------------------------------------------
E-Mail : kangoo-1@hier-ist.de


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:32 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P7h6-00NX0bC>; Mon, 22 Mar 1999 17:36:52 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA23004; Mon, 22 Mar 1999 17:21:24 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F67E7F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 08:16:30 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Win-Gfa
X-UIDL: 8a65a1d431f459059ced8019d8ce3871
Status: RO

I look for the simple program desperately: Win Gfa
I use this in the school in the instruction, however I would also have to it
at home
uses.
They please could me mailen, where I can acquire this program.
It is very urgent.
At the moment I use qbasic, however the commands, that I in the school in
WINGFA
write doesn't work on qbasic.

I ask for answer
----- Original Message -----
From: Thomas Hopf <Familie.Hopf@t-online.de>
To: <gfabasic@aachen.linux.de>
Sent: Monday, March 22, 1999 7:49 AM
Subject: [GFA] Win-Gfa


>Ich suche dringend das einfache Programm: Win Gfa
>Ich benutze dieses in der Schule im Unterricht, doch ich msste es auch
zuhause
>benutzen.
>Knnten sie mir bitte mailen, wo ich dieses Programm erwerben kann.
>Es ist sehr dringend.
>Im Moment benutze ich qbasic, doch die Befehle , die ich in der Schule in
WINGFA
>schreibe funktionieren nicht auf qbasic.
>
>Ich bitte um Antwort.
>
>
>--------------------------------------------
>E-Mail : kangoo-1@hier-ist.de
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:32 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P8vK-00NX1nC>; Mon, 22 Mar 1999 18:55:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA23150; Mon, 22 Mar 1999 18:40:41 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F69116.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 12:37:59 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] DLG 3D
X-UIDL: 740edc9b5a7f24575c20f3ec0a12eb9e
Status: RO

A point of interest;

To get the 3D look for dialogs you only need to add '4' into the
style parameter; DS_3DLOOK = 4. This works for win95/98 only I suspect.

DIALOG #1, 10, 10, 300, 180, "Unctions", DS_MODALFRAME | WS_CAPTION |
WS_OVERLAPPED | WS_SYSMENU | WS_MINIMIZEBOX | 4

John 


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:32 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P9aA-00NX2WC>; Mon, 22 Mar 1999 19:37:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA23196; Mon, 22 Mar 1999 19:23:53 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F69B2A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 19:25:06 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36F67CA0.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] Win-Gfa

X-UIDL: 24d9896768aec08123f9174f71d1b23b
Status: RO

> Ich suche dringend das einfache Programm: Win Gfa
Wenn damit GFA-Basic fr Windows gemeint ist: Das gibt es bei

GFA Software Technologies GmbH / GFA Software Technologies, Inc.
Volksgartenstrasse 85-89 - 41065 Moenchengladbach
Tel: +49 (0)2161 4 38 66 - Fax: +49 (0)2161 4 38 25
mailto:info@gfa.net - http://www.gfa.net

Eine Bestellung sollte auch telefonisch mglich sein. Frag mal, ob die
CD-ROM-Version von GFABASIC-16-bit bereits erschienen ist, die sollte nach
einigen Vorankndigungen schon im Sommer letzten Jahres erscheinen und recht
billig sein.

> Im Moment benutze ich qbasic, doch die Befehle , die ich in der
> Schule in WINGFA schreibe funktionieren nicht auf qbasic.
Ja, da gibt es schon ein oder zwei drei Unterschiede.

Gre,

 Joe Hurst


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:33 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P9ap-00NX1HC>; Mon, 22 Mar 1999 19:38:31 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA23201; Mon, 22 Mar 1999 19:24:03 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F69B35.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 19:25:04 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36F667AC.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] ownsub.dll
X-UIDL: bf65877dc86a10054babf2c018d1a592
Status: RO

Sir Tiger,

> The bitmaps are in Win95, not the program.
Are you sure that those bitmaps are the original icons of W95?  They look a
little bit strange to me (that doesn't mean anything, I use VB since month and
therefor I have see for a long time only the icons that come with VB).

> Would you like a copy of MS's LZE?
Source? Compress and Uncompress? YES! Send me. (If you have meant only the
16-bit-DLL: I think I have it somewhere.)

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:33 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P9Y1-00NX29C>; Mon, 22 Mar 1999 19:35:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA23186; Mon, 22 Mar 1999 19:21:12 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F69A8C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Mon, 22 Mar 1999 17:59:31 +0100
In-Reply-To: <36F58C37.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Subject: Re: [GFA] ownsub.dll: Tooltip problem
X-UIDL: a16e51e719c078046ed62458cebf3261
Status: RO

At 23:05 21.03.99 +0000, Tom Record wrote:

>Somehow, I *think* you'll find that an "always on top" window won't
>be able to display tooltips.  You can't put anything on top of an 
>"on top", as far as I understand things.

That's right. But it should be able if I use HWND_TOPMOST in SetWindowPos().

>From WinAPI.HLP:
[German]
"ber allen nichtobersten Fenstern. Das Fenster behlt seinen obersten
Status, auch wenn es deaktiviert wird."

[Translated by me]
"Above all not topmost windows. The window keeps its topmost status even
when it gets deaktivated."

I am using this line in my source:

  ~SetWindowPos(DLG(10),-1,0,0,0,0,SWP_NOMOVE | SWP_NOSIZE)
                       
I think -1 is equal to HWND_TOP. But what equals HWND_TOPMOST?

Maybe I am still thinking of something that cannot be realized...


M!chael



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:34 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10P9ne-00NWx1C>; Mon, 22 Mar 1999 19:51:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA23224; Mon, 22 Mar 1999 19:35:31 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F69DE8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990322183310.BSZJ19558@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Mon, 22 Mar 1999 18:33:10 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 22 Mar 1999 18:33:10 +0000
Subject: [GFA] help, please   2203zz1-
X-UIDL: 0d10eeab425690024b75c67fc0b4db69
Status: RO

22/03/99 11:34:37 AM   help, please   2203zz1-

I'm trying to put a combobox in a toolbar without the *.dlls.

I want mine to work in Win31, also... those are Win95-specific.

hWndToolBUtton10& = CreateWindow("button","Keys", st1%, 230,0, 50, 20, 
hWndToolBar&,810, _INSTANCE, 0)

Creates a 50x20 button space that acts like a checkbox if clicked.
Add WS_VSCROLL to the style & it appears to be a spinbutton.


hWndToolBUtton10& = CreateWindow("combobox","Keys", st1%, 230,0, 50, 
20, hWndToolBar&,810, _INSTANCE, 0)

Creates a 50x20 combobox, but even having the style contain dropdown, 
etc., does NOT get one.  I know I'm missing something, please wake me 
up?

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:34 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PAeS-00NNjIC>; Mon, 22 Mar 1999 20:46:20 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA23339; Mon, 22 Mar 1999 20:31:54 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F6AB21.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 20:30:57 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] ownsub.dll

X-UIDL: bdaabae153b9881d83ecfa87b3322d6e
Status: RO

Hi all,
The bitmap are in the resource part of .dll application.
The number is 32767. The mask bitmaps are 32766.
With Borland Workshop you can see these thinks.
Combobox: you can insert it to the toolbar, but the programmer
has forgotten to write a message from combobox to main window.
Nothing in _Mess and _wParam, if you choose an entrie in the combobox.

Eberhard.


Von: Joe Hurst <JoeHurst@snafu.de>
An: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Datum: Montag, 22. Mrz 1999 19:24
Betreff: RE: [GFA] ownsub.dll


>Sir Tiger,
>
>> The bitmaps are in Win95, not the program.
>Are you sure that those bitmaps are the original icons of W95?  They look a
>little bit strange to me (that doesn't mean anything, I use VB since month
and
>therefor I have see for a long time only the icons that come with VB).
>
>> Would you like a copy of MS's LZE?
>Source? Compress and Uncompress? YES! Send me. (If you have meant only the
>16-bit-DLL: I think I have it somewhere.)
>
>Bye, Joe
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:35 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PB7a-00NT2CC>; Mon, 22 Mar 1999 21:16:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA23390; Mon, 22 Mar 1999 20:56:57 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F6B0FE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 20:56:07 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] ownsub.dll: combobox?
X-UIDL: f59ac197e022d9d55cae046b43accff5
Status: RO

Hi all,
To receive somethink from the combobox in toolbar:

REPEAT
  GETEVENT
  index& = SendDlgItemMessage (Win&, 100, CB_GETCURSEL, 0, 0)
  IF index& != -1
    puffer$ = SPACE$(20)
    ~SendDlgItemMessage (Win&, 100, CB_GETLBTEXT, index&, V:puffer$)
    PRINT puffer$
  ENDIF
  SWITCH _Mess
  CASE WM_COMMAND
    SELECT _wParam
    CASE 100  // Don't work, message to the main window forgotten.
      ~MessageBox (WIN(1), "Combobox: " + STR$(_wParam), "Debug", MB_OK)
    CASE 101 TO 108 // this works
      ~MessageBox (WIN(1), "Button: " + STR$(_wParam), "Debug", MB_OK)
    ENDSELECT
  ENDSWITCH
UNTIL MENU(1) = 4

That was the first try and the first result.

Eberhard




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:36 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PDjp-00NT2TC>; Tue, 23 Mar 1999 00:04:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA23569; Mon, 22 Mar 1999 23:50:02 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F6D988.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Mon, 22 Mar 1999 14:44:57 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: [GFA] NEW FILES
X-UIDL: 91a92d6aebcd878f5328d584f94d769f
Status: RO

UPDATE!!
03/22/1999 :2:27 p.m.

Eberhard Funck has sent something really special for all of us to share. A
program
written in GFA that scans an image from your scanner.  It works great and I
have
the scanned image to prove it. You don't want to miss this one. Not many
programmer
would share this type of code.
GRAB IT! Be sure and send Eberhard an appreciation email message.

http://gfa.net/adbryant/files.htm



http://gfa.net/adbryant
http://gfawhelp.gfa.net/adbryant





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:37 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PDXW-00NSqtC>; Mon, 22 Mar 1999 23:51:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id XAA23554; Mon, 22 Mar 1999 23:37:37 +0100
From: "Joe Hurst" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F6D6B1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Mon, 22 Mar 1999 23:38:49 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
In-Reply-To: <36F6AB21.BeroList-2.5.9@aachen.linux.de>
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] ownsub.dll

X-UIDL: 40a971ddd4a8e8602d3ff92f194f6420
Status: RO

Sir Thomas of Chewinggumcountry, Monsieur Eberhard,

> The bitmap are in the resource part of .dll application.
> The number is 32767. The mask bitmaps are 32766.
> With Borland Workshop you can see these thinks.
I hate that! Really, I do. I paid for the shit full-relase of M*cr**ng*l* and it
has such problems, and that old f******g Resource Workshop by Borland works???

Eberhard:
Wenn ich bei einer Sache fuchsig werde, dann ist das die Situation in der andere
Leute mehr rausfinden als ich :-))
Im Ernst: Wie sieht es mit den Bitmaps aus? Sind die beiden wirklich leer bzw.
unmaskiert?

Gre, Joe




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:37 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PIFG-00NQZNC>; Tue, 23 Mar 1999 04:52:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id EAA23796; Tue, 23 Mar 1999 04:37:02 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F71CE0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323033423.FAW27477@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 03:34:23 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net (Unverified)
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Tue, 23 Mar 1999 03:34:23 +0000
Subject: RE: [GFA] ownsub.dll
X-UIDL: eda84af9ec64204860ddb6bbbbdb4b6e
Status: RO

At 11:38 PM 22/03/99 +0100, you wrote:
>Sir Thomas of Chewinggumcountry, Monsieur Eberhard,
>
>> The bitmap are in the resource part of .dll application.
>> The number is 32767. The mask bitmaps are 32766.
>> With Borland Workshop you can see these thinks.
>I hate that! Really, I do. I paid for the shit full-relase of M*cr**ng*l*
and it
>has such problems, and that old f******g Resource Workshop by Borland works???
>
>Eberhard:
>Wenn ich bei einer Sache fuchsig werde, dann ist das die Situation in der
andere
>Leute mehr rausfinden als ich :-))
>Im Ernst: Wie sieht es mit den Bitmaps aus? Sind die beiden wirklich leer bzw.
>unmaskiert?
>
>Gre, Joe
>
>
No blinkin fair!
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:38 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PJza-00NQZQC>; Tue, 23 Mar 1999 06:44:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id GAA23838; Tue, 23 Mar 1999 06:28:12 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F736E4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323052545.DGVW346@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 05:25:45 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 23 Mar 1999 05:25:45 +0000
Subject: [GFA] ownsub.dll   2203xx2-
X-UIDL: e08be8d314615f25bb23207d11e649b2
Status: RO

22/03/99 11:06:03 PM   ownsub.dll   2203xx2-

Ok...
the *.dll contains:
bitmap 32766, 20 1-bit figures, 13 figures, 7 blanks.
bitmat 32767, 63 4-bit figures, not 1 is blank but 33 are not there.
versioninfo 1, understand nearly all but that string of numbers in 
the company name.

I can provide images of the two bitmaps if anyone wants to see'em.

There are no string tables or menus... the above is all the *.dll 
contains according to Borland Resource Workshop, so how to explain 
inability to draw info from a combobox that isn't even depicted?  
There has to be more than what I'm seeing.

Perhaps there is a package of code I can't see?  How to ammend this?
I *can* strip all but text & see if it's built there.  If so, how
can we add the necessary commands to it without the source code?

Next question:  What manner of save serves to save the verinfo.res?  I 
can see the data being assembled in a dialog, but how to save it?  
Simply write a file versinfo.res to be $INCLUDEed in the compile?

Note to John:
Running the new exp on a GFA-W *.dll bombs on the versioninfo, so I
added a TRY/CATCH & print out that the info isn't available or can't
be obtained.  This holds true on GFA-W mostly... many others w/o any
versinfo get by w/o the TRY/CATCH.  I'll leave it in for safety.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:38 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PKN4-00NPdtC>; Tue, 23 Mar 1999 07:09:02 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id GAA23861; Tue, 23 Mar 1999 06:55:41 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F73D45.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323055313.CLHU27477@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 05:53:13 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 23 Mar 1999 05:53:13 +0000
Subject: [GFA] ownsub.dll - more yet
X-UIDL: c3ec99867a3fa6558de5595414e9ae79
Status: RO

read out by exp1i.lst.

Imported non-resident functions of OWNSUB.DLL:
OwnSub V-1.0a	0

Exported resident functions of OWNSUB.DLL:
ADDTOOLBUTTON	1
ADDTOOLCOMBOBOX	2
ADDTOOLSPACE	3
CHANGETOOLBUTTON	4
COPYBITMAPMASK	6
CREATETOOLWINDOW	5
DRAWGRAYBITMAP	7
FILLBOX	8
FILLRECTBOX	9
FRAMEBUTTON	10
G$$DS	31
GETBITMAPDIM	11
GETSYSCOLORBRUSH	12
GETSYSTEMLANGUAGE	13
GETTOOLTIPTEXT	14
GETTOOLTIPTEXTLENGTH	15
INFOBOX	16
INFOBOXEX	17
ISPOINTER	18
ISTOOLWINDOW	19
LOADBITMAPEX	20
LZDECODE	21
LZENCODE	22
OwnSub	0
SETCOMBOLBOXSELECT	23
SETTOOLBUTTONSTYLE	24
SETTOOLTIPEND	25
SETTOOLTIPSTART	26
SETTOOLTIPTEXT	27
SUBMESSAGEBOX	28
SUBMESSAGEBOXEX	29
WEP	30

Version info for OWNSUB.DLL:
Version info is missing or unobtainable


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:39 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PKNB-00NQXyC>; Tue, 23 Mar 1999 07:09:09 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id GAA23858; Tue, 23 Mar 1999 06:55:36 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F73D40.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323055309.CLHF27477@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 05:53:09 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 23 Mar 1999 05:53:09 +0000
Subject: [GFA] ownsub.dll - more
X-UIDL: 115f874c4e33dd66b95e94f015c7940d
Status: RO

Not a DOS Program$
OwnSub
CHANGETOOLBUTTON
CREATETOOLWINDOW
COPYBITMAPMASK
DRAWGRAYBITMAP
FILLBOX
FILLRECTBOX
FRAMEBUTTON
GETBITMAPDIM
GETSYSCOLORBRUSH
GETSYSTEMLANGUAGE
GETTOOLTIPTEXT
GETTOOLTIPTEXTLENGTH
INFOBOX
INFOBOXEX
ISPOINTER
ISTOOLWINDOW
LOADBITMAPEX
LZDECODE
LZENCODE
SETCOMBOLBOXSELECT
SETTOOLBUTTONSTYLE
SETTOOLTIPEND
SETTOOLTIPSTART
SETTOOLTIPTEXT
SUBMESSAGEBOX
SUBMESSAGEBOXEX
USER
GETFREESYSTEMRESOURCES
COPYICON
UNHOOKWINDOWSHOOKEX
CALLNEXTHOOKEX
SETWINDOWSHOOKEX
GDI
KERNEL
TOOLHELP
WIN87EM
OwnSub V-1.0a
OwnSubTool
OwnSubWin
ComboBox
ComboLBox
Fehler
A&bbrechen
Inf&o
Info 
Arbeitsspeicher:
Systemressourcen:
Error
About 
Physical Memory:
System Resources:
sLanguage
MS Sans Serif
POwnSubButton
OwnSubTool
OwnSubWin
WM_GETWINDOWTIP
WM_GETWINDOWTIPLEN
WM_SETWINDOWTIP
Need 386 or better
MDICLIENT
Static
Button
VS_VERSION_INFO
StringFileInfo
ProductName
OwnSub
InternalName
OwnSub
OriginalFilename
OwnSub.dll
FileVersion
ProductVersion
LegalCopyright
Copyright 
 by Ulrich Becker 1997
CompanyName
Ulrich Becker, Nordendstra
e 73 - 75, D - 63225 Langen


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:39 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PMA6-00NQXxC>; Tue, 23 Mar 1999 09:03:46 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA24017; Tue, 23 Mar 1999 08:50:49 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F75849.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 02:46:51 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Comment/Suggestion
X-UIDL: b8c2ca9808583cd1a2c0fbaab98c7c8b
Status: RO

Hello,

Comment;

The article written by the 'anonymous one' yesterday in Dales news letter
was very good, please don't just read it once; digest it!

Suggestion;

If someone could provide a site where we could upload/download 'freeware'
utilities it would be a great asset for GFA programmers. (Dale??)  I have a
few MS freebies that others might find useful.

For example I have a programme that views .exe/.dll/.fon files.

It lists segments/resources/headers/imported names/exported names etc. You
can view resources of an exe or dll; dialogs/bitmaps/icons/ordinal numbers
of exported functions etc.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:40 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PMeg-00NQZNC>; Tue, 23 Mar 1999 09:35:22 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA24067; Tue, 23 Mar 1999 09:22:40 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F75FB6.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 03:19:31 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] ownsub.dll   22
X-UIDL: ba973e78b0a06bf40897bca71e590070
Status: RO

Note to Tom:

>Next question:  What manner of save serves to save the verinfo.res?
I can see the data being assembled in a dialog, but how to save it?  
Simply write a file versinfo.res to be $INCLUDEed in the compile?<

If I understand your question; it needs to be added to a res file before a
GFA compile. You can make a res of just the versioninfo, but that seems
pointless.  

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:40 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PMf6-00NQXxC>; Tue, 23 Mar 1999 09:35:48 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA24063; Tue, 23 Mar 1999 09:22:09 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F75F9A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 03:19:28 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] ownsub.dll 2
X-UIDL: 28625867e4b1d7764915b71fc8638966
Status: RO

Note to Tom:

>Perhaps there is a package of code I can't see?  How to ammend this?
I *can* strip all but text & see if it's built there.  If so, how
can we add the necessary commands to it without the source code?<

The dll contains code. You can't ammend it. No adding of commands. :-)

It's a pity that he didn't include the code; the dll is not really usable
in its present state.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:41 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PMg8-00NNjRC>; Tue, 23 Mar 1999 09:36:52 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA24078; Tue, 23 Mar 1999 09:23:20 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F75FDE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 03:19:33 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] ownsub.dll   2203
X-UIDL: c7db87ff48cae27f585739f60817fe79
Status: RO


>Note to John:
Running the new exp on a GFA-W *.dll bombs on the versioninfo, so I
added a TRY/CATCH & print out that the info isn't available or can't
be obtained.  This holds true on GFA-W mostly... many others w/o any
versinfo get by w/o the TRY/CATCH.  I'll leave it in for safety.<

What can I say?

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:41 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PNEE-00NNjRC>; Tue, 23 Mar 1999 10:12:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA24146; Tue, 23 Mar 1999 09:52:44 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F766D0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 03:49:50 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] ImageEd
X-UIDL: ca98a1f552a0c815a25cf3292b0a562c
Status: RO

Just downloaded Eberhard's ImageEd.zip, it's Excellent!

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:42 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10POHM-00NST9C>; Tue, 23 Mar 1999 11:19:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA24217; Tue, 23 Mar 1999 11:04:27 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F777A4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323100150.EKGY346@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 10:01:50 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 23 Mar 1999 10:01:50 +0000
Subject: Re: [GFA] ownsub.dll 2
X-UIDL: 0e76f081446068bc27fbc62ea924bc9f
Status: RO

party pooper - blew my last hope!  He has a versinfo.res in it & I've
tried to duplicat it but can't even get it to save a file.  I'm goin
nuts over this crap!

Mebbeso someone *in* Germany will give in & try to call him or write
him & request that he post the source.  I've looked at the *.bmps in it
& there are a ton in the colored one.  I'm finding out what they're
called so I can maybe get'em on the bar.  So far, have a bunch of them
but it doesn't always follow any pattern.  This just confuses me all
the more.

Oh... he hasn't responded to a letter I sent from the U.S.

<G>
TomR.


At 03:19 AM 23/03/99 -0500, you wrote:
>Note to Tom:
>
>>Perhaps there is a package of code I can't see?  How to ammend this?
>I *can* strip all but text & see if it's built there.  If so, how
>can we add the necessary commands to it without the source code?<
>
>The dll contains code. You can't ammend it. No adding of commands. :-)
>
>It's a pity that he didn't include the code; the dll is not really usable
>in its present state.
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:42 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10POHl-00NSoqC>; Tue, 23 Mar 1999 11:19:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA24220; Tue, 23 Mar 1999 11:04:47 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F777A4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323100157.EKHJ346@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 10:01:57 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 23 Mar 1999 10:01:57 +0000
Subject: Re: [GFA] ownsub.dll   22
X-UIDL: d6e7e866a8300c33a7e7d9b9f1205acf
Status: RO

Well... I was trying to find an easy way to come up with it.  The one
example I have (U.B.'s) bombs the routine I've come up with to read
the data from a *.dll.  It bombs on that portion of every GFA-W 
compiled *.exe or *.dll.  His is the only one in GFA-W I've seen 
that has it.  I can get it by stripping out text, but not by specific
calls.

It's my understanding that I can link a 2nd *.res to a compile, but
if I can't get it "on hand", I'm facing a strong wind anyway.  Not
everybody is going to have a resource compiler to play with.
<G>
TomR.



At 03:19 AM 23/03/99 -0500, you wrote:
>Note to Tom:
>
>>Next question:  What manner of save serves to save the verinfo.res?
>I can see the data being assembled in a dialog, but how to save it?  
>Simply write a file versinfo.res to be $INCLUDEed in the compile?<
>
>If I understand your question; it needs to be added to a res file before a
>GFA compile. You can make a res of just the versioninfo, but that seems
>pointless.  
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:43 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10POJJ-00NST9C>; Tue, 23 Mar 1999 11:21:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA24215; Tue, 23 Mar 1999 11:04:17 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7779F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323100138.EKGO346@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 10:01:38 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 23 Mar 1999 10:01:38 +0000
Subject: Re: [GFA] Comment/Suggestion
X-UIDL: 14956a2be1ab5e1d3524dae72f49c816
Status: RO

John
I've been jumped on, but...
webjump.com provides 25M for free.  The cost is losing the top inch
or so to their banner.  I & several friends have sites there.  You
might visit mine to look:
TiGeR1.webjump.com
I have the Win31SDK helpfile there now.

I've not seen any commercials at all outside the webjump banner.
<G>
TomR.



At 02:46 AM 23/03/99 -0500, you wrote:
>Hello,
>
>Comment;
>
>The article written by the 'anonymous one' yesterday in Dales news letter
>was very good, please don't just read it once; digest it!
>
>Suggestion;
>
>If someone could provide a site where we could upload/download 'freeware'
>utilities it would be a great asset for GFA programmers. (Dale??)  I have a
>few MS freebies that others might find useful.
>
>For example I have a programme that views .exe/.dll/.fon files.
>
>It lists segments/resources/headers/imported names/exported names etc. You
>can view resources of an exe or dll; dialogs/bitmaps/icons/ordinal numbers
>of exported functions etc.
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:44 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PQOg-00NT2hC>; Tue, 23 Mar 1999 13:35:06 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA24423; Tue, 23 Mar 1999 13:03:13 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F79381.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 07:00:16 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] ownsub.dll   22
X-UIDL: 0033ba5a93bfe1406cb09de70ae9a795
Status: RO

Tom,

>It bombs on that portion of every GFA-W compiled *.exe or *.dll.  His is
the only one in GFA-W I've seen that has it. <


My code is OK here, reading GFA files or any others, with or without
versioninfo.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:45 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PQAX-00NSpOC>; Tue, 23 Mar 1999 13:20:29 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id NAA24421; Tue, 23 Mar 1999 13:02:59 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F79381.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 07:00:09 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] ownsub.dll 2
X-UIDL: 5ac36d77475ab9d2b8120ee008f1c205
Status: RO

Tom,

>I'm finding out what they're called so I can maybe get'em on the bar.  So
far, have a bunch of them but it doesn't always follow any pattern.  This
just confuses me all the more.<

As I said earlier;

>
>It's a pity that he didn't include the code; the dll is not really usable
>in its present state.
>

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:47 1999
Return-Path: <verwaltung@vph-bensberg.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PTdF-00NT2pC>; Tue, 23 Mar 1999 17:02:21 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA24608; Tue, 23 Mar 1999 16:46:32 +0100
From: "Verwaltung des VPH, Bensberg" <verwaltung@vph-bensberg.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7C80F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 09:38:11 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36F69116.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: AW: [GFA] DLG 3D
X-UIDL: b041dfca2ab4dab9f7861831a2aa437f
Status: RO

Hi John!

> To get the 3D look for dialogs you only need to add '4' into the
> style parameter; DS_3DLOOK = 4. This works for win95/98 only
> I suspect.

I have tried it but it would not take any effect. What have I done
wrong?

Kind regards
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:47 1999
Return-Path: <verwaltung@vph-bensberg.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PTfX-00NQZWC>; Tue, 23 Mar 1999 17:04:43 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA24606; Tue, 23 Mar 1999 16:46:29 +0100
From: "Verwaltung des VPH, Bensberg" <verwaltung@vph-bensberg.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7C80F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 09:02:21 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36F69B2A.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: AW: [GFA] Win-Gfa

X-UIDL: f1262485b94e9e1d3e84660deff9e06c
Status: RO

Hi Joe!

> Eine Bestellung sollte auch telefonisch mglich sein. Frag mal, ob
die
> CD-ROM-Version von GFABASIC-16-bit bereits erschienen ist,

Jupp, die gibt es, bin stolzer Besitzer! :-)

Gre
Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:48 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PUKn-00NT2hC>; Tue, 23 Mar 1999 17:47:21 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA24888; Tue, 23 Mar 1999 17:33:27 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7D2BB.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 08:27:50 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] ownsub.dll 2
X-UIDL: 5dde73311d0fc093be26f4526e939937
Status: RO

I did an email search and came up with about 350 Ulrich Becker who live in
Germany. Kind of hard to track down with that many.


----- Original Message -----
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
To: <gfabasic@aachen.linux.de>
Sent: Tuesday, March 23, 1999 2:01 AM
Subject: Re: [GFA] ownsub.dll 2


>party pooper - blew my last hope!  He has a versinfo.res in it & I've
>tried to duplicat it but can't even get it to save a file.  I'm goin
>nuts over this crap!
>
>Mebbeso someone *in* Germany will give in & try to call him or write
>him & request that he post the source.  I've looked at the *.bmps in it
>& there are a ton in the colored one.  I'm finding out what they're
>called so I can maybe get'em on the bar.  So far, have a bunch of them
>but it doesn't always follow any pattern.  This just confuses me all
>the more.
>
>Oh... he hasn't responded to a letter I sent from the U.S.
>
><G>
>TomR.
>
>
>At 03:19 AM 23/03/99 -0500, you wrote:
>>Note to Tom:
>>
>>>Perhaps there is a package of code I can't see?  How to ammend this?
>>I *can* strip all but text & see if it's built there.  If so, how
>>can we add the necessary commands to it without the source code?<
>>
>>The dll contains code. You can't ammend it. No adding of commands. :-)
>>
>>It's a pity that he didn't include the code; the dll is not really usable
>>in its present state.
>>
>>John
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:48 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PUaO-00NQZWC>; Tue, 23 Mar 1999 18:03:28 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA24986; Tue, 23 Mar 1999 17:48:58 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7D66A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Mon, 22 Mar 1999 22:55:13 +0100
In-Reply-To: <36F6B0FE.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] ownsub.dll: combobox?
X-UIDL: 8d5bc76b14d9bf7ca147bdb945a0400f
Status: RO

At 20:56 22.03.99 +0100, Eberhard Funck wrote:

>That was the first try and the first result.

I think this is not a perfect solution, right? I think I will try to
contact the author of the DLL...


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:49 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PUZw-00NT2WC>; Tue, 23 Mar 1999 18:03:00 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA24984; Tue, 23 Mar 1999 17:48:57 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7D66A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Mon, 22 Mar 1999 22:55:13 +0100
In-Reply-To: <36F6B0FE.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] ownsub.dll: combobox?
X-UIDL: 136391e167e4b9e6160ce72b800e81e6
Status: RO

At 20:56 22.03.99 +0100, Eberhard Funck wrote:

>That was the first try and the first result.

I think this is not a perfect solution, right? I think I will try to
contact the author of the DLL...


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:49 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PUgh-00NT2TC>; Tue, 23 Mar 1999 18:09:59 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA25083; Tue, 23 Mar 1999 17:55:41 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7D7ED.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 08:50:27 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] ownsub.dll   22
X-UIDL: 40ba0644f4d90415c71a220af03a733f
Status: RO

I smell an example program with the info in a RES.
Dale

----- Original Message -----
From: John Findlay <Jayef@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Tuesday, March 23, 1999 12:19 AM
Subject: [GFA] ownsub.dll 22


Note to Tom:

>Next question:  What manner of save serves to save the verinfo.res?
I can see the data being assembled in a dialog, but how to save it?
Simply write a file versinfo.res to be $INCLUDEed in the compile?<

If I understand your question; it needs to be added to a res file before a
GFA compile. You can make a res of just the versioninfo, but that seems
pointless.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:49 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PUqe-00NT2cC>; Tue, 23 Mar 1999 18:20:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA25169; Tue, 23 Mar 1999 18:06:00 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7DA57.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 09:00:34 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Comment/Suggestion
X-UIDL: 1a5774deb862bf546ab11a886c1af1b9
Status: RO

Hi John,
I would be happy to host a freeware utilities site.  It would take a couple
of days to get set up. As it would probably involve purchasing more space
from GFA.NET I would like to hear some other views on it.
----- Original Message -----
From: John Findlay <Jayef@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Monday, March 22, 1999 11:46 PM
Subject: [GFA] Comment/Suggestion


Hello,

Comment;

The article written by the 'anonymous one' yesterday in Dales news letter
was very good, please don't just read it once; digest it!

Suggestion;

If someone could provide a site where we could upload/download 'freeware'
utilities it would be a great asset for GFA programmers. (Dale??)  I have a
few MS freebies that others might find useful.

For example I have a programme that views .exe/.dll/.fon files.

It lists segments/resources/headers/imported names/exported names etc. You
can view resources of an exe or dll; dialogs/bitmaps/icons/ordinal numbers
of exported functions etc.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:50 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PV1I-00NT2TC>; Tue, 23 Mar 1999 18:31:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA25310; Tue, 23 Mar 1999 18:17:07 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7DCF2.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 09:11:48 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] ownsub.dll: combobox?
X-UIDL: 8d3020d4efe7d270940aa652d23e9fb8
Status: RO

Hi Michael,
If you are successful please let us know.

----- Original Message -----
From: Michael Weigand <michael-weigand@foni.net>
To: <gfabasic@aachen.linux.de>
Sent: Monday, March 22, 1999 1:55 PM
Subject: Re: [GFA] ownsub.dll: combobox?


>At 20:56 22.03.99 +0100, Eberhard Funck wrote:
>
>>That was the first try and the first result.
>
>I think this is not a perfect solution, right? I think I will try to
>contact the author of the DLL...
>
>
>M!chael
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:50 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PVJ6-00NT2fC>; Tue, 23 Mar 1999 18:49:40 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA25564; Tue, 23 Mar 1999 18:35:20 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7E137.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323173207.GZNE7343@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 17:32:07 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 23 Mar 1999 17:32:07 +0000
Subject: Re: [GFA] ownsub.dll   22
X-UIDL: 5d1bf16f7e2674d40a3b3d16d52bccab
Status: RO

I was attempting to arrive at a cheap & dirty *.res file because there
is an awfully good chance that a lot of programmers would like to have 
their info in their *.exe & *.dll products but don't have AppStudio or
Borland Resource Workshop to make'em with.

After long study, it smells like the only thing that can be done this
way is to make a *.rc file & send it to somebody with an rc compiler
to make the *.res file.  That is, unless somebody very clever spends
some time at writing an rc compiler in GFA-W.

Somehow, I've wound up out in left field... I still haven't been able to
even save what I was working on.  I saved *that*, but can't make a file
of the data that is put into it.  It would, in effect, be the *.rc file.

John, you're right in that this info *should* be included in an already
established *.res file, but I figure that I *should* be able to do it
as an individual file to get it working.  Maybe I'm nuts.
<G>
TomR.



At 08:50 AM 23/03/99 -0800, you wrote:
>I smell an example program with the info in a RES.
>Dale
>
>----- Original Message -----
>From: John Findlay <Jayef@compuserve.com>
>To: <gfabasic@aachen.linux.de>
>Sent: Tuesday, March 23, 1999 12:19 AM
>Subject: [GFA] ownsub.dll 22
>
>
>Note to Tom:
>
>>Next question:  What manner of save serves to save the verinfo.res?
>I can see the data being assembled in a dialog, but how to save it?
>Simply write a file versinfo.res to be $INCLUDEed in the compile?<
>
>If I understand your question; it needs to be added to a res file before a
>GFA compile. You can make a res of just the versioninfo, but that seems
>pointless.
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:51 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PVK0-00NST9C>; Tue, 23 Mar 1999 18:50:36 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA25568; Tue, 23 Mar 1999 18:35:25 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7E13B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990323173219.GZOV7343@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Tue, 23 Mar 1999 17:32:19 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Tue, 23 Mar 1999 17:32:19 +0000
Subject: Re: [GFA] Comment/Suggestion
X-UIDL: be66233e72ab9ab1181a2679106e6f3b
Status: RO

My 2's worth...
There are a multitude of free space providers.  webjump.com is one & they
have pretty fair connections now.  The only cost is the top 1 inch of the
page display - they hang their banner there.
<G>
TomR.



At 09:00 AM 23/03/99 -0800, you wrote:
>Hi John,
>I would be happy to host a freeware utilities site.  It would take a couple
>of days to get set up. As it would probably involve purchasing more space
>from GFA.NET I would like to hear some other views on it.
>----- Original Message -----
>From: John Findlay <Jayef@compuserve.com>
>To: <gfabasic@aachen.linux.de>
>Sent: Monday, March 22, 1999 11:46 PM
>Subject: [GFA] Comment/Suggestion
>
>
>Hello,
>
>Comment;
>
>The article written by the 'anonymous one' yesterday in Dales news letter
>was very good, please don't just read it once; digest it!
>
>Suggestion;
>
>If someone could provide a site where we could upload/download 'freeware'
>utilities it would be a great asset for GFA programmers. (Dale??)  I have a
>few MS freebies that others might find useful.
>
>For example I have a programme that views .exe/.dll/.fon files.
>
>It lists segments/resources/headers/imported names/exported names etc. You
>can view resources of an exe or dll; dialogs/bitmaps/icons/ordinal numbers
>of exported functions etc.
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:51 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PViv-00NRHPC>; Tue, 23 Mar 1999 19:16:21 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA25833; Tue, 23 Mar 1999 19:01:34 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7E776.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 12:58:46 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: AW: [GFA] DLG 3D
X-UIDL: 739d24c9c1b13ba5609aec113cbaa80e
Status: RO

Thomas,

>I have tried it but it would not take any effect. What have I done
wrong?<

Actually, because of the way GFA does things it only works the second time
around. If you were to use a dialog from a res or dll it works fine 'first
time'.

Sorry, I'd given you only half the story.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:52 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PViX-00NQZ0C>; Tue, 23 Mar 1999 19:15:57 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA25830; Tue, 23 Mar 1999 19:01:27 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7E776.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 12:58:31 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Comment/Suggestion
X-UIDL: 723422b05b8557927fdd0e7cf6a37717
Status: RO

Dale,

> As it would probably involve purchasing more space from GFA.NET <

I was under the impression that they gave you the space free for all the
hard work you put in.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:25:52 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PVjR-00NQZNC>; Tue, 23 Mar 1999 19:16:53 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA25867; Tue, 23 Mar 1999 19:03:09 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F7E7BA.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Tue, 23 Mar 1999 12:58:44 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] ownsub.dll   22
X-UIDL: 56a129792c4ae05eb4714da216fc0ac0
Status: RO

Dale,

>I smell an example program with the info in a RES.<

One adds it with a resource workshop like Borlands Workshop, no example
needed!

:-)


John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:07 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Psd8-00NUKtC>; Wed, 24 Mar 1999 19:43:54 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA00639; Wed, 24 Mar 1999 19:44:14 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F941A0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Mar 1999 18:32:22 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-Mimeole: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: Re: [GFA] DLG 3D
X-UIDL: 0205f1ecdf64dde365ff3de0d571761b
Status: RO

Hi everybody,

I usually find it easier to create the Windows '95 look using CreateWindowEx to
create comboboxes, edits and listboxes:

FONT "MS Sans Serif",HEIGHT 15,WEIGHT FW_NORMAL TO fnt
param%=WS_VISIBLE | WS_CHILDWINDOW | WS_BORDER | WS_TABSTOP

DIALOG #0,200,200,300,300,"3D Example",DS_MODALFRAME | WS_CAPTION | WS_SYSMENU |
WS_MINIMIZEBOX,-10,"MS Sans Serif" 'On 1 line
  DLG FILL 0,SYSCOL(COLOR_BTNFACE)

  lb_handle&=CreateWindowEx(512,"Listbox","",param% |
WS_VSCROLL,10,10,200,200,DLG(0),0,_INSTANCE,0) 'On 1 line

  SENDMESSAGE lb_handle&,WM_SETFONT,fnt,0

ENDDIALOG
han&=GetSystemMenu(DLG(0),0)
~DeleteMenu(han&,SC_SIZE,MF_BYCOMMAND)
~DeleteMenu(han&,SC_MAXIMIZE,MF_BYCOMMAND)
' Fixes a problem with the system menu that allows the dialog box to be sized

There's more about this on my web site if you're interested Thomas.

Ta'ra
Russell Hayward

Website:     http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub

-----Original Message-----
From: Verwaltung des VPH, Bensberg <verwaltung@vph-bensberg.de>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: 23 March 1999 4:30pm
Subject: AW: [GFA] DLG 3D


>Hi John!
>
>> To get the 3D look for dialogs you only need to add '4' into the
>> style parameter; DS_3DLOOK = 4. This works for win95/98 only
>> I suspect.
>
>I have tried it but it would not take any effect. What have I done
>wrong?
>
>Kind regards
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:08 1999
Return-Path: <Ekkehard.Goebel@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Pu6h-00NUHsC>; Wed, 24 Mar 1999 21:18:31 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA01084; Wed, 24 Mar 1999 21:14:37 +0100
From: Ekkehard.Goebel@t-online.de (Ekkehard Goebel)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F958FC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Wed, 24 Mar 1999 21:12:11 +0100
X-Mailer: T-Online eMail 2.2
MIME-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7BIT
X-Sender: 0911441150-0001@t-online.de
Subject: [GFA] subsribe GFA-Newsletter
X-UIDL: a08b23b7e5b567ae3834ad92f2a8f883
Status: RO

subscribe
-- 
Ekkehard Goebel, 90459 Nuernberg, Karl-Broeger-Str. 18
Email:    ekkehard.goebel@t-online.de
Homepage: http://home.t-online.de/home/Ekkehard.Goebel/


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:09 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PuCl-00NUKaC>; Wed, 24 Mar 1999 21:24:47 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA01131; Wed, 24 Mar 1999 21:21:07 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F95A7C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Wed, 24 Mar 1999 21:11:25 +0100
In-Reply-To: <36F941A0.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] DLG 3D
X-UIDL: b88e41b8693d71ffa30b7415e86cea74
Status: RO

At 18:32 24.03.99 -0000, Russell Hayward wrote:

>I usually find it easier to create the Windows '95 look using
CreateWindowEx to
>create comboboxes, edits and listboxes:

Wow! It's that easy!

I was looking for an easy way to create controls with a 3D look since I
started to develop in GfA-Basic/Win back in 1997. I tried DLG 3D, but
everything looked so ugly! Then I tried to make 3D controls on my own like
this:

PROCEDURE my3Dedit(text$,id&,x&,y&,w&,h&,style%)
  IF MY3D! = TRUE
    CONTROL "",id& + 2,"static",SS_WHITERECT,x&,y&,w&,h&
    CONTROL "",id& + 1,"static",SS_GRAYRECT,x&,y&,w& - 1,h& - 1
    EDITTEXT text$,id&,x& + 1,y& + 1,w& - 2,h& - 2,style%
  ELSE
    EDITTEXT text$,id&,x&,y&,w&,h&,style%
  ENDIF
RETURN

It worked, but every now and then there were redraw problems. And the
controls didn't look like "normal" 3D controls.

So I decided to go without 3D controls...

Your way to create the controls has another major advantage: I don't have
to use static IDs to identify the controls. 

With these controls and the OwnSub.DLL I can improve the look of my
application with no effort. 

Thanks!


M!chael



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:09 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PuCq-00NULeC>; Wed, 24 Mar 1999 21:24:52 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA01129; Wed, 24 Mar 1999 21:21:06 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F95A7B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Wed, 24 Mar 1999 21:11:25 +0100
In-Reply-To: <36F941A0.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] DLG 3D
X-UIDL: 2e684bdad9475410017a0d4cfd725d24
Status: RO

At 18:32 24.03.99 -0000, Russell Hayward wrote:

>I usually find it easier to create the Windows '95 look using
CreateWindowEx to
>create comboboxes, edits and listboxes:

Wow! It's that easy!

I was looking for an easy way to create controls with a 3D look since I
started to develop in GfA-Basic/Win back in 1997. I tried DLG 3D, but
everything looked so ugly! Then I tried to make 3D controls on my own like
this:

PROCEDURE my3Dedit(text$,id&,x&,y&,w&,h&,style%)
  IF MY3D! = TRUE
    CONTROL "",id& + 2,"static",SS_WHITERECT,x&,y&,w&,h&
    CONTROL "",id& + 1,"static",SS_GRAYRECT,x&,y&,w& - 1,h& - 1
    EDITTEXT text$,id&,x& + 1,y& + 1,w& - 2,h& - 2,style%
  ELSE
    EDITTEXT text$,id&,x&,y&,w&,h&,style%
  ENDIF
RETURN

It worked, but every now and then there were redraw problems. And the
controls didn't look like "normal" 3D controls.

So I decided to go without 3D controls...

Your way to create the controls has another major advantage: I don't have
to use static IDs to identify the controls. 

With these controls and the OwnSub.DLL I can improve the look of my
application with no effort. 

Thanks!


M!chael



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:09 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PvGL-00NUD5C>; Wed, 24 Mar 1999 22:32:33 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA01315; Wed, 24 Mar 1999 22:27:16 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F969D4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990324212651.CDFJ27921@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Mar 1999 21:26:51 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Mar 1999 21:26:51 +0000
Subject: [GFA] *.bmps in ownsub.dll   2403yy1-
X-UIDL: 75300760cc7765b9c6627a7d952cb169
Status: RO

24/03/99 02:43:45 PM   *.bmps in ownsub.dll   2403yy1-

If this info is of any interest...

There is one row of 1-bit 16x16 *.bmps in bitmap 32766.
#1 thru #13 are figures, #14 thru #20 are blanks
I've had no success showing bitmap 32766 at all unless it
is the source of the blank page figure found below.

There are 6 rows of 16-color 16x16 *.bmps in bitmap 32767.
row 1 has 14, #15 is printer, #14 & #16 are null (blank pages).
row 2 has 16, #10 & #11 are null (blank pages).
row 3 has 6, #7 thru #16 are null (blank pages).
row 4 has 16, all there.
row 5 has 11, #12 thru #16 are null (blank pages).
row 6 has 2, #3 thru #16 are null (blank pages).

null is defined here as nothing in the *.bmp at all, white space

null buttons (<17) appear as a blank page on a button while all
buttons beyond #16 appear as gray blank buttons

Behavior for row 6 is different.  Code creates a toggle... #1 is
"up", #2 is "depressed".  All others allow Windows to represent
"depressed".

Win& = ^CreateToolWindow(WIN(1),100)
FOR x& = AA TO ZZ
  ~^AddToolButton(Win&,101,TRUE,x&,"0")
  ' 101 is ID, "_" is tooltip text
NEXT x&

row 1: AA = 1, ZZ=15 (#14 & #16 are missing)
row 2: nothing I've tried gets this row!
row 3: nothing I've tried gets this row!
row 4: AA = $1000, BB = $1010 (all are here)
row 5: AA = $2000, BB = $200B (only 1st 11 are here)
row 6: AA = $4000, BB = $4001

I've seen most as icons in various programs & row 1 is becoming
very common as buttons.  A lot of row 2 are icons on FileMgr's
toolbar.

If anybody desires having these 2 *.bmps, will send direct.  I
will confess that I haven't tried to make the buttons do anything -
they may be totally useless since I heard that the combobox is.

What a pity Mr. Becker can't be tracked down.

<G>
TomR.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:10 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PvkH-00NUMKC>; Wed, 24 Mar 1999 23:03:29 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id WAA01389; Wed, 24 Mar 1999 22:52:19 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F96F8C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Wed, 24 Mar 1999 22:52:00 +0100
In-Reply-To: <36F969D4.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] *.bmps in ownsub.dll   2403yy1-
X-UIDL: fb7cf5f2c914ded7bfd698136998c900
Status: RO

At 21:26 24.03.99 +0000, Tom Record wrote:

>What a pity Mr. Becker can't be tracked down.

Recently I wrote that Ulrich Beckers address would be no longer valid. I
think, I was wrong. I found his entry in the current phone book by Deutsche
Telekom. Today I sent him a letter tomorrow with all the questions that
raised about the DLL.


M!chael



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:10 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10PxDS-00NUOdC>; Thu, 25 Mar 1999 00:37:42 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id AAA01606; Thu, 25 Mar 1999 00:31:32 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F986DE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990324233113.ESBY26940@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Wed, 24 Mar 1999 23:31:13 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 24 Mar 1999 23:31:13 +0000
Subject: Re: [GFA] *.bmps in ownsub.dll   2403yy1-
X-UIDL: d05ab710e711745b965ec54cfca02648
Status: RO

M!chael
Let's hope you are successful!  I sure would like to get the source for the
*.dll & see what all we're missing.  It would e good to correct the error
w/ the combobox, too - I'm not having any luck putting one in a toolbar at 
all.

I'd also like to see what the 2 rows of *.bmps are listed as - I've been 
wasting a lot of time trying to get them to show, but they don't.  There's
really nothing I need from them, but... if we have them, we can use them.

Thanks for trying to contact him - maybe we can make some real progress.
Please keep me posted?

<G>
TomR.


At 10:52 PM 24/03/99 +0100, you wrote:
>At 21:26 24.03.99 +0000, Tom Record wrote:
>
>>What a pity Mr. Becker can't be tracked down.
>
>Recently I wrote that Ulrich Beckers address would be no longer valid. I
>think, I was wrong. I found his entry in the current phone book by Deutsche
>Telekom. Today I sent him a letter tomorrow with all the questions that
>raised about the DLL.
>
>
>M!chael
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:11 1999
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Q41I-00NUTNC>; Thu, 25 Mar 1999 07:53:36 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA02515; Thu, 25 Mar 1999 07:50:35 +0100
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F9EDB8.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 25 Mar 1999 07:51:10 +0100
MIME-Version: 1.0
Content-Type: multipart/alternative;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3155.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
X-Sender: 333200002801-0001@t-online.de
Subject: [GFA] Limits of CLIPCOPY
X-UIDL: 18c65ef449267378391a34d5b7e244c3
Status: RO

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD></x-html>

From ???@??? Fri Apr 09 10:26:11 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Q50l-00NUTkC>; Thu, 25 Mar 1999 08:57:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA02656; Thu, 25 Mar 1999 08:54:00 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36F9FC94.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Mar 1999 02:53:02 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] DLG 3D
X-UIDL: 6e70f6422393867708c7165238780d6a
Status: RO

Russell,

It was a pleasent supprise to see you use SYSCOL(COLOR_BTNFACE); lots of
people seem to perversly think that dialods and buttons have to be filled
with grey!

Joy!

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:14 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QCc3-00NUfNC>; Thu, 25 Mar 1999 17:04:07 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA03748; Thu, 25 Mar 1999 16:52:31 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FA6CCF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Mar 1999 16:53:53 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-Mimeole: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] DLG 3D

X-UIDL: 86e2bf0afd4f7f40ea87bd4c76d44cd9
Status: RO

Hi all,

This is the right way.
API EXSTYLE:
WS_EX_CLIENTEDGE = $200 (512) the new 3D style of Win95/98 windows,
creating by CreateWindowEx(Exstyle,...)

Eberhard

Datum: Mittwoch, 24. Mrz 1999 19:43
Betreff: Re: [GFA] DLG 3D


>Hi everybody,
>
>I usually find it easier to create the Windows '95 look using
CreateWindowEx to
>create comboboxes, edits and listboxes:
>
>FONT "MS Sans Serif",HEIGHT 15,WEIGHT FW_NORMAL TO fnt
>param%=WS_VISIBLE | WS_CHILDWINDOW | WS_BORDER | WS_TABSTOP
>
>DIALOG #0,200,200,300,300,"3D Example",DS_MODALFRAME | WS_CAPTION |
WS_SYSMENU |
>WS_MINIMIZEBOX,-10,"MS Sans Serif" 'On 1 line
>  DLG FILL 0,SYSCOL(COLOR_BTNFACE)
>
>  lb_handle&=CreateWindowEx(512,"Listbox","",param% |
>WS_VSCROLL,10,10,200,200,DLG(0),0,_INSTANCE,0) 'On 1 line
>
>  SENDMESSAGE lb_handle&,WM_SETFONT,fnt,0
>
>ENDDIALOG
>han&=GetSystemMenu(DLG(0),0)
>~DeleteMenu(han&,SC_SIZE,MF_BYCOMMAND)
>~DeleteMenu(han&,SC_MAXIMIZE,MF_BYCOMMAND)
>' Fixes a problem with the system menu that allows the dialog box to be
sized
>
>There's more about this on my web site if you're interested Thomas.
>
>Ta'ra
>Russell Hayward
>
>Website:     http://www.baphead.freeserve.co.uk/
>
>The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub
>
>-----Original Message-----
>From: Verwaltung des VPH, Bensberg <verwaltung@vph-bensberg.de>
>To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
>Date: 23 March 1999 4:30pm
>Subject: AW: [GFA] DLG 3D
>
>
>>Hi John!
>>
>>> To get the 3D look for dialogs you only need to add '4' into the
>>> style parameter; DS_3DLOOK = 4. This works for win95/98 only
>>> I suspect.
>>
>>I have tried it but it would not take any effect. What have I done
>>wrong?
>>
>>Kind regards
>>Thomas
>>
>>
>>---
>>This mailing list is currently running BeroList v2.5.6
>>Report problems to bero@bero-online.ml.org
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:16 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QDNj-00NSqyC>; Thu, 25 Mar 1999 17:53:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA03873; Thu, 25 Mar 1999 17:42:43 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FA787C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Mar 1999 08:39:51 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] DLG 3D
X-UIDL: 96ab62a5d6ce3eb0b4821c38878c088c
Status: RO

Now just a dadgum minute, John. I like Grey(G)
Dale
----- Original Message -----
From: John Findlay <Jayef@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Wednesday, March 24, 1999 11:53 PM
Subject: Re: [GFA] DLG 3D


Russell,

It was a pleasent supprise to see you use SYSCOL(COLOR_BTNFACE); lots of
people seem to perversly think that dialods and buttons have to be filled
with grey!

Joy!

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:18 1999
Return-Path: <vware@gmx.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QDqu-00NSTUC>; Thu, 25 Mar 1999 18:23:32 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA03973; Thu, 25 Mar 1999 18:18:32 +0100
From: Georg Veichtlbauer <vware@gmx.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FA80F1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Mar 1999 18:18:23 +0100 (MET)
X-Authenticated-Sender: #0000929469@gmx.net
X-Authenticated-IP: [195.3.96.77]
X-Mailer: WWW-Mail 1.5 (Global Message Exchange)
X-Flags: 0001
Subject: [GFA] Network problems .... need help
X-UIDL: e8d3c8ce5c1e5065a50ddaf96c3501bf
Status: RO

It's me (again... <G>)

I've got a problems: I'm working on a application, which is able to share
data on a LAN. It *should* access the LAN without connecting a network drive
in the Explorer.
Does anyone have a solution? I could not find any progs (except one with
~INTR, but I need to use it also on NT).


And now especially for Joe <G>:

Ich habe ein Problem. Ich erstelle gerade eine Anwendung, die ber ein
lokales Netzwerk Daten austauschen soll. Dabei soll aber kein Netzwerklaufwerk
verbunden (z.B als Laufwerk H:) werden, sondern auf den freigegeben
Speicherplatz zugegriffen werden.
Ich konnte keine Programme (auer einem Beispiel mit ~INTR - luft aber
natrlich nicht unter NT) finden, die einen Lsungsansatz zu bieten hatten.


Thanks / Danke,
 Georg

---
Sent through Global Message Exchange - http://www.gmx.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:18 1999
Return-Path: <vware@gmx.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QDuU-00NRHRC>; Thu, 25 Mar 1999 18:27:14 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA03975; Thu, 25 Mar 1999 18:18:33 +0100
From: Georg Veichtlbauer <vware@gmx.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FA80F1.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Mar 1999 18:18:25 +0100 (MET)
X-Authenticated-Sender: #0000929469@gmx.net
X-Authenticated-IP: [195.3.96.77]
X-Mailer: WWW-Mail 1.5 (Global Message Exchange)
X-Flags: 0001
Subject: [GFA] Network problems .... need help
X-UIDL: 9fd86d8a9b0cecb6b866d7841ab6cd1a
Status: RO

It's me (again... <G>)

I've got a problems: I'm working on a application, which is able to share
data on a LAN. It *should* access the LAN without connecting a network drive
in the Explorer.
Does anyone have a solution? I could not find any progs (except one with
~INTR, but I need to use it also on NT).


And now especially for Joe <G>:

Ich habe ein Problem. Ich erstelle gerade eine Anwendung, die ber ein
lokales Netzwerk Daten austauschen soll. Dabei soll aber kein Netzwerklaufwerk
verbunden (z.B als Laufwerk H:) werden, sondern auf den freigegeben
Speicherplatz zugegriffen werden.
Ich konnte keine Programme (auer einem Beispiel mit ~INTR - luft aber
natrlich nicht unter NT) finden, die einen Lsungsansatz zu bieten hatten.


Thanks / Danke,
 Georg

---
Sent through Global Message Exchange - http://www.gmx.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:20 1999
Return-Path: <tarquin@baphead.freeserve.co.uk>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QEvp-00NSTUC>; Thu, 25 Mar 1999 19:32:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA04164; Thu, 25 Mar 1999 19:27:43 +0100
From: "Russell Hayward" <tarquin@baphead.freeserve.co.uk>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FA913F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 25 Mar 1999 18:26:36 -0000
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: [GFA] CreateWindow Tabstops
X-UIDL: 2a2c9b772178a322fbdbe81a587069b3
Status: RO

Hi everybody,

I just wondered if anyone knew how to get tabstops to work in a parent window
created with CreateWindow(Ex). I'm sure it's a simple problem but I can't work
it out.

>It was a pleasent surprise to see you use SYSCOL(COLOR_BTNFACE); lots of people
seem to perversly think that dialogs and buttons have to be filled with grey!<

I was forced into that habit by my brother who loves to set his colours to
various garish combinations (I like grey too Dale). :-)

Oh and John, thanks for that tiled wallpaper thing you told me about, I've got
it to work with a bit of registry fiddling, God knows whether it will work on NT
but it has a chance.

Cheers,
Russell Hayward

Website:     http://www.baphead.freeserve.co.uk/

The GFA Basic Club: http://clubs.yahoo.com/clubs/gfabasicclub



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:20 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QF8F-00NSqMC>; Thu, 25 Mar 1999 19:45:31 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA04193; Thu, 25 Mar 1999 19:34:01 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FA929C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Mar 1999 13:33:32 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] DLG 3D
X-UIDL: 4939a70ca9eb45f0881470db5d4f0c03
Status: RO

Dale,

>Now just a dadgum minute, John. I like Grey(G)

I can accept that; but when one's system colours are set so as not to have
grey (of one's own free will I might add!) so that dialogs and buttons etc,
are in a colour pleasing to oneself, it comes as a bit of a shock when a
prog forces one to stare at a colour one has rejected.

I think that says it! :-)


John (always getting into trouble)


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:21 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QF95-00NSr7C>; Thu, 25 Mar 1999 19:46:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA04231; Thu, 25 Mar 1999 19:41:35 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FA9458.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Thu, 25 Mar 1999 10:38:42 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] DLG 3D
X-UIDL: 89af7381dfa8eeab7a68e9f2cd99bee7
Status: RO

You're a hard man, Mr. Findlay!(G)

----- Original Message -----
From: John Findlay <Jayef@compuserve.com>
To: <gfabasic@aachen.linux.de>
Sent: Thursday, March 25, 1999 10:33 AM
Subject: Re: [GFA] DLG 3D


Dale,

>Now just a dadgum minute, John. I like Grey(G)

I can accept that; but when one's system colours are set so as not to have
grey (of one's own free will I might add!) so that dialogs and buttons etc,
are in a colour pleasing to oneself, it comes as a bit of a shock when a
prog forces one to stare at a colour one has rejected.

I think that says it! :-)


John (always getting into trouble)


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:23 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QGwQ-00NT2jC>; Thu, 25 Mar 1999 21:41:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA04497; Thu, 25 Mar 1999 21:36:30 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FAAF99.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Thu, 25 Mar 1999 21:37:43 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA]_INSTANCE
X-UIDL: c14e447b1e3547e5a54da5ed98506b3a
Status: RO

Hi John and all,

If it is right, that the Instance handle for apps 
is to find in WORD{_PSP + $18}??
Win95/98  accept: Instance = WORD{_PSP + $18},
but NT want WORD{_PSP + $2A} ($18+20).

Is this the right way?
I will use it for:
@WinMain (WORD{_PSP + $18}, NULL, _PSP + $81, WORD{_PSP + $5E})

Eberhard.



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:27 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QLiK-00NT2RC>; Fri, 26 Mar 1999 02:47:12 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA05135; Fri, 26 Mar 1999 02:44:04 +0100
From: "EDV-Service J. Hurst, Berlin" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FAF773.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 02:47:17 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36F9EDB8.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] Limits of CLIPCOPY
X-UIDL: 79fd4c4e077be6dea44bd8eb9b7b291c
Status: RO

Clipcopy has no problems. Whyever your program doesn't work on your machine: it
is correct.

>ClrClip
>ClipFormat CF_TEXT
>a$=String$(800,"-")
>ClipCopy V:a$, Len(a$)
(I allowed myself to remove the MIME-marks from your mail)

Here is the prove that the clipboard is okay:
ClipPaste h%,txtlen%
b$=Peek$(h%,txtlen%)+Chr$(0)		' get all text content (always a multiplier of 32)
b$=Mid$(b$,1,Instr(b$,Chr$(0))-1)	' get defined textcontent (null-termin.
strings on
'                                     clipboard=textformat)
If a$<>b$ Then Alert 1,"Error",1,"Cancel",dummy&
If a$=b$ Then Alert 1,"OK",1,"Cancel",dummy&

The following example shows that 12 KB are no problem:
'
a$=String$(12345,"*")
ClrClip
ClipFormat CF_TEXT
ClipCopy V:a$,Len(a$)
'
ClipPaste h%,txtlen%
b$=Peek$(h%,txtlen%)+Chr$(0)            ' this is not the same as a$!
b$=Mid$(b$,1,Instr(b$,Chr$(0))-1)       ' now we get the content correct back!
'
If a$=b$ Then
  a$="OK"
Else
  a$="Error"
EndIf
' now let's show that both strings are equal, but length of textdata on the
' clipboard is NOT the same then real length of read data.
Alert 1,"A$ = B$ ?"+a$+"|"+Str$(txtlen%)+" != "+Str$(Len(b$)),1,"Cancel",dummy&
'

Bye, Joe
BTW: It would be very kind if you switch your newswriter to "text only" and turn
of the HTML-rubbish. Your mail contains only 14 lines of usefull simple text
information, but unreadable because of the MIME-marks, and almost 60 lines of
additional HTML-code with no further information.


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:27 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QLiO-00NTXTC>; Fri, 26 Mar 1999 02:47:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA05133; Fri, 26 Mar 1999 02:43:49 +0100
From: "EDV-Service J. Hurst, Berlin" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FAF772.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 02:47:24 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36FA80F1.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] Network problems .... need help
X-UIDL: b3d2c8c00ab18768249fd138c6f1d0ee
Status: RO

> And now especially for Joe <G>:
He, soviel Englisch kann ich gerade noch :-)

How do you connect to the other computers in the network?
Why don't you use a simple fileprotocoll? (Open file on a still fixed netdrive,
write info in, read info out)

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:28 1999
Return-Path: <gfa@aachen.linux.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QLma-00NSTmC>; Fri, 26 Mar 1999 02:51:36 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id CAA05175; Fri, 26 Mar 1999 02:49:00 +0100
From: GFA <gfa@aachen.linux.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FAF885.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: gfa@aachen.linux.de
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Fri, 26 Mar 1999 02:46:34 +0100
In-Reply-To: <36FAAF99.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA]_INSTANCE
X-UIDL: 55817dffb4598224e03afaebe9c114fd
Status: RO

Hmm, 
you should prefer using _Instance.

Normally, Win32 application DOES NOT HAVE any Instance handle!
Only for compatibility reasons 16 Bit Programs running under
Win32 will get an Instance handle.
This will probably change to a more random value in Win2000.

Real Win32 apps will never receive Instance handles. Even if
Visual Basic can test for it, it is just different from zero,
but without any further meaning. A Win32 Window Procedure
will have the Instance paramter for compatibility only, it's
just a dummy.

_PSP is forbidden for real 32 Bit apps (and will be forbidden
for GFA-BASIC 32 as well); 16 Bit apps can it use because of
compatibility. But you should not expect to have it all the time
in the future.

Regards

  Sven Thomas
  GFA Software


At 21:37 25.03.99 +0100, you wrote:
>Hi John and all,
>
>If it is right, that the Instance handle for apps 
>is to find in WORD{_PSP + $18}??
>Win95/98  accept: Instance = WORD{_PSP + $18},
>but NT want WORD{_PSP + $2A} ($18+20).
>
>Is this the right way?
>I will use it for:
>@WinMain (WORD{_PSP + $18}, NULL, _PSP + $81, WORD{_PSP + $5E})
>
>Eberhard.

____________________________________________________________________
GFA Software Technologies GmbH / GFA Software Technologies, Inc.
Volksgartenstrasse 85-89 - 41065 Moenchengladbach
Tel: +49 (0)2161 4 38 66 - Fax: +49 (0)2161 4 38 25
mailto:info@gfa.net - http://www.gfa.net
+++ Attention: our E-Mail address has changed! +++


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:28 1999
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QQ2Z-00NRHEC>; Fri, 26 Mar 1999 07:24:23 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id HAA05910; Fri, 26 Mar 1999 07:22:13 +0100
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FB3899.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 07:22:23 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3155.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
X-Sender: 333200002801-0001@t-online.de
Subject: Re: [GFA] Limits of CLIPCOPY

X-UIDL: ee82635b0ad283973101b3950dd2ad1c
Status: RO

>Clipcopy has no problems. Whyever your program doesn't work on your
machine: it
>is correct.
>>ClrClip
>>ClipFormat CF_TEXT
>>a$=String$(800,"-")
>>ClipCopy V:a$, Len(a$)
>Here is the prove that the clipboard is okay:
>ClipPaste h%,txtlen%
>b$=Peek$(h%,txtlen%)+Chr$(0) ' get all text content (always a multiplier of
32)
>b$=Mid$(b$,1,Instr(b$,Chr$(0))-1) ' get defined textcontent (null-termin.
...

Hi Joe,
Thanks a lot for your expertise concerning the secrets of  the CLIPCOPY
command, especially for the hint that the length of  the text content is
always
a multiple of  32. Your prove is valid even on my machine  (Win98)

But: Copying strings with length of multiple of 32,  the activating of  the
Win98 clipboard produces a severe error and even the paste function
in the notepad doesnt work. Paste in MS-Word97 shows the original
string with some short unexpected appendices.

I want to paste the GFA generated clipboard contents into other
MS programs. So Im using now the following crutch before copying a
string into the clipboard :

If  MOD(LEN(a$),32) = 0 THEN a$=a$ +  

This works fine for all string lengths of interest.

Bye,  Juergen



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:29 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QRV8-00NRHZC>; Fri, 26 Mar 1999 08:57:58 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA06149; Fri, 26 Mar 1999 08:53:10 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FB4DE4.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 02:52:26 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA]_INSTANCE
X-UIDL: ee1368ab9afb30754f81c22ea1599c0b
Status: RO

Eberhard,

>NT want WORD{_PSP + $2A} ($18+20).
Is this the right way? <

I can't say, sorry.

John

> _PSP is forbidden for real 32 Bit apps (and will be forbidden
for GFA-BASIC 32 as well); 16 Bit apps can it use because of
compatibility. But you should not expect to have it all the time
in the future. <

Thanks Sven!

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:29 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QSoi-00NRHZC>; Fri, 26 Mar 1999 10:22:16 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA06350; Fri, 26 Mar 1999 10:12:22 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FB60DC.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 04:11:53 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA]_INSTANCE
X-UIDL: d4dc5ee5f783e2d0f827e3c69d5ccb97
Status: RO

Sven,

Presumably there will be a GFA32 _CmdShow variable then, this parameter is
important!!

>> Real Win32 apps will never receive Instance handles...Normally, Win32
application DOES NOT HAVE any Instance handle!... but without any further
meaning. <<

Are you sure about this?

I have done a test in Win32 (yes, a real Win32 application); without a
valid instance handle nothing will work.

  wndclass.hIcon  = LoadIcon(hInstance, szAppName);

This will not work unless hInstance is valid, neither do the other API's
that need hInstance!


Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:30 1999
Return-Path: <tiger.genealogical.rescue@worldnet.att.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QV1X-00NRHZC>; Fri, 26 Mar 1999 12:43:39 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA06645; Fri, 26 Mar 1999 12:34:13 +0100
From: Tom Record <tiger.genealogical.rescue@worldnet.att.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FB8215.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
          (InterMail v03.02.07 118 124) with SMTP
          id <19990326112030.DNWK25241@LOCALNAME>
          for <gfabasic@linux.net.eu.org>; Fri, 26 Mar 1999 11:20:30 +0000
X-Sender: tiger.genealogical.rescue@postoffice.worldnet.att.net
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"

Date: Fri, 26 Mar 1999 11:20:30 +0000
Subject: [GFA] Just in case of any interest....
X-UIDL: e35c6c4f64d75258975b41ae122798e3
Status: RO

''''  ck_cgi_2.lst   TomR.  Checks *.cgi & *.dtc files to see if there
''''  is an image in them.  So far, I know of 3 types & the *.jpg
''''  is known to sometimes be an animation.  Shown w/ java?
''''  *.dtc is new to me, but so far, I've seen a type89a *.gif.
''''  Use & abuse at will.  If improved, please send me a copy?
''''  Tiger.Genealogical.Rescue@worldnet.att.net    Thanks!

cx& = GETDEVCAPS(HORZRES)
cy& = GETDEVCAPS(VERTRES)
dv&  = _DRIVE
dr$ = DIR$(0)
DIM m&(256)
DLG 3D ON
TITLEW #1, " Checking *.cgi & *.dtc to see if there's an image."
OPENW #1,0,0,cx&,cy&,16
SETMOUSE cx& / 2,cy& / 2
DEFMOUSE 2

FOR i% = 0 TO 31
  m&(i%) = 46
NEXT i%
m&(32) = 32
FOR i% = 33 TO 47
  m&(i%) = 46
NEXT i%
FOR i% = 48 TO 57
  m&(i%) = i%
NEXT i%
FOR i% = 58 TO 62
  m&(i%) = 46
NEXT i%
m&(63) = 63
m&(64) = 46
FOR i% = 65 TO 90
  m&(i%) = i%
NEXT i%
FOR i% = 91 TO 94
  m&(i%) = 46
NEXT i%
m&(95) = 95
m&(06) = 46
FOR i% = 97 TO 122
  m&(i%) = i%
NEXT i%
FOR i% = 123 TO 255
  m&(i%) = 46
NEXT i%
Another_One:
FILESELECT #"Select a *.cgi or *.dtc file to check or hit <Cancel> to
quit.","WWW Files (*.cgi/*.dtc)","*.cgi;*.dtc",n1$
IF LEN(n1$) = 0 THEN GOTO Drop_It
OPEN "I",#1, n1$
Alf& = RINSTR(n1$,"\")
n2$ = RIGHT$(n1$,LEN(n1$) - Alf&)
'PRINT n1$
CHDRIVE dv&
CHDIR dr$
caz$ = XLATE$(INPUT$(10,#1),m&())
CLOSE #1
DoMe& = FALSE
IF UPPER$(LEFT$(caz$,6)) = "GIF87A" OR UPPER$(LEFT$(caz$,6)) = "GIF89A" THEN
  IF UPPER$(LEFT$(caz$,6)) = "GIF87A" THEN Chuk$ = "type87a"
  IF UPPER$(LEFT$(caz$,6)) = "GIF89A" THEN Chuk$ = "type89a"
  a$ = n2$ + "| is a " + Chuk$ + " *.gif... want to rename it?"
  DoMe& = TRUE
  @Ask()
  @Ha()
ENDIF
IF UPPER$(RIGHT$(caz$,4)) = "JFIF" THEN
  a$ = n2$ + "| is a *.jpg... want to rename it? | If very large, it may be
an animation."
  DoMe& = TRUE
  @Ask()
  @Ha()
ENDIF
IF DoMe& = FALSE
  a$ = n2$ + "| is not an image, sorry."
  @Nope()
ENDIF
GOTO Another_One
Drop_It:
DEFMOUSE 0
CHDRIVE dv&
CHDIR dr$
CLOSEW #1
DLG 3D OFF
END


PROCEDURE Ask()
  i% = 1
  '  a$ = "Rename " + n1$
  j% = 1
  b$ = "&Auto | &Manual | &No"
  k% = 0
  ALERT i%,a$,j%,b$,k%
RETURN


PROCEDURE Nope()
  i% = 1
  '  a$ = "Rename " + n1$
  j% = 1
  b$ = "&Ok"
  k% = 0
  ALERT i%,a$,j%,b$,k%
RETURN


PROCEDURE Ha()
  i% = 1
  Ha$ = "      I fooled you <G>|    rename isn't in it...|                yet."
  j% = 1
  b$ = "Oh, well"
  k% = 0
  ALERT i%,Ha$,j%,b$,k%
RETURN


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:31 1999
Return-Path: <TecBerlin@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QWdF-00NT2ZC>; Fri, 26 Mar 1999 14:26:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA06889; Fri, 26 Mar 1999 14:22:45 +0100
From: TecBerlin@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FB9B2C.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 08:22:24 EST
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 4.0.i for Windows 95 sub 23
Subject: [GFA] Change System Colors ???
X-UIDL: 3360c66223e4f8a6045386d2c459d811
Status: RO

Hy GFA-Users

I have a little prob by changing the Systempallette (Colors 0 to 18) ! I
handle it as follows:

DIM rgbalt%(18),rgbneu%(18),index%(18)
FOR i|=0 to 18
	index%(i|)=i|
	rgbalt%(i|)=GetSysColor(i|)	// Get original Colors and save them
NEXT i|
//
.. reading new entries from File and save them in rgbneu%()
//
~SetSysColors(19,V:index%(0),rgbneu%(0))
..

And now the Problem. If i do this so, only the Palette-Entries from Color 2 to
9 
will be changed. But not with the right Colors ! The Entries will be as
follows:
Color 3 in Color 2, Color 5 in Color 3, Color 7 in Color 4, Color 9 in Color
5, Color 11 in Color 6, Color 13 in Color 7, Color 15 in Color 8, color 17 in
Color 9 and Color 18 in Color 1 !!! Whats the Problem ???

If i change the Entries as follows
..
FOR i|= 0 TO 18
	~SetSysColors(1,V:index%(i|),V:rgbneu%(i|))
NEXT i|
..
it will be done right ! The Problem here is only the Time it needs!

How I can change Systemcolors right and fast ?

Thanks for thinking about it 
Thomas Elfert
TecBerlin@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:31 1999
Return-Path: <verwaltung@vph-bensberg.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QX05-00NTXlC>; Fri, 26 Mar 1999 14:50:17 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA06967; Fri, 26 Mar 1999 14:45:18 +0100
From: "Verwaltung des VPH, Bensberg" <verwaltung@vph-bensberg.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBA068.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 09:20:17 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Importance: Normal
In-Reply-To: <36FB3899.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Subject: AW: [GFA] Limits of CLIPCOPY

X-UIDL: 274bea0c6589a18e0e3209787ae5a0d4
Status: RO

Hi Juergen!

I use the following to send "everything" from one application to an
other by using the clipboard:

  dummi& = GlobalAlloc(GHND,512) // ,Anzahl der Zeichen
  adresse% = GlobalLock(dummi&) // Speicheradresse reservieren ...
  CHAR{adresse%}=wert$ // Wert an Speicheradresse schreiben
  ' Clipboardfunktion ...
  CLRCLIP // Clipboard leeren
  CLIPFORMAT CF_TEXT
  CLIPCOPY adresse%,LEN(wert$)
  ' "normales" auslesen ...
  daten$ = CHAR{adresse%} // Wert zurcklesen
  ~GlobalUnlock(dummi&) // danach Speicher unlocken ...
  ~GlobalFree(dummi&) // ... und wieder freigeben!

I hope that this will help. I use it in a different way and so I do
not have tested it. But I believe that it will work.

Thomas


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:32 1999
Return-Path: <TecBerlin@aol.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QX25-00NTXmC>; Fri, 26 Mar 1999 14:52:21 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id OAA06977; Fri, 26 Mar 1999 14:48:32 +0100
From: TecBerlin@aol.com
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBA129.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 26 Mar 1999 08:48:16 EST
Mime-Version: 1.0
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7bit
X-Mailer: AOL 4.0.i for Windows 95 sub 23
Subject: [GFA] ChangeSystemColors() ???
X-UIDL: 2ec54ffb0173462a3ec7aca274e190fa
Status: RO

Hy GFA-Users

I have a little prob by changing the Systempallette (Colors 0 to 18) ! I
handle it as follows:

DIM rgbalt%(18),rgbneu%(18),index%(18)
FOR i|=0 to 18
	index%(i|)=i|
	rgbalt%(i|)=GetSysColor(i|)	// Get original Colors and save them
NEXT i|
//
.. reading new entries from File and save them in rgbneu%()
//
~SetSysColors(19,V:index%(0),rgbneu%(0))
..

And now the Problem. If i do this so, only the Palette-Entries from Color 2 to
9 
will be changed. But not with the right Colors ! The Entries will be as
follows:
Color 3 in Color 2, Color 5 in Color 3, Color 7 in Color 4, Color 9 in Color
5, Color 11 in Color 6, Color 13 in Color 7, Color 15 in Color 8, color 17 in
Color 9 and Color 18 in Color 1 !!! Whats the Problem ???

If i change the Entries as follows
..
FOR i|= 0 TO 18
	~SetSysColors(1,V:index%(i|),V:rgbneu%(i|))
NEXT i|
..
it will be done right ! The Problem here is only the Time it needs!

How I can change Systemcolors right and fast ?

Thanks for thinking about it 
Thomas Elfert
TecBerlin@aol.com

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:32 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QXFh-00NTXhC>; Fri, 26 Mar 1999 15:06:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA07066; Fri, 26 Mar 1999 15:01:56 +0100
From: "EDV-Service J. Hurst, Berlin" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBA451.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 15:05:30 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36FA80F1.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: [GFA] RE: Mailinglist problems .... help
X-UIDL: b57e1d6b6fb71516b1144e655bc873bf
Status: RO

Hi!
In the last days, I get very often mails which are
a) double or
b) not delivered.

Point a): is something Dale should check.
Point b): One of the guys who is always involved is Georg Veichtlbauer at gmx.
Georg, do you try to recieve your mails on your e-plus handy? The port does
still not work properly, would you be so kind and shut it off?

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:33 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QXSp-00NTXXC>; Fri, 26 Mar 1999 15:19:59 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA07126; Fri, 26 Mar 1999 15:16:11 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBA7A5.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 09:13:40 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Quickie!
X-UIDL: 4b8c8b5ace1c6fb1e3b7bdd685382f6d
Status: RO

Does anyone know what 'Incr' is in PowerBasic?

Thanks,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:33 1999
Return-Path: <jhorikx@stads.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QXWA-00NT39C>; Fri, 26 Mar 1999 15:23:26 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id PAA07123; Fri, 26 Mar 1999 15:15:59 +0100
From: Jos Horikx <jhorikx@stads.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBA79A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: jhorikx@mail.stads.net
X-Mailer: Windows Eudora Light Version 1.5.4 (32)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 26 Mar 1999 15:15:45 +0100
Subject: Re: [GFA] RE: Mailinglist problems .... help
X-UIDL: 6e7ac40a7c4aaa78b4bc21b3036dd166
Status: RO

At 15:05 26-3-99 +0100, EDV-Service J. Hurst, Berlin wrote o.a.:

>In the last days, I get very often mails which are
>a) double or
>b) not delivered.

>Point a): is something Dale should check.
>Point b): One of the guys who is always involved is Georg Veichtlbauer at gmx.
>Georg, do you try to recieve your mails on your e-plus handy? The port does
>still not work properly, would you be so kind and shut it off?

Yes, you have a point here though i do not see the *exact* nature of
the problem. Two days ago I sent a mail to unsubscribe and
subscribe again (because of a change in provider) and I got 
back the following: (quote)

   ----- The following addresses had permanent fatal errors -----
<bero@bero-online.ml.org>

   ----- Transcript of session follows -----
550 <bero@bero-online.ml.org>... Host unknown (Name server: bero-online.ml.org: host not found)
Reporting-MTA: dns; mailserver.stads.net
Received-From-MTA: DNS; Cable185.226.eneco.bart.nl
Arrival-Date: Thu, 25 Mar 1999 14:01:40 +0100

(end quote)


The weird thing is that after my first subscribtion I received a 
similar answer, but I got subscripted nevertheless!

Regards,

JH



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:34 1999
Return-Path: <vware@gmx.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QYIk-00NTiiC>; Fri, 26 Mar 1999 16:13:38 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA07356; Fri, 26 Mar 1999 16:07:48 +0100
From: Georg Veichtlbauer <vware@gmx.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBB3CE.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Fri, 26 Mar 1999 16:07:41 +0100 (MET)
X-Authenticated-Sender: #0000929469@gmx.net
X-Authenticated-IP: [193.170.119.163]
X-Mailer: WWW-Mail 1.5 (Global Message Exchange)
X-Flags: 0001
Subject: [GFA] Network II
X-UIDL: 32ad954ebfd3bb9fdc6cce76f2232671
Status: RO

OK...
I CAN NOT use a fixed Network drive because many users will work on the
computer and I want to protect the system as good as possible.
The network is Twisted Pair, the protocol is TCP/IP. There are several
users connected, all have their given IP- adress.

I pray for a solution... :-)
Georg

---
Sent through Global Message Exchange - http://www.gmx.net

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:34 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QYcl-00NTY6C>; Fri, 26 Mar 1999 16:34:19 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA07438; Fri, 26 Mar 1999 16:30:40 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBB91F.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 16:32:00 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] ChangeSystemColors() ???

X-UIDL: c51dfb3541c384ba68ffa06b894c8a54
Status: RO

Hi User,

Try to work right with the API function SetSysColors() with the
right definition of this function.

void SetSysColors(cDspElements, lpnDspElements, lpdwRgbValues)

int cDspElements; /* number of elements to change */
const int FAR* lpnDspElements; /* address of array of elements */
const COLORREF FAR* lpdwRgbValues; /* address of array of RGB values */


The SetSysColors function sets the system colors for one or more display
elements. Display elements are the various parts of a window and the Windows
background that appear on the screen.
The SetSysColors function sends a WM_SYSCOLORCHANGE message to all windows
to inform them of the change in color. It also directs Windows to repaint
the affected portions of all currently visible windows.

Parameter Description

cDspElements Specifies the number of display elements in the array pointed
to by the lpnDspElements parameter.
lpnDspElements Points to an array of integers that specify the display
elements to be changed. For a list of possible display elements, see the
following Comments section.
lpdwRgbValues Points to an array of unsigned long integers that contains the
new RGB (red-green-blue) color value for each display element in the array
pointed to by the lpnDspElements parameter.

Returns

This function does not return a value.

Comments

The SetSysColors function changes the current Windows session only. The new
colors are not saved when Windows terminates.

Following are the display elements that may be used in the lpnDspElements
array:

Value Meaning

COLOR_ACTIVEBORDER Active window border.
COLOR_ACTIVECAPTION Active window title.
COLOR_APPWORKSPACE Background color of multiple document interface (MDI)
applications.
COLOR_BACKGROUND Desktop.
COLOR_BTNFACE Face shading on push buttons.
COLOR_BTNHIGHLIGHT Selected button in a control.
COLOR_BTNSHADOW Edge shading on push buttons.
COLOR_BTNTEXT Text on push buttons.
COLOR_CAPTIONTEXT Text in title bar, size button, scroll-bar arrow button.
COLOR_GRAYTEXT Grayed (dimmed) text. This color is zero if the current
display driver does not support a solid gray color.

COLOR_HIGHLIGHT Background of selected item in a control.
COLOR_HIGHLIGHTTEXT Text of selected item in a control.
COLOR_INACTIVEBORDER Inactive window border.
COLOR_INACTIVECAPTION Inactive window title.
COLOR_INACTIVECAPTIONTEXT Color of text in an inactive title.
COLOR_MENU Menu background.
COLOR_MENUTEXT Text in menus.
COLOR_SCROLLBAR Scroll-bar gray area.
COLOR_WINDOW Window background.
COLOR_WINDOWFRAME Window frame.
COLOR_WINDOWTEXT Text in windows.

Example

The following example changes the window background to black and the text in
the window to green:

int aiDspElements[2];
DWORD aRgbValues[2];

aiDspElements[0] = COLOR_WINDOW;
aRgbValues[0] = RGB(
    0x00,   /* red   */
    0x00,   /* green */
    0x00);  /* blue  */
aiDspElements[1] = COLOR_WINDOWTEXT;
aRgbValues[1] = RGB(
    0x00,   /* red   */
    0xff,   /* green */
    0x00);  /* blue  */
SetSysColors(2, aiDspElements, aRgbValues);

You don't need a FOR NEXT Loop, only two arrays.

Eberhard

You wrote at Freitag, 26. Mrz 1999 14:51
Betreff: [GFA] ChangeSystemColors() ???


>Hy GFA-Users
>
>I have a little prob by changing the Systempallette (Colors 0 to 18) ! I
>handle it as follows:
>
>DIM rgbalt%(18),rgbneu%(18),index%(18)
>FOR i|=0 to 18
> index%(i|)=i|
> rgbalt%(i|)=GetSysColor(i|) // Get original Colors and save them
>NEXT i|
>//
>.. reading new entries from File and save them in rgbneu%()
>//
>~SetSysColors(19,V:index%(0),rgbneu%(0))
>..
>
>And now the Problem. If i do this so, only the Palette-Entries from Color 2
to
>9
>will be changed. But not with the right Colors ! The Entries will be as
>follows:
>Color 3 in Color 2, Color 5 in Color 3, Color 7 in Color 4, Color 9 in
Color
>5, Color 11 in Color 6, Color 13 in Color 7, Color 15 in Color 8, color 17
in
>Color 9 and Color 18 in Color 1 !!! Whats the Problem ???
>
>If i change the Entries as follows
>..
>FOR i|= 0 TO 18
> ~SetSysColors(1,V:index%(i|),V:rgbneu%(i|))
>NEXT i|
>..
>it will be done right ! The Problem here is only the Time it needs!
>
>How I can change Systemcolors right and fast ?
>
>Thanks for thinking about it
>Thomas Elfert
>TecBerlin@aol.com
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:35 1999
Return-Path: <jhorikx@stads.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QYyC-00NTY6C>; Fri, 26 Mar 1999 16:56:28 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id QAA07502; Fri, 26 Mar 1999 16:51:34 +0100
From: Jos Horikx <jhorikx@stads.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBBE05.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: jhorikx@mail.stads.net
X-Mailer: Windows Eudora Light Version 1.5.4 (32)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 26 Mar 1999 16:51:27 +0100
Subject: Re: [GFA] Quickie!
X-UIDL: 55fe342867b5d9b27dd718363a755692
Status: RO

At 09:13 26-3-99 -0500, John Findlay wrote o.a.:
>Does anyone know what 'Incr' is in PowerBasic?

"incr"  means increment

so, if x= 1234 and when you say: "incr x"
then it means that x= 1235 afterwards

(There also exists a decr... :-)

Kind regards,
JH


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:35 1999
Return-Path: <BrentDeck@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QZGl-00NT2jC>; Fri, 26 Mar 1999 17:15:39 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id RAA07570; Fri, 26 Mar 1999 17:11:56 +0100
From: BDD <BrentDeck@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBC2CF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 11:11:04 -0500
Sender: BDD <BrentDeck@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Quickie!
X-UIDL: 9c357843868bfb9d68c36a4d14685a31
Status: RO


Does anyone know what 'Incr' is in PowerBasic?

John,

incr x    //  same as x+=1,   x++,      INC x

incr x,5    // same as x+=5


Brent

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:38 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qa1F-00NT2hC>; Fri, 26 Mar 1999 18:03:41 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA07794; Fri, 26 Mar 1999 18:01:29 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBCE64.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 08:58:32 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] RE: Mailinglist problems .... help
X-UIDL: cc2eebef3b5300e301986c9d3b3e6f51
Status: RO

Joe, Dale has nothing to do with the GFA mail list. What do you mean?

----- Original Message -----
From: EDV-Service J. Hurst, Berlin <JoeHurst@snafu.de>
To: <gfabasic@aachen.linux.de>
Sent: Friday, March 26, 1999 6:05 AM
Subject: [GFA] RE: Mailinglist problems .... help


>Hi!
>In the last days, I get very often mails which are
>a) double or
>b) not delivered.
>
>Point a): is something Dale should check.
>Point b): One of the guys who is always involved is Georg Veichtlbauer at
gmx.
>Georg, do you try to recieve your mails on your e-plus handy? The port does
>still not work properly, would you be so kind and shut it off?
>
>Bye, Joe
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:38 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qa8T-00NT2mC>; Fri, 26 Mar 1999 18:11:09 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA07842; Fri, 26 Mar 1999 18:08:55 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBD021.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 09:06:05 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] RE: Mailinglist problems .... help
X-UIDL: 4223620cc7f53815954cb3f620fd4320
Status: RO

I think that everyone is probably getting this.  I just ignore and delete.
Dale

----- Original Message -----
From: Jos Horikx <jhorikx@stads.net>
To: <gfabasic@aachen.linux.de>
Sent: Friday, March 26, 1999 6:15 AM
Subject: Re: [GFA] RE: Mailinglist problems .... help


>At 15:05 26-3-99 +0100, EDV-Service J. Hurst, Berlin wrote o.a.:
>
>>In the last days, I get very often mails which are
>>a) double or
>>b) not delivered.
>
>>Point a): is something Dale should check.
>>Point b): One of the guys who is always involved is Georg Veichtlbauer at
gmx.
>>Georg, do you try to recieve your mails on your e-plus handy? The port
does
>>still not work properly, would you be so kind and shut it off?
>
>Yes, you have a point here though i do not see the *exact* nature of
>the problem. Two days ago I sent a mail to unsubscribe and
>subscribe again (because of a change in provider) and I got
>back the following: (quote)
>
>   ----- The following addresses had permanent fatal errors -----
><bero@bero-online.ml.org>
>
>   ----- Transcript of session follows -----
>550 <bero@bero-online.ml.org>... Host unknown (Name server:
bero-online.ml.org: host not found)
>Reporting-MTA: dns; mailserver.stads.net
>Received-From-MTA: DNS; Cable185.226.eneco.bart.nl
>Arrival-Date: Thu, 25 Mar 1999 14:01:40 +0100
>
>(end quote)
>
>
>The weird thing is that after my first subscribtion I received a
>similar answer, but I got subscripted nevertheless!
>
>Regards,
>
>JH
>
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:39 1999
Return-Path: <adbryant@email.msn.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QaIh-00NTXZC>; Fri, 26 Mar 1999 18:21:43 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id SAA07896; Fri, 26 Mar 1999 18:19:34 +0100
From: "Dale Bryant" <adbryant@email.msn.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBD2B0.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 09:16:40 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0810.800
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0810.800
Subject: Re: [GFA] Limits of CLIPCOPY
X-UIDL: 49b859ae1569fe71ee9c93d8a1c6dfc1
Status: RO

Yes, it works great. A nice routine for the GFAWHELP file.
Thomas WHO?

----- Original Message -----
From: Verwaltung des VPH, Bensberg <verwaltung@vph-bensberg.de>
To: <gfabasic@aachen.linux.de>
Sent: Friday, March 26, 1999 12:20 AM
Subject: AW: [GFA] Limits of CLIPCOPY


>Hi Juergen!
>
>I use the following to send "everything" from one application to an
>other by using the clipboard:
>
>  dummi& = GlobalAlloc(GHND,512) // ,Anzahl der Zeichen
>  adresse% = GlobalLock(dummi&) // Speicheradresse reservieren ...
>  CHAR{adresse%}=wert$ // Wert an Speicheradresse schreiben
>  ' Clipboardfunktion ...
>  CLRCLIP // Clipboard leeren
>  CLIPFORMAT CF_TEXT
>  CLIPCOPY adresse%,LEN(wert$)
>  ' "normales" auslesen ...
>  daten$ = CHAR{adresse%} // Wert zurcklesen
>  ~GlobalUnlock(dummi&) // danach Speicher unlocken ...
>  ~GlobalFree(dummi&) // ... und wieder freigeben!
>
>I hope that this will help. I use it in a different way and so I do
>not have tested it. But I believe that it will work.
>
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:39 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from mail.fu-berlin.de (160.45.11.165) with esmtp
	  id <m10QbxR-00NQXxC>; Fri, 26 Mar 1999 20:07:53 +0100 (MET)
Received: by mail.fu-berlin.de (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QbuH-00acfzC>; Fri, 26 Mar 1999 20:04:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id TAA08114; Fri, 26 Mar 1999 19:57:37 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBE9A7.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Fri, 26 Mar 1999 18:50:54 +0100
In-Reply-To: <36FBB3CE.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: Re: [GFA] Network II
X-UIDL: d305e4624b86c21fc47ca0a127d89230
Status: RO

At 16:07 26.03.99 +0100, Georg Veichtlbauer wrote:

>I CAN NOT use a fixed Network drive because many users will work on the
>computer and I want to protect the system as good as possible.

Why not use a ramdisk for the shared data? I am using this in a network
with Windows NT servers and clients. Just give the clients access to the
ramdrive. Usually you don't need much memory, so the server can handle it
without any problems. I use ramdisk.zip from microsoft.


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:40 1999
Return-Path: <J.Burgmeier@t-online.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qc0X-00NRHZC>; Fri, 26 Mar 1999 20:11:05 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA08149; Fri, 26 Mar 1999 20:07:47 +0100
From: J.Burgmeier@t-online.de (Juergen Burgmeier)
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBEBFD.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 20:07:28 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3155.0
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
X-Sender: 333200002801-0001@t-online.de
Subject: Re: [GFA] Limits of CLIPCOPY

X-UIDL: 29a9866ac624dd516511251d482f335c
Status: RO

Hi Thomas,
Thanks for your routine. I have just tested it with wert$ = string$(32,"*").
Result: Notepad doesn't paste anything and Word97 adds something.

Meanwhile I found an appropriate and simple way to "clipcopy" a
given string without any changes.
One has to ensure that the clipboard content is terninated by CHR$(0)
in any case - as I learned from Joe's response.

CHAR$(0) has to be appended to the string always before clipcopying
or just if the string length is a multiple of 32.
This works fine with the original GFA commands on Win98 and NT.
Bye, Juergen

-----Ursprngliche Nachricht-----
Von: Verwaltung des VPH, Bensberg <verwaltung@vph-bensberg.de>
Datum: Freitag, 26. Mrz 1999 14:49
Betreff: AW: [GFA] Limits of CLIPCOPY


Hi Juergen!
I use the following to send "everything" from one application to an
other by using the clipboard:
  dummi& = GlobalAlloc(GHND,512) // ,Anzahl der Zeichen
  adresse% = GlobalLock(dummi&) // Speicheradresse reservieren ...
  CHAR{adresse%}=wert$ // Wert an Speicheradresse schreiben
  CLRCLIP // Clipboard leeren
  CLIPFORMAT CF_TEXT
  CLIPCOPY adresse%,LEN(wert$)
    daten$ = CHAR{adresse%} // Wert zurcklesen
  ~GlobalUnlock(dummi&) // danach Speicher unlocken ...
  ~GlobalFree(dummi&) // ... und wieder freigeben!
.....


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:40 1999
Return-Path: <funck@hildesheim.sgh-net.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qc2n-00NTXZC>; Fri, 26 Mar 1999 20:13:25 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA08176; Fri, 26 Mar 1999 20:10:00 +0100
From: "Eberhard Funck" <funck@hildesheim.sgh-net.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBEC81.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 20:10:12 +0100
MIME-Version: 1.0
Content-Type: text/plain;
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] Limits of CLIPCOPY

X-UIDL: 1c336aea6243dd3a3afae8ed49308a71
Status: RO

Hi all Clipboard user,
If you need the lines above, than
you must learn somethink about the clipboard.

If you copy text or DIBs to clipboard,
you must allocate global memory.
GFA: with MALLOC()
API: with GlobalAlloc()


You must deliver only
GFA: the pointer to this memory
API: the handle to this global memory object.

After ending the application, it is not allowed
to free this memory, because it's also for another
applications. With CLRCLIP you free this memory
automaticly.

The right way:
GFA:
' clear clipboard and free memory
CLRCLIP
CLIPFORMAT CF_TEXT
'
lpMem% = MALLOC( 512)
~lstrcpy (lpMem%, wert$)
'
CLIPCOPY lpMem%,LEN(wert$)
'
finish you program, or not
'
' read clipbaord data
CLIPFORMAT CF_TEXT
CLIPPASTE lpMem%, len%
wert$ = CHAR{lpMem%}

API function:
IF OpenClipBoard (WIN(1))
  ~EmptyClipboard()
   hGlobal& = GlobalAlloc (GMEM_SHARE, 512)
   lpMem% = GlobalLock (hGlobal&)
   ~lstrcpy (lpMem%, wert$)
   ~SetClipboardData (CF_TEXT, hGlobal&)
   ~GlobalUnlock (hGlobal&)
   ~CloseClipboard ()
ENDIF
'
finish your apps or not
'
IF OpenClipboard (WIN(1))
   hGlobal& = GetClipboardData (CF_TEXT)
   lpMem% = GlobalLock (hGlobal&)
   wert$ = CHAR{lpMem%}
   ~CloseClipboard ()
ENDIF


Freitag, 26. Mrz 1999 14:48
Betreff: AW: [GFA] Limits of CLIPCOPY

Eberhard

>Hi Juergen!
>
>I use the following to send "everything" from one application to an
>other by using the clipboard:
>
>  dummi& = GlobalAlloc(GHND,512) // ,Anzahl der Zeichen
>  adresse% = GlobalLock(dummi&) // Speicheradresse reservieren ...
>  CHAR{adresse%}=wert$ // Wert an Speicheradresse schreiben
>  ' Clipboardfunktion ...
>  CLRCLIP // Clipboard leeren
>  CLIPFORMAT CF_TEXT
>  CLIPCOPY adresse%,LEN(wert$)
>  ' "normales" auslesen ...
>  daten$ = CHAR{adresse%} // Wert zurcklesen
>  ~GlobalUnlock(dummi&) // danach Speicher unlocken ...
>  ~GlobalFree(dummi&) // ... und wieder freigeben!
>
>I hope that this will help. I use it in a different way and so I do
>not have tested it. But I believe that it will work.
>
>Thomas
>
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org
>



---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:41 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qc82-00NTXiC>; Fri, 26 Mar 1999 20:18:50 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA08227; Fri, 26 Mar 1999 20:15:47 +0100
From: "EDV-Service J. Hurst, Berlin" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBEDDF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 20:19:27 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36FBA7A5.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] Quickie!
X-UIDL: a7192a8dc9df288bbf5e6c0841200b2d
Status: RO

> Does anyone know what 'Incr' is in PowerBasic?
The same as INC in GFA-BASIC 16.

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:41 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qc7f-00NT2jC>; Fri, 26 Mar 1999 20:18:27 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id UAA08233; Fri, 26 Mar 1999 20:15:54 +0100
From: "EDV-Service J. Hurst, Berlin" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBEDE3.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 20:19:24 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36FBB3CE.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] Network II
X-UIDL: cad50384ce71373433fddf8d59a4a810
Status: RO

> I CAN NOT use a fixed Network drive because many users will work on the
> computer and I want to protect the system as good as possible.
No, that was not what I wanted to say: In a network there is usually always one
fixed drive: the "public"-directory on the server. So why not use that?

> The network is Twisted Pair, the protocol is TCP/IP. There are several
> users connected, all have their given IP- adress.
That's the second part of my first question: you do tcp/ip in GB?

> I pray for a solution... :-)
I hope that someone has one. I would like to get your knowledge of network<>gb.

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:42 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qd0q-00NQXxC>; Fri, 26 Mar 1999 21:15:28 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA08412; Fri, 26 Mar 1999 21:12:35 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBFB34.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 15:12:19 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] Quickie!
X-UIDL: 3a262252fb99f6aa3824268f465640cd
Status: RO


>incr x    //  same as x+=1,   x++,      INC x
incr x,5    // same as x+=5<

Thanks Brent,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:42 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qd1K-00NT34C>; Fri, 26 Mar 1999 21:15:58 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA08419; Fri, 26 Mar 1999 21:13:49 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBFB76.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Fri, 26 Mar 1999 15:12:26 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] Quickie!
X-UIDL: 8803130e0487f53d005f456541067570
Status: RO

Thanks JH,

>so, if x= 1234 and when you say: "incr x"
then it means that x= 1235 afterwards<

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:46 1999
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QdIb-00NQXxC>; Fri, 26 Mar 1999 21:33:49 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA08519; Fri, 26 Mar 1999 21:31:24 +0100
From: Reuben <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBFF95.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
Date: Sat, 27 Mar 1999 07:28:51 +1000
Organization: RMC
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <36FBA7A5.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Quickie!
X-UIDL: 6cb7b89e51057239ae4740e77e132b22
Status: RO

Hi John,

Don't know Powerbasic but I would guess it means INCREMENT.

Of course I could be wrong, I am frequently!


Reuben

John Findlay wrote:

> Does anyone know what 'Incr' is in PowerBasic?
>
> Thanks,
>
> John
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org



--
==========================================================================

                         You cannot discover new oceans unless
                    you have the courage to lose sight of the shore.
==========================================================================




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:47 1999
Return-Path: <softprod@hartingdale.com.au>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QdIf-00NSqQC>; Fri, 26 Mar 1999 21:33:53 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id VAA08516; Fri, 26 Mar 1999 21:31:19 +0100
From: Reuben <softprod@hartingdale.com.au>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FBFF90.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Mar 1999 07:28:51 +1000
Organization: RMC
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
Cc: gfabasic@aachen.linux.de
References: <36FBA7A5.BeroList-2.5.9@aachen.linux.de>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Subject: Re: [GFA] Quickie!
X-UIDL: 622baa8c8a21d46432b964b0cca6f99f
Status: RO

Hi John,

Don't know Powerbasic but I would guess it means INCREMENT.

Of course I could be wrong, I am frequently!


Reuben

John Findlay wrote:

> Does anyone know what 'Incr' is in PowerBasic?
>
> Thanks,
>
> John
>
> ---
> This mailing list is currently running BeroList v2.5.6
> Report problems to bero@bero-online.ml.org



--
==========================================================================

                         You cannot discover new oceans unless
                    you have the courage to lose sight of the shore.
==========================================================================




---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:47 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qnh6-00NSTdC>; Sat, 27 Mar 1999 08:39:48 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id IAA09976; Sat, 27 Mar 1999 08:37:52 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FC9BDF.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 27 Mar 1999 08:32:33 +0100
In-Reply-To: <36FBFF95.BeroList-2.5.9@aachen.linux.de>
References: <36FBA7A5.BeroList-2.5.9@aachen.linux.de>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] QownSub.DLL: Bad news and good news!
X-UIDL: ee889e6c4cf44dce4b415101131d316d
Status: RO

Hi!

Ulrich Becker replied to my letter!

Bad news: V 1.0 is the latest version

Good news: I got the source

Good news: there is a 32 bit only version called BAPI.DLL
Bad News: This one has to toolbar functions

I will tell you more about it later.

BTW: Where can I send the source to? Dale?


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:47 1999
Return-Path: <michael-weigand@foni.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QoCH-00NSTUC>; Sat, 27 Mar 1999 09:12:01 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id JAA10072; Sat, 27 Mar 1999 09:10:34 +0100
From: Michael Weigand <michael-weigand@foni.net>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FCA376.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
X-Sender: michael-weigand@foni.net
X-Mailer: QUALCOMM Windows Eudora Light Version 3.0.6 (32)
Date: Sat, 27 Mar 1999 09:10:13 +0100
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Subject: [GFA] OwnSub.DLL: Mail from Ulrich Becker
X-UIDL: f360d08c3894d37e236d30d552f497f8
Status: RO

Hi!

I just translated the mail from Ulrich becker using AltaVistas translation
service:

--- cut here ---

Dear Mr. Weigand, 

thank you for your inquiry of 23.03.1999. 

Unfortunately we operate no longer to the OwnSub.dll. Therefore we send
also attaching the complete source text to you. An answer of your questions is
unfortunately only conditionally possible. We hope however that the source
text can answer your questions. 

To the functions LZDeCode and LZEnCode in the OwnSub.dll can I only say
that they run error free in this form in other programs for years. 

In the meantime there is a simplified form of the OwnSub.dll, the BAPI.dll.
Since we develop no more programs for Win 3.1x, we use only the internal
functions of Windows 95, 98 and NT, with which in the special complex
graphic functions are omitted.

The BAPI.dll worked in the meantime under Win 95 and Win 98 very well.
Under Win NT there are still some errors with the illustrated menus. The
BAPI.dll I also attached to this message. If you should find to error or
have improvement suggestions, we would be pleased about your message. 

We hope to have helped and remain you hereby 

Yours sincerely m.tek software 

Ulrich Becker 

--- cut here ---


M!chael


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:48 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10Qoyx-00NRHEC>; Sat, 27 Mar 1999 10:02:19 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA10210; Sat, 27 Mar 1999 10:01:02 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FCAF4A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Mar 1999 04:00:49 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: [GFA] RE: hInstance
X-UIDL: ca5dbfd87923750f1b9c6ca9d003c18b
Status: RO

Hi,

Predictably no answer from Sven!

Can anyone confirm what Sven said about the Instance handle in Win32.

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:48 1999
Return-Path: <JoeHurst@snafu.de>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QpVB-00NQXyC>; Sat, 27 Mar 1999 10:35:37 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA10323; Sat, 27 Mar 1999 10:34:24 +0100
From: "EDV-Service J. Hurst, Berlin" <JoeHurst@snafu.de>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FCB71A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Mar 1999 10:37:41 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook 8.5, Build 4.71.2377.0
Importance: Normal
In-Reply-To: <36FBCE64.BeroList-2.5.9@aachen.linux.de>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3155.0
Subject: RE: [GFA] RE: Mailinglist problems .... help
X-UIDL: 4281a12bbfde44528bd56535f3dcf847
Status: RO


> Joe, Dale has nothing to do with the GFA mail list. What do you mean?

THAT is what I call funny.
The sender is named as "Dale Bryant" in my eMail-program, but that sentence
above shows that Dale is not the sender. So: who is it?
What I mean: The "maker" of the mailinglist (not Dale?) surely has configuration
problems: mails by some (not by all) people come TWICE to me!

What I mean else: it is not neccessary to tell the users of the mailinglist that
mails could not be delivered to some users. Todays favorite: Sjouke Hamstra.
Seems that he reached no mail today, and I got three warnings that a mail to him
have not been delivered.

Bye, Joe


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:49 1999
Return-Path: <shamstra@dds.nl>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QpVE-00NRHEC>; Sat, 27 Mar 1999 10:35:40 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id KAA10325; Sat, 27 Mar 1999 10:34:25 +0100
From: "Sjouke Hamstra" <shamstra@dds.nl>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FCB71A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.07) id A525DC9101CE; Sat, 27 Mar 1999 10:30:13 +0100
Date: Sat, 27 Mar 1999 10:31:51 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] RE: hInstance
X-UIDL: 116f1595b2a2f746bb98ae79485b2690
Status: RO

Oops, getting a bit frustrated John?

Indeed, strictly spoken there isn't a handle as under Windows 3.1. However as
you pointed out yourself an instance handle is needed now and than. So, Win32
provides you with one, although it has the same value for each process
(0x4000000). Under Win32 processes are no longer identified by an instance
handle but by process IDs. The primary use of an instance handle is for
loading resources. The instance handle of executables and DLLs loaded by that
executable differ, and so the instance handle can be used identify and load
the appropriate resources.

In general resources are located by the instance handle as follows:

instance    resource
handle

NULL        system
0x400000  executable
other        DLL

Regards,
Sjouke

-----Original Message-----
From: John Findlay <Jayef@compuserve.com>
To: gfabasic@aachen.linux.de <gfabasic@aachen.linux.de>
Date: zaterdag, 27 maart, 1999 10:06
Subject: [GFA] RE: hInstance


>Hi,
>
>Predictably no answer from Sven!
>
>Can anyone confirm what Sven said about the Instance handle in Win32.
>
>John
>
>---
>This mailing list is currently running BeroList v2.5.6
>Report problems to bero@bero-online.ml.org


---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:49 1999
Return-Path: <shamstra@biotoop.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QpwP-00NSoqC>; Sat, 27 Mar 1999 11:03:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA10447; Sat, 27 Mar 1999 11:01:03 +0100
From: "Sjouke Hamstra" <shamstra@biotoop.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FCBD63.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
  (SMTPD32-4.07) id AB6C52610210; Sat, 27 Mar 1999 10:57:00 +0100
Date: Sat, 27 Mar 1999 10:58:51 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: Re: [GFA] RE: Mailinglist problems .... help
X-UIDL: b3bf40924a6430a190f33e2399fe5340
Status: RO

>>Todays favorite: Sjouke Hamstra.
Seems that he reached no mail today, and I got three warnings that a mail to
him
have not been delivered. <<

Well, that is correct. Due to severe ISP problems the biotoop.com domain isn't
operational for the time being. Yesterday I subscribed to the Mailing List
again using another e-mail address: shamstra@dds.nl.
I only forgot to unsubscribe the other e-mail address. I just did, so I hope
this will be past time now. Sorry.

Sjouke





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:50 1999
Return-Path: <shamstra@biotoop.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QpwP-00NSTUC>; Sat, 27 Mar 1999 11:03:45 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id LAA10446; Sat, 27 Mar 1999 11:01:03 +0100
From: "Sjouke Hamstra" <shamstra@biotoop.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FCBD5A.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@aachen.linux.de
  (SMTPD32-4.07) id AB6852610210; Sat, 27 Mar 1999 10:56:59 +0100
Date: Sat, 27 Mar 1999 10:51:07 +0100
MIME-Version: 1.0
Content-Type: text/plain;
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.72.3110.1
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Subject: [GFA] REMOVE
X-UIDL: 41651553fed18767434bd58c48d62c3c
Status: RO





---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Fri Apr 09 10:26:51 1999
Return-Path: <Jayef@compuserve.com>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from linux01.novocomp.de (194.120.166.67) with smtp
	  id <m10QrVo-00NSTUC>; Sat, 27 Mar 1999 12:44:24 +0100 (MET)
Received: from aachen.linux.de (microsoft.sucks.eu.org [198.22.51.242]) by linux01.novocomp.de (8.7.6/8.7.3) with SMTP id MAA10686; Sat, 27 Mar 1999 12:42:54 +0100
From: John Findlay <Jayef@compuserve.com>
Reply-To: gfabasic@linux.net.eu.org
Errors-To: gfabasic@aachen.linux.de
To: gfabasic@aachen.linux.de
Message-ID: <36FCD53B.BeroList-2.5.9@aachen.linux.de>
Delivered-To: gfabasic@linux.net.eu.org
Date: Sat, 27 Mar 1999 06:42:20 -0500
Sender: John Findlay <Jayef@compuserve.com>
MIME-Version: 1.0

Content-Type: text/plain; charset=ISO-8859-1
Content-Disposition: inline
Subject: Re: [GFA] RE: hInstance
X-UIDL: f86ab87b4b1e9db08fcfe669de7d70fb
Status: RO

Sjouke,

>Oops, getting a bit frustrated John?<

You understand I'm sure, Ha! Ha!

>>
However as you pointed out yourself an instance handle is needed now and
than. So, Win32 provides you with one, although it has the same value for
each process
(0x4000000). The primary use of an instance handle is for loading
resources.
<<

(0x4000000) one '0' to many; (0x400000) :-0

Thank you for the explanation.

    PCSTR buffer[20];
    wsprintf((LPSTR)buffer, "Value of hInstance %08hx", hInstance);
    MessageBox(NULL, (PCSTR)buffer, "Message", MB_OK);

Regards,

John

---
This mailing list is currently running BeroList v2.5.6
Report problems to bero@bero-online.ml.org

From ???@??? Sun May 09 17:21:46 1999
Return-Path: <majordomo-owner@gfa.net>
Received: by Mail.ZEDAT.FU-Berlin.DE (Smail3.2.0.98)
	  from gfa.net (192.41.14.251) with smtp
	  id <m10g5ie-00NUg7C>; Sat, 8 May 1999 13:56:36 +0200 (MEST)
Received: (gfa@localhost) by gfa.net (8.8.5) id NAA23591; Sat, 8 May 1999 13:56:34 +0200 (CEST)
Date: Sat, 8 May 1999 13:56:34 +0200 (CEST)
Message-Id: <199905081156.NAA23591@gfa.net>
To: alibaba@zedat.fu-berlin.de
From: majordomo@gfa.net
Subject: Majordomo results: subscribe
Reply-To: majordomo@gfa.net
X-UIDL: d5a249b0d4eda6fee99aa1800a95587c

--

**** No valid commands found.
**** Commands must be in message BODY, not in HEADER.

**** Help for majordomo@gfa.net:


This help message is being sent to you from the Majordomo mailing list
management system at majordomo@gfa.net.

This is version 1.94.4 of Majordomo.

If you're familiar with mail servers, an advanced user's summary of
Majordomo's commands appears at the end of this message.

Majordomo is an automated system which allows users to subscribe
and unsubscribe to mailing lists, and to retrieve files from list
archives.

You can interact with the Majordomo software by sending it commands
in the body of mail messages addressed to "majordomo@gfa.net".
Please do not put your commands on the subject line; Majordomo does
not process commands in the subject line.

You may put multiple Majordomo commands in the same mail message.
Put each command on a line by itself.

If you use a "signature block" at the end of your mail, Majordomo may
mistakenly believe each line of your message is a command; you will
then receive spurious error messages.  To keep this from happening,
either put a line starting with a hyphen ("-") before your signature,
or put a line with just the word

	end

on it in the same place.  This will stop the Majordomo software from
processing your signature as bad commands.

Here are some of the things you can do using Majordomo:

I.	FINDING OUT WHICH LISTS ARE ON THIS SYSTEM

To get a list of publicly-available mailing lists on this system, put the
following line in the body of your mail message to majordomo@gfa.net:

	lists

Each line will contain the name of a mailing list and a brief description
of the list.

To get more information about a particular list, use the "info" command,
supplying the name of the list.  For example, if the name of the list 
about which you wish information is "demo-list", you would put the line

	info demo-list

in the body of the mail message.

II.	SUBSCRIBING TO A LIST

Once you've determined that you wish to subscribe to one or more lists on
this system, you can send commands to Majordomo to have it add you to the
list, so you can begin receiving mailings.

To receive list mail at the address from which you're sending your mail,
simply say "subscribe" followed by the list's name:

	subscribe demo-list

If for some reason you wish to have the mailings go to a different address
(a friend's address, a specific other system on which you have an account,
or an address which is more correct than the one that automatically appears 
in the "From:" header on the mail you send), you would add that address to
the command.  For instance, if you're sending a request from your work
account, but wish to receive "demo-list" mail at your personal account
(for which we will use "jqpublic@my-isp.com" as an example), you'd put
the line

	subscribe demo-list jqpublic@my-isp.com

in the mail message body.

Based on configuration decisions made by the list owners, you may be added 
to the mailing list automatically.  You may also receive notification
that an authorization key is required for subscription.  Another message
will be sent to the address to be subscribed (which may or may not be the
same as yours) containing the key, and directing the user to send a
command found in that message back to majordomo@gfa.net.  (This can be
a bit of extra hassle, but it helps keep you from being swamped in extra
email by someone who forged requests from your address.)  You may also
get a message that your subscription is being forwarded to the list owner
for approval; some lists have waiting lists, or policies about who may
subscribe.  If your request is forwarded for approval, the list owner
should contact you soon after your request.

Upon subscribing, you should receive an introductory message, containing
list policies and features.  Save this message for future reference; it
will also contain exact directions for unsubscribing.  If you lose the
intro mail and would like another copy of the policies, send this message
to majordomo@gfa.net:

	intro demo-list

(substituting, of course, the real name of your list for "demo-list").

III.	UNSUBSCRIBING FROM MAILING LISTS

Your original intro message contains the exact command which should be
used to remove your address from the list.  However, in most cases, you
may simply send the command "unsubscribe" followed by the list name:

	unsubscribe demo-list

(This command may fail if your provider has changed the way your
address is shown in your mail.)

To remove an address other than the one from which you're sending
the request, give that address in the command:

	unsubscribe demo-list jqpublic@my-isp.com

In either of these cases, you can tell majordomo@gfa.net to remove
the address in question from all lists on this server by using "*"
in place of the list name:

	unsubscribe *
	unsubscribe * jqpublic@my-isp.com

IV.	FINDING THE LISTS TO WHICH AN ADDRESS IS SUBSCRIBED

To find the lists to which your address is subscribed, send this command
in the body of a mail message to majordomo@gfa.net:

	which

You can look for other addresses, or parts of an address, by specifying
the text for which Majordomo should search.  For instance, to find which
users at my-isp.com are subscribed to which lists, you might send the
command

	which my-isp.com

Note that many list owners completely or fully disable the "which"
command, considering it a privacy violation.

V.	FINDING OUT WHO'S SUBSCRIBED TO A LIST

To get a list of the addresses on a particular list, you may use the
"who" command, followed by the name of the list:

	who demo-list

Note that many list owners allow only a list's subscribers to use the
"who" command, or disable it completely, believing it to be a privacy
violation.

VI.	RETRIEVING FILES FROM A LIST'S ARCHIVES

Many list owners keep archives of files associated with a list.  These
may include:
- back issues of the list
- help files, user profiles, and other documents associated with the list
- daily, monthly, or yearly archives for the list

To find out if a list has any files associated with it, use the "index"
command:

	index demo-list

If you see files in which you're interested, you may retrieve them by
using the "get" command and specifying the list name and archive filename.
For instance, to retrieve the files called "profile.form" (presumably a
form to fill out with your profile) and "demo-list.9611" (presumably the
messages posted to the list in November 1996), you would put the lines

	get demo-list profile.form
	get demo-list demo-list.9611

in your mail to majordomo@gfa.net.

VII.	GETTING MORE HELP

To contact a human site manager, send mail to majordomo-owner@gfa.net.
To contact the owner of a specific list, send mail to that list's
approval address, which is formed by adding "-approval" to the user-name
portion of the list's address.  For instance, to contact the list owner
for demo-list@gfa.net, you would send mail to demo-list-approval@gfa.net.

To get another copy of this help message, send mail to majordomo@gfa.net
with a line saying

	help

in the message body.

VIII.	COMMAND SUMMARY FOR ADVANCED USERS

In the description below items contained in []'s are optional. When
providing the item, do not include the []'s around it.  Items in angle
brackets, such as <address>, are meta-symbols that should be replaced
by appropriate text without the angle brackets.

It understands the following commands:

    subscribe <list> [<address>]
	Subscribe yourself (or <address> if specified) to the named <list>.
	
    unsubscribe <list> [<address>]
	Unsubscribe yourself (or <address> if specified) from the named <list>.
	"unsubscribe *" will remove you (or <address>) from all lists.  This
	_may not_ work if you have subscribed using multiple addresses.

    get <list> <filename>
        Get a file related to <list>.

    index <list>
        Return an index of files you can "get" for <list>.

    which [<address>]
	Find out which lists you (or <address> if specified) are on.

    who <list>
	Find out who is on the named <list>.

    info <list>
	Retrieve the general introductory information for the named <list>.

    intro <list>
	Retrieve the introductory message sent to new users.  Non-subscribers
	may not be able to retrieve this.

    lists
	Show the lists served by this Majordomo server.

    help
	Retrieve this message.

    end
	Stop processing commands (useful if your mailer adds a signature).

Commands should be sent in the body of an email message to
"majordomo@gfa.net". Multiple commands can be processed provided
each occurs on a separate line.

Commands in the "Subject:" line are NOT processed.

If you have any questions or problems, please contact
"majordomo-owner@gfa.net".


