nodel | A digital media control system for museums and galleries | Automation library

This looks like a "please do my assignment for me post", which I won't do. I will try and help you do the assignment yourself.

I don't know exactly what your assignment is, so I'm going to have to make some guesses.

I think your assignment is to write a recursive function that will search a tree and return a boolean response depending on whether a value (input to the function) is found or not.

I don't know how the tree gets its content. You say, you defined the tree type, so I'm guessing that means you are not provided with a tree that already has content. So, at least for testing purposes, you are going to have to write code to add content to the tree (so you can search it).

I don't know exactly what kind of tree you are supposed to create. Usually trees have rules about how the items are arranged in the tree. A common type of tree, is a binary tree, where for each node, the item in the left node (if present) is "less than" the item in the right node (if present). You probably need this when adding items (i.e. content) to the tree.

I think you need to change your definition of the tree node, nodeT (I could be wrong). A tree is a kind of linked list, it does not usually contain linked lists. Usually each tree node contains an item of data (not a list of items).

If I were doing in this assignment (and learning to program in Pascal) I would do the following (in this order):

1. Make sure I understand linked lists (at least singe-linked list). Write at least one program to add data to a linked list, and search it (do not use recursion).

2. Make sure I understand recursion. Read some tutorials on recursion (that do not use linked lists, or trees). For example "First Textbook Examples of Recursion". Write at least one program that uses recursion (do not use linked lists or trees).

3. Make sure I understand trees. Read some tutorials on trees. For example, "Binary Search Trees"

4. Do the assignment.

P.S. You might want to change the name of your text type from "text", because, in Pascal, "text" is the name of a predefined type, for text files.

Simplified example:

There are lots.. lots of errors in your example. I think is a just a draft.

I would like to show some fixes and suggestions.

1. In models, you should use default instead of initial - initial is being used in Forms.
2. For choices I would like to show how I solve choices in a much easier way - just using enum class
3. When using OneToOne relationship, like in my example Location, the object returned by RentalProperty.location is an instance of Location class instead of QuerySet - much easier to handle in code