карта мира(нужна помощь)

[mutabor]

Продумал идею окончательно, нужен всего один массив двухмерный = ширина * высота карты в пикселях. Тип - байт.
Остальные массивы промежуточные, из них как раз этот основной и нужно сгенерировать. Вручную их составлять не надо, код написать один раз и по карте покликать по странам в определенном порядке (хоть по алфавиту).
Из константы массива со странами (такого же как с жанрами, только со странами) получать название страны, нулевой элемент не заполнять это будет означать что курсор ни в одну страну не попадает.

Чем хорош этот вариант, так это простейшая проверка в MouseMove:
Caption := Countries[Map[x,y]];

[WOLFak]

кстати где можно посмотреть инфу об этих байтах
и еще об
s:=чего то там or чего то там
что означает тут or?

[WOLFak]

а нельзя ли вот этой хорошо звучащей идеи код увидить
пожалуйста..
я ж тока начинающий (очень начинающий) программер

[alexBlack]

Посмотри вот на этот пример.
Попробуй как работает
Я специально вставил комментарий, чтобы было понятно откуда такие константы.

[WOLFak]

угу ща попробую на большой сделать

[WOLFak]

я тут попутно сокет разбирал так вот
я активизирую клиента сокета но без серва
и мне дает ошибку что типа асинхронно что то?
как исправить?
когда серв запущен ошибок нету(я явно что то упустил с клиентом
в нем я
port = 9999
host=127.0.0.1
address=127.0.0.1
и все
я просто пишу form1.clientsocket1.active:=false

[mutabor]

Про байты и хорошо звучащую идею, это я так понял вопрос мне?

Попробую объяснить более доступно. Отложим пока предварительную подготовку и возьмем нашу программу. Нужно:
1. Константный массив со странами (допустим их пять)

const
Countries: array[0..5] of string = (
  '','Австрия','Испания','Германия','Франция','Гондурас');

Обрати внимание что их на самом деле шесть, нулевой элемент - пустая строка, это будет нейтральная территория.

2. Двухмерный массив (матрица) по размерам такой же как и карта (изображение), но в отличие от карты в к-рой элемент имеет тип TColor = integer = 4 байта, элементы нашего массива будут типа byte.

var
Map: array of array of byte;

Размеры матрицы я не задаю, так как это не обязательно, все равно грузить ее нужно из файла или из ресурсов.
Матрица эта будет иметь примерно такой вид (это ее фрагмент)

... 0 1 1 2 2 5 5 ...
... 0 1 3 3 3 5 5 ...
... 0 0 4 4 4 4 0 ...

Каждая цифра соответствует одной стране, 0 - нейтральной территории.

3. При работе программы будет выполняться всего одна строка кода (если не считать загрузку матрицы при старте программы), вот эта строка:

procedure <чей-то>.MouseMove... //смотря какой компонент ты выберешь
begin
//название страны будет появлятся в заголовке формы
Caption := Countries[Map[x,y]];
end;

"Подводная часть айсберга" это создание этой самой матрицы, по трудоемкости не легче чем в Фотошопе маску сделать (только в Фотошопе нужно будет работать руками, а тут головой). Нужно написать код (если что я помогу) для ее создания на основе карты.

[WOLFak]

тип байт как я мог забыть ?! в голове просто крутяться биты сокеты и все такое
на счет 'надводной части айсберга' я вроде знал и тему создал на случай если кто нить знает где взять карту с разноцветными странами и если бы таковая была я бы и сам сделал но карты такой нету (наверное) вот я и тону ударившись о "Подводную часть айсберга")))
я вот не раз видел проги с картой и там можно выберать страну одним кликом мне нужно тоже самое
короче плиз помогите

[WOLFak]

я ща над картой фотошопом попробую цвета поизменять
тот исходник alexBlack'а не фурычит с jpeg ) пишит что изменять можно тока битмап
но идея mutabor выглядит более надежной

[WOLFak]

Сообщение от mutabor

"Подводная часть айсберга" это создание этой самой матрицы, по трудоемкости не легче чем в Фотошопе маску сделать (только в Фотошопе нужно будет работать руками, а тут головой). Нужно написать код (если что я помогу) для ее создания на основе карты.

голова у меня есть тока не на столько умная как надо
вот и вопрос как этот код должен работать(составление карты of byte)?