Отвечу на вопросы по мере сил:
1. Есть. Пример вот:
// ok, exit : command;
// edit, shift, sett: integer;
ClearForm; ShowForm; SetFormTitle('Поиск');
ok:=CreateCommand('Искать', CM_OK, 1);
exit:=CreateCommand('Отмена', CM_EXIT, 1);
edit:=FormAddTextField('Что ищем: ', '', 20, TF_ANY);
sett:=FormAddChoice('Опции:', CH_MULTIPLE);
shift:=ChoiceAppendString(sett, 'Учитывать регистр'); // Чекбокс
AddCommand(ok); AddCommand(exit);
repeat
keyp := GetClickedCommand; Delay(20);
until keyp <> EmptyCommand;
2. В формах - никак (во всяком случае пока. Думаю писать библиотеку для расширения возможностей форм...). В режиме холста (canvas) примерно так:
DrawText('Ошибка', (GetWidth-GetStringWidth('Ошибка'))/2, 20);
3. 100% защиты нет. Можно только пройтись по программе обфускатором типа ProGuard или др. После этого текст программы будет сложнее понимать, но декомпилировать всё равно можно.
4. Типа так:
// im: image;
im:=LoadImage('/icon.png');
SetColor(0,0,0); FillRect(0,0,GetWidth,GetHeight);
DrawImage(im, (GetWidth-GetImageWidth(im)/2, (GetHeight-GetImageHeight(im))/2); // выводим картинку
DrawText('Ошибка', (GetWidth-GetStringWidth('Ошибка'))/2, (GetHeight+GetImageHeight(im))/2 + 5); // Выводим текст
Repaint; Delay(3000);
5. Тут проблема, видимо, в телефоне. По старым стандартам иконка должна быть 12x12, хотя в SE например можно делать 24x24, а в других телефонах можно и даже больше иконки делать.
6. Рисуй сам. Есть правда сборники иконок типа Nuvola (см.
http://icon-king.com/?p=15)
7. Я уже выкладывал примеры меню в разделе исходников. Посмотри.
8. Не совсем понял что ты имеешь ввиду. Уточни.