SQLRU.net: Delphi » Подскажите с реализацией

Начало » Программирование » Delphi » Подскажите с реализацией

Показать: Сегодняшние сообщения :: Голосования :: Навигатор по сообщениям
Отправить по e-mail

Подскажите с реализацией [сообщение #3573]

Sat, 28 October 2023 10:28

sashaua01
Сообщений: 17
Зарегистрирован: July 2022

Junior Member

Добрый день.
Подскажите как лучше реализовать без множества ifов
есть порядка 10 служб доставки, для каждой службы доставки есть клас

TDeliveryServices_A_ApiClient = class
TDeliveryServices_B_ApiClient = class
TDeliveryServices_C_ApiClient = class

в каждом классе есть месть метод

get_tracking_number_status(Atracking_number:string):string;

который возвращает статус отправления по трек номеру.
Есть таблица DELIVERY_SERVICES в базе c службами доставки.
ID|NAME|API_KEY|........
как елегантно зеализовать.

if DELIVERY_SERVICES.ID=2 then
delivery_service:=TDeliveryServices_A_ApiClient .Create(); 
.......
.......
if DELIVERY_SERVICES.ID=10 then
delivery_service:=TDeliveryServices_C_ApiClient .Create(); 
.......
.......

без кучи if ?

Известить модератора

[Список сообщений]

		Подскажите с реализацией От: sashaua01 - Sat, 28 October 2023 10:28
		Re: Подскажите с реализацией От: SD - Sat, 28 October 2023 14:16
		Re: Подскажите с реализацией От: sashaua01 - Wed, 15 November 2023 00:16
		Re: Подскажите с реализацией От: wildbill - Wed, 15 November 2023 16:31

Предыдущая тема:	function(Atracking_numbers:TStringList):TDictionary<string,string>
Следующая тема:	FHIR

Переход к форуму:

-=] Вернуться вверх [=-

[ Сформировать XML ] [

] [

]

Текущее время: Fri May 10 02:38:51 GMT+3 2024

Общее время, затраченное на создание страницы: 0.00618 секунд