[Коржик]

Здравствуйте!
Делаю программку, в которой изображение скачивается с интернета, и потом выгружается в Image в BMP формате, соответственно перед загрузкой в image проверяю если скачан jpg, png, или gif то преобразую изображение в BMP. Всё получается за исключением проверки, начал уже тупить, поэтому и решил спросить у Вас.
Её смысл таков - если в ComboBox вводится текст, то проверям является ли он вэб-адресом, тут все просто в строке нужно найти (http) как я понял, если нет программа на якорь. Если в сроке есть http, то проверям, если в ней ссылки на изображения (они как правило заканчиваются расширением изображения), поэтому я ищу в строке jpg или png. Если не найдены то останавливаю приложение, если есть то работает дальше.
Написал это таким образом:

Код:

var
 Webad: string;
 .....
 // Проверяем является ли введенная в ComboBox строка корректным вэб-адресом
  // Указываем откуда берется строка на проверку
  Webad := ComboBox1.text;
  // Если в строке присутствует текст "HTTP", то...
  if Pos('http', Webad) > 0 then
		begin
			// Проверяем является ли введенная в ComboBox строка вэб-адресом с изображением
				// Если строка содержит текст ".JPG", то ...
				if Pos('.jpg', Webad) > 0 then
				begin
				// Продолжаем выполнение программы
				end
				
				// Если строка содержит текст ".PNG", то ...
				else if Pos('.png', Webad) > 0 then
				begin
				// Продолжаем выполнение программы
				end
				
				// Если в строке нет текста ни ".JPG", ни ".PNG", то...
				else
				// Предупреждаем об этом пользователя,
				ShowMessage('Данный вэб-адрес не является адресом изображения. Действие отменено.');
				// отменяем выполнение процедуры.
				Exit;
		end
    
  // Если в строке нет текста "HTTP", то...
  else
  begin
      // Предупреждаем об этом пользователя,
    ShowMessage('Данный текст не является вэб-адресом. Действие отменено.');
    // отменяем выполнение процедуры.
    Exit
  end;

Проблема в том что если после всей проверки, т.е. если всё корректно и ссылка подходит по всем параметрам, то ничего не происходит... Если ошибки то все показывает правильно и останавливает выполнение программы. А если все верно, то ничего не происходит. Помогите пожалуйста разобраться, где я протупил?