Cita:
Empezado por jw4v32
Código:
function ReadFile(Path: String): STRING;
var
myFile : TextFile;
text : string;
begin
AssignFile(myFile, Path);
Reset(myFile);
while not Eof(myFile) do
begin
ReadLn(myFile, text);
Result:= Result + text;
end;
CloseFile(myFile);
end;
hola tengo una duda sobre esta funcion no me queda claro la parte esa de
Result:= Result + text; se que result es lo mismo que poner el nombre de la funcion pero no enitendo por que neserario volver a nombrarla.
ya que si hago asi:
Código Delphi [-]Result:= text;
no funciona
alguna sugerencia  |
Porque esta funcionando como ACUMULADOR, si te fijas, el result esta dentro de un bucle, y el texo, no es nada mas ni mada menos que el conjunto de lineas acumuladas.
Saldos.
__________________
Código Delphi
[-]
try
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;