Page 3 of 3

Re: interface "Jef V.40" awards,series,connection, order, missing code

Posted: Fri Dec 30, 2016 11:54 pm
by xbox80
I found this code in the script program modern_program_part3

it is possible add, the "Jef" script (jef_program_getperson.pas), for orders movie by year, title in actors tab?

Code: Select all

program modern_program_part3;

uses 'modern_program_variables.pas';

function GetSortIcons(sort_order: String; PersonCode: Integer; PersonType: String): String;
begin
   result := '';
   if (RegReadInteger('SortIcons', 0) = 1) then begin
      if (sort_order <> 'title asc') then
         result := result + format('&nbsp;<a class="picture" href="userref:131,%s;%d">', [PersonType, PersonCode]) + format('<img alt="%s" src="%stitle-sort-ascend.png" align="absmiddle"></a>', [GetLangStr(1477), ImgPath]);
      if (sort_order <> 'title desc') then
         result := result + format('&nbsp;<a class="picture" href="userref:132,%s;%d">', [PersonType, PersonCode]) + format('<img alt="%s" src="%stitle-sort-descend.png" align="absmiddle"></a>', [GetLangStr(1478), ImgPath]);
      if (sort_order <> 'year asc') then
         result := result + format('&nbsp;<a class="picture" href="userref:133,%s;%d">', [PersonType, PersonCode]) + format('<img alt="%s" src="%syear-sort-ascend.png" align="absmiddle"></a>', [GetLangStr(1479), ImgPath]);
      if (sort_order <> 'year desc') then
         result := result + format('&nbsp;<a class="picture" href="userref:134,%s;%d">', [PersonType, PersonCode]) + format('<img alt="%s" src="%syear-sort-descend.png" align="absmiddle"></a>', [GetLangStr(1480), ImgPath]);
      if RegReadInteger('ShowRating', 1) = 1 then begin
         if (sort_order <> 'rating asc') then
            result := result + format('&nbsp;<a class="pic" href="userref:161,%s;%d">', [PersonType, PersonCode]) + format('<img alt="%s" border="0" src="%ssort-rating-asc.png" align="absmiddle"></a>', [GetLangStr(7007), ImgPath]);
         if (sort_order <> 'rating desc') then
            result := result + format('&nbsp;<a class="pic" href="userref:162,%s;%d">', [PersonType, PersonCode]) + format('<img alt="%s" border="0" src="%ssort-rating-desc.png" align="absmiddle"></a>', [GetLangStr(7008), ImgPath]);
      end;
   end;
end;

Re: interface "Jef V.40" awards,series,connection, order, missing code

Posted: Sat Dec 31, 2016 6:31 am
by TerribleFloater
xbox80 wrote:I found this code in the script program modern_program_part3

it is possible add, the "Jef" script (jef_program_getperson.pas), for orders movie by year, title in actors tab?

There are not icons in JeF's interface. You must include them first. And you must read this first:
JeF wrote:////////////////////////////////////////////////////////////////////////////////
// JeF's Interface is released for free use but Not for free Full Copying. //
// I have spent many, many hours to build it and it should be understandable //
// i want to stay credited for special features introduced in this interface. //
// So, feel free to read code, and get ideas to build your own script, but //
// please don't publish full copy : ask me for new features instead... //
////////////////////////////////////////////////////////////////////////////////