home *** CD-ROM | disk | FTP | other *** search
- Path: mail2news.demon.co.uk!cliffe.demon.co.uk
- From: Steven Chapman <steve@cliffe.demon.co.uk>
- Newsgroups: comp.sys.amiga.programmer
- Subject: More
- Date: Sat, 20 Jan 96 17:49:21 GMT
- Message-ID: <9601201749.AA00046@cliffe.demon.co.uk>
- X-NNTP-Posting-Host: cliffe.demon.co.uk
- X-NewsSoftware: GRn 2.1 19/2/94 (PostNews Fix 31/3/95 Martin Hunt)
- MIME-Version: 1.0
- Content-Type: text/plain; charset=iso-8859-1
- Content-Transfer-Encoding: 8bit
- X-Mail2News-Path: relay-4.mail.demon.net!post.demon.co.uk!cliffe.demon.co.uk
-
-
-
- Thanks for the last lot of help but i am looking for something like this
- but when i try too compile it i get
-
- SAS/C Amiga Compiler 6.56
- Copyright (c) 1988-1995 SAS Institute Inc.
-
- ====================
- if(!(fh = fopen("T:xx", "w")))
- Work-1:Steve1.c 41 Warning 225: pointer type mismatch
- "BPTR" does not match "struct __iobuf *"
- Slink - Version 6.56
- Copyright (c) 1988-1995 SAS Institute, Inc. All Rights Reserved.
-
-
- SLINK Complete - Maximum code size = 5624 ($000015f8) bytes
-
- Final output file size = 6100 ($000017d4) bytes
-
-
- What i am trying too achive is too make a Front End for Amitcp
- like Control Panel but using ToolType's for the config and
- all output goes too a listview.
-
- THANKS for any help.
-
- ------------------------------------------------
-
-
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
-
- #include <dos/dos.h>
- #include <dos/dostags.h>
- #include <exec/exec.h>
- #include <intuition/intuition.h>
- #include <libraries/gadtools.h>
- #include <rexx/errors.h>
- #include <rexx/rexxio.h>
- #include <rexx/rxslib.h>
- #include <rexx/storage.h>
-
- #include <clib/dos_protos.h>
- #include <clib/exec_protos.h>
- #include <clib/intuition_protos.h>
- #include <clib/gadtools_protos.h>
- #include <clib/rexxsyslib_protos.h>
- #include <clib/alib_protos.h>
-
- #include <workbench/startup.h>
- #include <workbench/workbench.h>
- #include <workbench/icon.h>
- #include <clib/icon_protos.h>
-
- #define VERSION 37
-
- extern struct WBStartup *WBenchMsg;
-
- struct Library *IconBase;
-
- int main(int argc, char **argv)
- {
- struct WBArg *wbarg;
- struct DiskObject *dobj;
- UBYTE **tools,*textp;
- BPTR fh;
- LONG argnum;
-
- if(!(fh = fopen("T:xx", "w")))
- exit(10);
- IconBase = OpenLibrary((UBYTE *)"icon.library",VERSION);
- if(!IconBase) {
- Close(fh);
- exit(10);
- }
- wbarg = WBenchMsg->sm_ArgList;
- argnum = WBenchMsg->sm_NumArgs;
-
-
- dobj = GetDiskObject((UBYTE *)wbarg->wa_Name);
- tools = (UBYTE **)dobj->do_ToolTypes;
- textp = FindToolType(tools,(UBYTE *)"PROG");
-
- Execute (textp,0,fh);
- FreeDiskObject(dobj);
-
-
- CloseLibrary(IconBase);
- Delay(200);
- Close(fh);
-
- }
- -------------------------------------
-
- --
- =========================================================
- | Steven Chapman - steve@cliffe.demon.co.uk (Private ) |
- | Amiga 4000/030, Workbench 3.1, Kickstart 3, 1 Gig HD |
- | 4 meg Fast Ram, 2 Meg Chip Ram. |
- =========================================================
-
-