Скачиваний:
32
Добавлен:
25.04.2015
Размер:
5.92 Кб
Скачать
{ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ }
{ Unit ImportD.pas Compiler: Delphi2 }
{ 12.03.1999 }
{ Importdeklarationen thermophysikalischer Stoffdatenfunktionen }
{ aus der Bibliothek REF_CALC32.DLL. }
{ Hinweis: Die Bibliothek REF_CALC32.DLL sollte sich entweder im }
{ gleichen Ordner wie das ausfьhrbare Programm oder im }
{ Windows-System-Verzeichnis befinden. }
{ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ }

unit ImportD;

interface

{Declaration of Functions imported from REF_CALC.DLL }
{Deklaration der aus REF_CALC.DLL importierten Funktionen}

{0}
Function S_revision (var version: pChar) : WordBool;
stdcall; external 'ref_calc32.dll';
{1}
Function S_molmas (ref :pChar ; var mm : double): WordBool;
stdcall; external 'ref_calc32.dll';
{2}
Function S_freez (ref :pChar ; var Tf : double): WordBool;
stdcall; external 'ref_calc32.dll';
{3}
Function S_tc (ref :pChar ; var Tc : double): WordBool;
stdcall; external 'ref_calc32.dll';
{4}
Function S_pc (ref :pChar ; var pc : double): WordBool;
stdcall; external 'ref_calc32.dll';
{5}
Function S_vc (ref :pChar ; var vc : double): WordBool;
stdcall; external 'ref_calc32.dll';
{6}
Function S_p_b (ref: pChar ; T: double; var p: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{7}
Function S_p_d (ref: pChar ; T: double; var p: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{8}
Function S_t_b (ref: pChar ; p: double; var T_b: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{9}
Function S_t_d (ref: pChar ; p: double; var T_d: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{10}
Function S_v_l (ref: pChar ; T : double; var v_l: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{11}
Function S_v_v (ref: pChar ; T,p : double; var v_v: double ): WordBool;
stdcall; external 'ref_calc32.dll';

{12}
Function S_p_v_v (ref: pChar ; T,v : double; var p_v: double ): WordBool;
stdcall; external 'ref_calc32.dll';

{13}
Function S_t_v_v (ref: pChar ; p,v : double; var T_v: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{14}
Function S_h_l (ref: pChar ; T : double; var h_L: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{15}
Function S_h_v (ref: pChar ; T,p : double; var h_v: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{16}
Function S_h_v_v (ref: pChar ; T,v : double; var h_v: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{17}
Function S_s_l (ref: pChar ; T : double; var s_l: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{18}
Function S_s_v (ref: pChar ; T,p : double; var s_v: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{19}
Function S_s_v_v (ref: pChar ; T,v : double; var s_v: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{20}
Function S_f_entro (ref: pChar ; p,s : double; var f_entro: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{21}
Function S_f_entha (ref: pChar ; p,h : double; var f_entha: double ): WordBool;
stdcall; external 'ref_calc32.dll';
{22}
Function S_cp_l (ref: pChar ; T : double; var cp: double): WordBool;
stdcall; external 'ref_calc32.dll';
{23}
Function S_cv (ref: pChar ; T,p : double; var cv: double): WordBool;
stdcall; external 'ref_calc32.dll';
{24}
Function S_cv_v (ref: pChar ; T,v : double; var cv: double): WordBool;
stdcall; external 'ref_calc32.dll';
{25}
Function S_cp (ref: pChar ; T,p : double; var cp: double): WordBool;
stdcall; external 'ref_calc32.dll';
{26}
Function S_cp_v (ref: pChar ; T,v : double; var cp: double): WordBool;
stdcall; external 'ref_calc32.dll';
{27}
Function S_sigma_l (ref: pChar ; T: double; var sig_l: double): WordBool;
stdcall; external 'ref_calc32.dll';
{28}
Function S_lambda_l (ref: pChar ; T: double; var lam_l: double): WordBool;
stdcall; external 'ref_calc32.dll';
{29}
Function S_lambda_v (ref: pChar ; T,p : double; var lam_v: double): WordBool;
stdcall; external 'ref_calc32.dll';
{30}
Function S_kappa (ref: pChar ; T,p : double; var kap: double): WordBool;
stdcall; external 'ref_calc32.dll';
{31}
Function S_kappa_v (ref: pChar ; T,v : double; var kap: double): WordBool;
stdcall; external 'ref_calc32.dll';
{32}
Function S_vs (ref: pChar ; T,p : double; var vs: double): WordBool;
stdcall; external 'ref_calc32.dll';
{33}
Function S_visc_l (ref: pChar ; T: double; var visc_l: double): WordBool;
stdcall; external 'ref_calc32.dll';
{34}
Function S_visc_v (ref: pChar ; T,p : double; var visc_v: double): WordBool;
stdcall; external 'ref_calc32.dll';
{35}
Procedure setup (nc: integer; hfiles: array of string;
hfmix: string; hrf: string; var ierr: byte; var herr: string)
stdcall; external 'refp32.dll';
implementation

begin
end.
Соседние файлы в папке Sol_Del2