rendered paste body(*SLFTP Window_Caption_MOD*)
(* Add in slftp.ini *)
[cYRMOD]
//if customtitle is empty set caption to: slftp-version
customtitle=
(* edit console.pas *)
(* search for:
slscreen.SetResolution(config.ReadInteger(section, 'width', 80), config.ReadInteger(section, 'height', 25));
add below:
*)
vl.Caption:=cmod_VersionString; //
(* edit in versioninfo *)
(* search for:
function Get_VersionString(exename: string): string;
add below:
*)
function cmod_VersionString: string;
(* search for:
implementation
add below:
*)
uses configunit;
(* search for:
end.
add above:
*)
function cmod_VersionString: string;
begin
if config.ReadString('console','customtitle','') <> '' then
Result:= 'slftp-1.3.0.7-'+config.ReadString('console','customtitle','') else
Result:= 'slftp-1.3.0.7';
end;
njoy! ONLY the caption will change no debug or other msg!