pascalabcnet/InstallerSamples/!MainFeatures/04_Units/NativeDll/CallNative.pas

{$platformtarget x86}
// Вызов функции из обычной dll
function add(a,b: integer): integer; external 'NativeDll.dll' name 'add'; // объявление внешней функции

begin // основная программа
  writeln(add(2,3));
end.
-												Попытка частично заставить работать одновременно #2277 и #2265

											
										
										
											2020-07-11 17:11:27 +03:00
+								{$platformtarget x86}
-												change encoding for all *.pas and *.cs files: cp1251 -> utf-8

											
										
										
											2015-12-28 14:25:15 +03:00
+								// Вызов функции из обычной dll
 								function add(a,b: integer): integer; external 'NativeDll.dll' name 'add'; // объявление внешней функции
-												initial commit

											
										
										
											2015-05-14 22:35:07 +03:00
-												change encoding for all *.pas and *.cs files: cp1251 -> utf-8

											
										
										
											2015-12-28 14:25:15 +03:00
+								begin // основная программа
-												initial commit

											
										
										
											2015-05-14 22:35:07 +03:00
+								  writeln(add(2,3));
 								end.