--------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAH00004 Date: 06/10/96 From: GARY WEINFURTHER Time: 08:52am \/To: STUART FOX (Read 4 times) Subj: using functions/procedures from diff cod08:52:0606/10/96 stuart fox mentioned this to all: sf> I have a function and a procedure that I'd like available to all forms n sf> the current project - these two bits of code are in their own .pas file, sf> and have been added to the project, however when I attempt to call the sf> function/procedure in the .pas file from a form, it cannot find the sf> function or procedure. You have to copy the header of your functions to the interface section of their unit. ...Gary --- GoldED 2.41 * Origin: The Flying Circus BBS, Farmington Hills, MI. (1:2410/905) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAH00005 Date: 06/11/96 From: MATHEAS MANSSEN Time: 07:42pm \/To: STUART FOX (Read 3 times) Subj: using functions/procedures from diff cod19:42:0206/11/96 Hello stuart, zondag 09 juni 1996, stuart fox writes to all: sf> I've added the .pas file containing the procedure and function to the sf> 'uses' list, but I'm sure I'm missing something obvious... Did you mention the function name in de interface part of the unit? unit xyz; interface procedure myproc(a:integer); implementation; procedure myproc(a:integer); begin a:=a; (* very usefull *) end; unit abc; uses xyz; ... Now you can use myproc from the other unit. Nice isn't it? sf> + Origin: I think that would be quite nice, sir (3:635/727.17) CYa, Matheas (M.S.L.F.Manssen@wing.rug.nl) --- FMail/386 1.02 * Origin: Ichthus bbs (2:283/218.133) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAH00006 Date: 06/11/96 From: HANS TAP Time: 12:30am \/To: ALL (Read 3 times) Subj: delphi emptytable method I have the following problem: when I use the EmptyTable method I receive a message: Table is busy. I can't find what it is. It this a bug (I user Delphi Developer version 2) or what can be wrong? I used the following: with Table2 do begin Active := False; DatabaseName := 'tijdreg'; TableName := 'tijdgoed'; TableType := ttParadox; EmptyTable; Active := True; Greetings, Hans Tap --- Opus-CBCS 1.14 * Origin: Blaise BBS: Home of Dutch Pascal user group (2:281/613.0) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAH00007 Date: 06/12/96 From: BRYAN SMITH Time: 01:06pm \/To: PETER ZICARI (Read 3 times) Subj: Uses "unit" On 11 Jun 96 Peter Zicari said to Steve Batson... PZ> I've noticed as I pull together my first Windows projects that they're PZ> about six times the size of my biggest DOS project. One step in the learning curve of Windows programming is to convince yourself that nobody cares about the size of your programs any more. Everybody has a Gig. disk (or will soon buy one) ! Back in the early days, when the entire system had to fit on a 360K floppy, I remember sweating blood to shrink a program down below the disk allocation unit size (1024 bytes). But those days are gone. Hardware prices keep falling, and nowadays the most expensive component of a computer systems is usually the programmers' time. So if the cost of saving programmer time is a larger program, you bite the bullet. PZ> where PZ> is it written that EVERYTHING has to have menu bar, pop up menus, PZ> radiobutton dialogs, edit dialogs and so on? It is because a significant portion of the population now understands the Windows idiom. I used to be a Windows non-believer, but "in response to public demand", I provided a Windows interface to a suite of DOS programs. Watching the users almost instinctive reaction to it made a believer out of me. Note - if you are still keen to keep program size down at the cost of programming convenience and some screen ugliness, read Francois Piette's "Hello World" post dated 07-Jun-96. Then try using just WINAPI calls. --- PPoint 2.00 * Origin: Kingston, Canada (1:249/109.11) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAI00000 Date: 06/09/96 From: PETER COLLIS Time: 07:37pm \/To: GERARD GERRITSEN (Read 4 times) Subj: Pascal Books -= Pete Replied to Gerard Gerritsen about: Pascal Books =- G'day Gerard GG> I do not know if Borland will ever come with a Delphi for OS/2 GG> Right now there are two companies working on a delphi equivilant GG> for OS/2. PC> I'm not a OS/2 user myself but it seems to me OS/2 lacks easy to PC> use development tools. GG> Depends on what you call easy. At the moment I can compile GG> delphi programs ( as long as they do not use visual controls ) GG> But I can use the unit classes, sysutils etc. Cardinals, GG> currency are also supported. Well from what i'm lead to believe Borland has an object pascal for OS/2 so it struck me as strange that they hadn't taken the extra step and released a Delphi for OS/2 GG> And there is already an alpha available of a delphi look alike ( GG> it is deadslow but at least it works a bit ) good to see someone on the ball. -=Pete=- --- OMX/Blue Wave v2.12 * Origin: Gates of Hell (3:713/914.16) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAI00001 Date: 06/09/96 From: PETER COLLIS Time: 08:02pm \/To: EEF HARTMAN (Read 4 times) Subj: Delphi RAM Requirements -= Pete Replied to Eef Hartman about: Delphi RAM Requirements =- G'day Eef EH> To be exact: EH> Windows 3.0 had three modes: EH> real mode: runs on XT (needs 640 KB) EH> standard mode: runs on AT or higher with at least 256 KB XMS EH> 386 enhanced: runs on 386 and higher with at least 1 MB of XMS EH> In 3.1 the "real mode" isn't there anymore, but it still does EH> standard and 386 enhanced. EH> Windows for Workgroups, on the other hand, only runs in 386 EH> enhanced mode or if you know the secret switch /D:T to put WFW311 into std mode. -=Pete=- --- OMX/Blue Wave v2.12 * Origin: Gates of Hell (3:713/914.16) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAI00002 Date: 06/10/96 From: PETER COLLIS Time: 02:05pm \/To: STUART FOX (Read 4 times) Subj: using functions/procedures from diff cod14:05:5406/10/96 -= Pete Replied to stuart fox about: using functions/procedures from diff code window =- G'day stuart sf> I have a function and a procedure that I'd like available to all sf> forms in the current project - these two bits of code are in sf> their own .pas file, and have been added to the project, however sf> when I attempt to call the function/procedure in the .pas file sf> from a form, it cannot find the function or procedure. sf> I've added the .pas file containing the procedure and function sf> to the 'uses' list, but I'm sure I'm missing something sf> obvious... Anyone care to shed any light for me? Thanks. You have to add function/procedure profiles to the interface section of the pas file. function myFunction(s:string): string; procedure myProcedure(s:string); -=Pete=- --- OMX/Blue Wave v2.12 * Origin: Gates of Hell (3:713/914.16) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAI00003 Date: 05/26/96 From: BEN MC CALL Time: 03:33am \/To: ALL (Read 5 times) Subj: Where to get example code? Hello every one, Im looking for delphi examples to pull apart and hopefully learn from. I have used Turbo C to create a simple 16 color drawing prg that uses the mouse, i would like to find a Delphi equivalent of this for example. I am in Australia Vic and do have internet access so a site would be nice. Thanks All, Ben ... It's not hard to meet expenses, they're everywhere. --- * Origin: Melbourne PC User Group +61-3-9699-6788 (3:632/309) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAI00004 Date: 06/10/96 From: GEORGE DRAGICEVIC Time: 04:17pm \/To: ALL (Read 5 times) Subj: RegisterClasses Hi I'm new to Delphi programming and have several books on the language. I've been attempting several simple database programs from these texts and often get the error message on running "call to RegisterClass incorrect or missing" Could someone please explain thiis error to me as I can find no reference to this error anywhere. TIA. George --- * Origin: Melbourne PC User Group BBS (3:632/309) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DAI00005 Date: 06/13/96 From: HELMUT KRAL Time: 06:57am \/To: ALLE (Read 5 times) Subj: V1: Probs ueber Probs mit TTable.CreateT06:57:0006/13/96 Servus Alle! Am Mittwoch Mai 29 1996 02:25, Helmut Kral griffelte an Alle folgende Zeilen: HK> zu meinen Probs zu finden. Koennt Ihr mir bitte sagen wie das genau geht HK> oder ob es ueberhaupt geht? HK> Folgendes: HK> Ich moechte in meinem Prog. (also zur Laufzeit) eine neue Tabelle anlegen, HK> die folgendes Aussehen haben soll: HK> Feldname Typ Groesse Index HK> 1 Eintrag + * HK> 2 Titel A 50 HK> 3 Interpret A 50 HK> 4 Nummer A 10 HK> 5 Verweis I HK> Die Felder 2, 3, 4 mssen eine Eingabe bekommen. HK> Das Feld 5 soll einen Defaultwert '0' bekommen. HK> Dazu sollen noch nachstehende, aufsteigende Sekundrindexe erstellt HK> werden: HK> Name auf Felder HK> In Interpret HK> Nu Nummer HK> Ti Titel HK> Ti_In Titel, Interpret HK> Probs: HK> Fast alles! Das einzige, was ich schaffe ist eine Tabelle mit einen HK> Primaerindex auf 'Eintrag' zu erstellen, wobei das Feld 'Eintrag' nicht im HK> Typ 'Zaehler' erstellt werden kann. Auch ob eine Eingabe erforderlich ist, HK> bekomme ich noch auf die Reihe, aber dann ist es mit allen Schluss ... HK> Hier der Code, den ich gerade noch geschafft habe: da ich bis dato allein gelassen wurde, studierte ich nochmals alles durch. damit weiss ich jetzt zumindest einmal, wie man auch die Sekundaerindexe bekommt, das andere ist gleich geblieben ... HK> === Cut === HK> procedure TMonte.Neu1Click(Sender: TObject); HK> begin HK> with Table2 do HK> begin HK> DatabaseName := Table1.DatabaseName; HK> TableName := 'Test'; TableType := ttParadox; HK> with FieldDefs do HK> begin HK> Clear; HK> Add('Eintrag' , ftInteger, 0, False); HK> Add('Titel' , ftString , 50, True ); HK> Add('Interpret', ftString , 50, True ); HK> Add('Nummer' , ftString , 10, True ); HK> Add('Verweis' , ftInteger, 0, False); HK> end; HK> with IndexDefs do HK> begin HK> Clear; HK> Add('', 'Eintrag', [ixPrimary, ixUnique]); Add('Ti_In', 'Titel;Interpret', [ixCaseinsensitive]); Add('Ti' , 'Titel' , [ixCaseinsensitive]); Add('In' , 'Interpret' , [ixCaseinsensitive]); Add('Nu' , 'Nummer' , [ixCaseinsensitive]); HK> end; HK> CreateTable; HK> end; HK> end; HK> === Cut === HK> Zu sagen waere noch, dass sich sich die Doku bei der Add-Methode der HK> FieldDefs durch das fehlen des vierten Parameters auszeichnet ... Auch HK> finde ich nirgends einen 'ftCounter' o. ae., wie auch andere Sachen icht HK> ... Kann mir wirklich niemand weiterhelfen, wie ich: 1) am Feld 'Eintrag' einen Zaehler (+) bekomme, 2) am Feld 'Verweis' einen Vorgabewert definieren kann? Salut! Helmut --- GEcho 1.10/gamma * Origin: Fuck 'n out (2:310/81.69)