Thema: dll einbinden

Einzelnen Beitrag anzeigen

youuu

Registriert seit: 2. Sep 2008
Ort: Kleve
822 Beiträge
 
Delphi 2010 Professional
 
#4

Re: dll einbinden

  Alt 5. Mär 2009, 20:48
Delphi-Quellcode:
function ProzentBerechnung(Hauptwert: string; Nebenwert: string): string; stdcall;

begin
  if Hauptwert = '0then
    Result:= '0'
  Else
    Result:= FloatToStrF(StrToFloat(Nebenwert)/StrToFloat(Hauptwert)*100,ffFixed,10,2);
end;

exports
  ProzentBerechnung,
  NFak,
  TorProzent;
so siehts es in der dll aus hab die anderen beiden funktionen mal außen vor gelassen
Steven
  Mit Zitat antworten Zitat