在两个列表之间移动可编辑的项目?

时间:2015-02-06 19:21:15

标签: list livecode

无法发布图片,如果需要,请告知我

感谢您的帮助!这样做的目的是能够编辑一张卡上的列表并将其移动到另一张卡上的列表中。我也试图让项目移动还包括可编辑的时间,可编辑的描述和对象的图片。所有这些都没有显示在列表中,只显示标题。如果我需要解释更多让我知道。我对此很陌生。

Card Edit: 
on preopencard   
   ## Populate the fields
   put empty into field "title 2"
   put empty into field "description 2"
   put the long date into field "date 2"

   ## Check which task we want to edit 
   ## using the custom property set on this card when we selected a task from the list
   put the cTaskID2 of me into tTaskID2

   ## Get the current details of the task
   put taskDetail2(tTaskID2, "title 2") into tTitle2
   put taskDetail2(tTaskID2, "description 2") into tDescription2
   put taskDetail2(tTaskID2, "completed 2") into tCompleted2
   ## And display then in the relevant fields
   put tTitle2 into field "title 2"
   put tDescription2 into field "description 2"

   ## Set the label of the completed button to allow you to toggle the state
   if tCompleted2 then
      set the label of button "completed 2" to "mark as incomplete"
   else
      set the label of button "completed 2" to "mark as complete"
   end if
end preopencard

on closeCard
   ## Check which task we want to update 
   ## using the custom property set on this card when we selected a task from the list
   put the cTaskID2 of me into tTaskID2

   if tTaskID2 is not empty then
      ## Update the task data in the cTaskData custom property of the stack
      updateTask2 tTaskID2, field "title 2", field "description 2"

      ## Save the task data out to file, ensures our file always refelects the current state
     saveTaskData
   end if
end closeCard



Stack script: (The ones with 2 are for this card) 


on preOpenStack
   ## Read the task list in from file
   readTaskData
end preOpenStack

on addTask pTitle, pDescription
   ## Add a task to the custom property of the stack that is storing the task list
   ## Remember you cannot update a part of a custom property
   ## It must be set in its entirety

  put the cTaskData of me into tTaskDetails
  put pTitle & tab & pDescription & tab & "false" & return after tTaskDetails
  set the cTaskData of me to tTaskDetails
end addTask

on addTask2 pTitle2, pDescription2
   ## Add a task to the custom property of the stack that is storing the task list
   ## Remember you cannot update a part of a custom property
   ## It must be set in its entirety

  put the cTaskData2 of me into tTaskDetails2
  put pTitle2 & tab & pDescription2 & tab & "false" & return after tTaskDetails2
  set the cTaskData2 of me to tTaskDetails2
end addTask2

on updateTask pLineNumber, pTitle, pDescription, pCompleted, 
   ## Update the details for  the given task in the custom property of the stack thast is storing the task list

   put the cTaskData of me into tTaskDetails
   set the itemDel to tab

   if pTitle <> empty then put pTitle into item 1 of line pLineNumber of tTaskDetails
   if pDescription <> empty then put pDescription into item 2 of line pLineNumber of tTaskDetails
   if pCompleted <> empty then put pCompleted into item 3 of line pLineNumber of tTaskDetails
   set the cTaskData of me to tTaskDetails
end updateTask

on updateTask2 pLineNumber2, pTitle2, pDescription2, pCompleted2, 
   ## Update the details for  the given task in the custom property of the stack thast is storing the task list

   put the cTaskData2 of me into tTaskDetails2
   set the itemDel to tab

   if pTitle2 <> empty then put pTitle into item 1 of line pLineNumber2 of tTaskDetails2
   if pDescription2 <> empty then put pDescription2 into item 2 of line pLineNumber2 of tTaskDetails2
   if pCompleted2 <> empty then put pCompleted2 into item 3 of line pLineNumber2 of tTaskDetails2
   set the cTaskData2 of me to tTaskDetails2
end updateTask2

