[req] I need a script that join fields into an other

[ABNormal]

i need a script able to change comments field in this way:
----------------------------
Original Title +
director +
comments
---------------------------
is it possible?
i'm talkin about a movie already previously registered in my DB

i explain reason:
i'ld like to have a "FORUM LIKE" text ready for be user into movie forums like this:
[ b ] Transleted Title [ /b ]
(well here normally appears a cover)
Title: [ i ]original title[ /i ]
Director: [ i ]director[ /i ]
actors......
description
comment.......

.... everything converted and ready (all in one field) to be quickly copied and pasted.

it could be useful (for me at least) when i go into some forums talking about a movie....

thx
ABN

[antp]

Code: Select all

program NewScript;
var
  s: string;
begin
  s := '[b]' + GetField(fieldTranslatedTitle) + '[/b]' + #13#10
      + 'Title: [i]' + GetField(fieldOriginalTitle) + '[/i]' + #13#10
      + 'Director: [i]' + GetField(fieldDirector) + '[/i]' ;
  SetField(fieldComments, s);
end.