home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 2001 December
/
pcwk12201b.iso
/
Reklamy
/
CAD-Projekt
/
MegaCAD-4_5
/
CC
/
LEKCJA03.C_
/
LEKCJA03.C
Wrap
C/C++ Source or Header
|
1995-09-01
|
2KB
|
61 lines
/* LEKCJA03.C
//---------------------------------------------------------------------------
Temat:
Wybór pliku i wywoêanie rozkazów MegaCAD
//---------------------------------------------------------------------------
Funkcje:
EXT(204) short GetFilename(
EXT(206) void MegaCMD(
//---------------------------------------------------------------------------
EXT(204) short GetFilename( //
char *title, // nazwa okna dialogowego
char *fname); // nazwa katalugu
Opis:
Funkcja pozwala u╛ytkownikowi wybraå plik poprzez wskazanie jego nazwy.
Wylistowane zostajÑ pliki umieszczone w katalogu 'fname'.
Return:
TRUE => po potwierdzeniu "ok"
FALSE => po wybraniu "powrót"
Przykêad wywoêania:
if(GetFilename("Wybór rysunku",fname))
//---------------------------------------------------------------------------
EXT(206) void MegaCMD( //
char *cmd); // rozkaz [argumenty]
Opis:
Funkcja pozwala wywoêaå rozkaz MegaCADa wraz z argumentami.
Lista rozkazów znajduje si⌐ w pliku 'funcnam.ini'.
Nie mo╛liwe jest wywoêanie aktywnego ju╛ rozkazu, to znaczy nie da si⌐
z poziomu interpretera wywoêaå rozkazu 'InterP'.
Przykêad wywoêania:
MegaCMD(buf);
*/
//---------------------------------------------------------------------------
#include "std.h"
#include "megatyp.h"
#include "megacad.h"
//---------------------------------------------------------------------------
short main(char *filename,char *args)
{
char fname[200];
char buf[200];
strcpy(fname,"C:\\MEGACAD\\PRT\\*.PRT");
if(GetFilename("Wybór rysunku",fname))
{
sprintf(buf,"%s%s","PrtLoad ",fname);
Message("wykonany zostanie rozkaz:",
buf,NULL,NULL,"ok",3);
MegaCMD(buf);
}
return(0);
}
//---------------------------------------------------------------------------