on deleteTask pLineNumber
   ## Delete the given task from the custom property of the stack
   ## Remember the task id corresponds to the line number of the task in the custom property
   put the cTaskData of me into tTaskDetails
   delete line pLineNumber of tTaskDetails
   set the cTaskData of me to tTaskDetails
end deleteTask

on deleteTask2 pLineNumber2
   ## Delete the given task from the custom property of the stack
   ## Remember the task id corresponds to the line number of the task in the custom property
   put the cTaskData2 of me into tTaskDetails2
   delete line pLineNumber2 of tTaskDetails2
   set the cTaskData2 of me to tTaskDetails2
end deleteTask2

on deleteAllTasks
   ## Delete all tasks
   set the cTaskData of me to empty
end deleteAllTasks

on deleteAllTasks2
   ## Delete all tasks
   set the cTaskData2 of me to empty
end deleteAllTasks2

function taskDetail pLineNumber, pDetailType
   ## Get the specified detail of the specified task
   ## Remember each line of the custom property represents a task
   ## and the task details are tab separated

  put the cTaskData of me into tTaskDetails
  set the itemDel to tab
  switch pDetailType
    case "title"
      put item 1 of line pLineNumber of tTaskDetails into tDetail
      break
    case "description"
      put item 2 of line pLineNumber of tTaskDetails into tDetail
      break
    case "completed"
      put item 3 of line pLineNumber of tTaskDetails into tDetail
      break
  end switch
  return tDetail
end taskDetail

function taskDetail2 pLineNumber2, pDetailType2
   ## Get the specified detail of the specified task
   ## Remember each line of the custom property represents a task
   ## and the task details are tab separated

  put the cTaskData2 of me into tTaskDetails2
  set the itemDel to tab
  switch pDetailType2
    case "title2"
      put item 1 of line pLineNumber2 of tTaskDetails2 into tDetail2
      break
    case "description2"
      put item 2 of line pLineNumber2 of tTaskDetails2 into tDetail2
      break
    case "completed2"
      put item 3 of line pLineNumber2 of tTaskDetails2 into tDetail2
      break
  end switch
  return tDetail2
end taskDetail2

function taskCount
   ## Find out how many tasks are currently in the list
   return the number of lines in the cTaskData of me
end taskCount

function taskCount2
   ## Find out how many tasks are currently in the list
   return the number of lines in the cTaskData2 of me
end taskCount2

on saveTaskData
   ## Build the path to the file we want to store the data in
   ## In this case we want to use the "documents" folder
   ## Save the task list out to file
   put specialFolderPath("documents") & "/tasklist.txt" into tSavePath
   put the cTaskData of me into url ("file:" & tSavePath)
end saveTaskData

on readTaskData
   ## Read the task list in from file
   put specialFolderPath("documents") & "/tasklist.txt" into tSavePath
   if there is a file tSavePath then
      put url ("file:" & tSavePath) into tTaskDetails
   end if

   ## Set the custom property of the stack to the contents of the file
   set the cTaskData of me to tTaskDetails
end readTaskData



List on card:

on mouseUp
   ## Work out which task has been selected
   ## The taskID corresponds to the line number in the list
   put word 2 of the clickline into tTaskID2
   showTaskDetails2 tTaskID2
end mouseUp

on showTaskDetails2 tTaskID2
   ## Set a custom property on the task editor card
   ## This tells it which task has been selected so the correct details can be shown
   set the cTaskID2 of card "edit 2" to tTaskID2
   go to card "edit 2"
end showTaskDetails2

这是Livecode

1 个答案:

答案 0 :(得分:0)

我不清楚为什么要在属性中保存那么多数据。一旦数据进入某个字段,您就可以将其保留在那里。当您需要将数据从一张卡上的字段移动到另一张卡中的字段时,您可以直接执行此操作。例如,假设您要将卡1的字段“标题”和“描述”的内容复制到卡2上的相同字段。

// this handler is in the card script of card 2
on preOpenCard
  put fld "Title" of cd 1 into fld "Title"
  put fld "Description" of cd 1 into fld "Description"
end preOpenCard

这就是你所需要的。在这种特殊情况下,不需要自定义属性。