home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / delphi / imagelib / demoall.dp_ / demoall.dp
Text File  |  1995-11-19  |  2KB  |  85 lines
  1. (*
  2.  
  3. National and International Distributors of ImageLib
  4.  
  5. USA:
  6.  
  7. ZAC Catalogs
  8. Zachary Software Inc.
  9. Product #: 4260-01325
  10. 106 Access Road
  11. Norwood MA 02062
  12. Phone      (800) GO DELPHI
  13. Phone      (617) 551-0860
  14. FAX         (617) 551-0857
  15. CompuServe 74762,3663
  16.  
  17.  
  18. Germany, Austria and Switzerland:
  19.  
  20. K&R Software
  21. Darshovener Strasse 7
  22. D-50181 Bedburg
  23. Germany
  24. Phone  +49 - (0)2272-2887
  25. Phone  +49 - (0)2272-901966
  26. Fax      +49 - (0)2272-901585
  27. CompuServe 74777,3414 * GO KRSOFT
  28.  
  29.  
  30. Sweden
  31.  
  32. DATABITEN AB
  33. Box 115
  34. S81122 SandViken
  35. Sweden
  36. Phone +46 (0)26-256 493
  37. Fax     +46 (0)26-253 641
  38. CompuServe 100066,2606
  39.  
  40.  
  41. Great Britain
  42.  
  43. QBS Software Ltd.
  44. 10 Barley Mow Passage
  45. London  W44PH
  46. England
  47. Phone +44 181-994-4824
  48. Fax     +44 181-994-3441
  49. Internet Info@qbss.co.uk
  50.  
  51.  
  52. Spain
  53.  
  54. DanySoft Internacional
  55. Paseo de Albacete, 73
  56. 28700 San Sebastian de los Reyes
  57. Madrid Spain
  58. Phone +34 1 654 6298 or 1 651 7040
  59. Fax     +34 1 654 6382
  60. CompuServe 71774,1614
  61. Internet danysoft@stnet.es
  62.  
  63. More national and international distributors will be added soon.
  64. Send an e-mail describing your company if you want to become
  65. an ImageLib distributor.
  66. *)
  67.  
  68. program Demoall;
  69.  
  70. uses
  71.   Forms,
  72.   Udemo in 'UDEMO.PAS' {Form1},
  73.   Ufullscr in 'UFULLSCR.PAS' {FullSlide},
  74.   Uabout in 'UABOUT.PAS' {AboutBox};
  75.  
  76. {$R *.RES}
  77. {$R skyline.res}
  78.  
  79. begin
  80.   Application.CreateForm(TForm1, Form1);
  81.   Application.CreateForm(TFullSlide, FullSlide);
  82.   Application.CreateForm(TAboutBox, AboutBox);
  83.   Application.Run;
  84. end.
  85.