feat(apk): notes de commandes, une commande copiee a la fois
Bloc Commands en tete d'une note "commands", groupe par groupe, avec un bouton copier. ParseCommandNote est le portage du decoupage du poste (groupes, lignes continuees). La copie passe par un rang, comme les autres lignes du detail. Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
This commit is contained in:
@@ -2124,6 +2124,14 @@ begin
|
||||
if DetailRowAt(FCurrent, StrToIntDef(Param('k'), -1), LCaption, LValue) then
|
||||
CopyToClipboard(LValue, LCaption);
|
||||
end
|
||||
// Une commande d'une note de commandes, par son rang dans la liste.
|
||||
else if Param('f') = 'cmd' then
|
||||
begin
|
||||
var LCmds := ParseCommandNote(FCurrent.Password);
|
||||
var LK := StrToIntDef(Param('k'), -1);
|
||||
if (LK >= 0) and (LK <= High(LCmds)) then
|
||||
CopyToClipboard(LCmds[LK].Cmd, 'Command');
|
||||
end
|
||||
else
|
||||
begin
|
||||
LIdx := StrToIntDef(Param('i'), -1);
|
||||
|
||||
Reference in New Issue
Block a user