unit Unit2;
interface
Uses
Classes;
type
Tprop = record
s1, s2, s3: string;
end;
type
Tmod1 = class
private
public
function przetworz(var ss: string; nr: word): Tprop;
protected
end;
implementation
{ modul2 }
function Tmod1.przetworz(var ss: string; nr: word): TProp;
var
s1, s2, s3: string;
begin
{ operacje na stringach }
przetworz.s1:= s1;
przetworz.s2:= s2;
przetworz.s3:= s3;
end;
end.
Mam taki kod. Niestety fukcja zwraca tylko przetworz.s1 , mimo, ze wszystkie zmienne s1, s2, s3 zawieraja znaki. Dlaczego?
Nie kompiluje tez tego:
uses
unit2...;
var
prop : Tprop;
begin
Mod1:= Tmod1.Create;
prop:= Mod1.przetworz('sadasdsadsads',1):
kompilator pisze comapring signed and unsigned types. Co to znaczy?