В общем виде решение такое.
Создаете класс или запись для хранения линий дорог в удобном вам виде.
Что-то вроде:
type
TRoad = record
From : TPoint;
To: TPoint;
end;
Храните где-нибудь ваши дороги (массив, список, итп.). Рисуете линии на канве. По клику по канве берете координаты точки и определяете, не принадлежат ли они к одной из линий.
Если принадлежат - обрабатываете это как-вам нужно (например, меняете цвет линии; для этого нужно добавить в TRoad еще и цвет).
Ну, а потом оптимизация отрисовки и обработки всего этого дела, отсечение невидимых линий, возможно, объединение линий в граф, поиск путей. В общем, смотря какая у вас там задача ).
Вам могут потребоваться определенные знания алгебры, геометрии и машинной графики. Ну и Algolist вам в помощь.