|
Основной форум Сюда все проблемы связанные с программированием. |
16.08.2007, 17:35
|
#16
|
Нуждающийся
Регистрация: 13.11.2006
Сообщений: 60
Написано одно полезное сообщение
|
Re: Альтернативный экран ввода текста на Моторолах!!!
ресурс можно только вставить в jar файл через комп и считывать информацию из него. Изменять и создавать с помощью самой java проги его нельзя. Можно через recordstore:
var rs:recordstore;
buffer:string;
index:integer;
begin
rs:=openrecordstore('buf');
index:=addrecordstoreentry('buf','ТЕКСТ'); //записываем текст в хранилище под номером index
buffer:=ReadRecordStoreEntry('buf',index); //считываем текст в буфер из хранилища номер index
closerecordstore('buf');
end;
|
(Offline)
|
|
16.08.2007, 22:04
|
#17
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Народ Можете мне показать пример!!! С этими «Ресурсовыми файлами» я то знаю как подключать его!!! А вот как его самому написать не знаю!!! Можно маленький пример с подробным описанием!! Или где моно про это почитать!! В прицепи мне нужен вход в Ресурсовый файл, там проверка на наличие в RS данных !! Если они есть то вывод их в основной код!!
П.С. Я не про те ресурсы!!!! ХАХА Я про то ч как написанна либа CRT!! Мне надо что то на подобе!!!
|
(Offline)
|
|
19.08.2007, 12:33
|
#18
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Не ну что мне катонить поможет!!!! Даст какуюнить инфу!!! Про либы написанные на пискале!!!
|
(Offline)
|
|
02.09.2007, 21:11
|
#19
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Как я понял про стандартные либи кторотые пишуться на паске мне не кто не что не раскажет!!!! Вопрос другой!! Моно ли в переменно buf в кторой текст найти определённую букву по счёту и удалить её или заменить??? если да то как примерчик маленький моно!!!!
|
(Offline)
|
|
03.09.2007, 13:38
|
#20
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Можно так:
//Заменить 1-ю "t" в строке на "d"
buf:=setchar(buf,'d',pos(buf,'t'));
//Заменить все "t" на "d"
for i:= 0 to length(buf)-1 do
if getchar(buf,i)='t' then buf:=setchar(buf,'d',i);
|
(Offline)
|
|
03.09.2007, 13:47
|
#21
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Понимаеш в чем проблема у меня идейка! переделывать код набранной клавиши в изображение буквы!! А потом двигая курсором на экране удалать определённую избор буквы! и что бы она в buf удалялась!!!
|
(Offline)
|
|
03.09.2007, 18:50
|
#22
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Тогда так:
function DelChar(s:string;idx:integer):string;
var tmp:string;
begin
tmp:=copy(s,0,idx-1);
tmp:=tmp+copy(s,idx,length(s));
DelChar:=tmp;
end;
Например
возвращает strka.
|
(Offline)
|
|
03.09.2007, 21:34
|
#23
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Ок спасибо! Что бы я без тебя делал!! А можно чем то на подобии этого кода заменять буквы в реестре!
И ещё вопросик как прочитать каждую букву или символ реестра и сопоставить ей изображение!
|
(Offline)
|
|
04.09.2007, 05:11
|
#24
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
С сопостовлением кажеться я придумал а вот как мне добавлять букву после скажем 4 символов??
|
(Offline)
|
|
04.09.2007, 15:22
|
#25
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Можно так:
function InsertChar(s:string;idx:integer;ch:char):string;
var tmp:string;
begin
tmp:=copy(s,0,idx);
tmp:=tmp+ch;
tmp:=tmp+copy(s,idx,length(s));
InsertChar:=tmp;
end;
|
(Offline)
|
|
04.09.2007, 15:43
|
#26
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
мож пример я честно не врубаюсь я ещё паскаль не знаю в этом году буду учить!!! А можно как нить из изображения выризать куски мне надо из карты шрифтов вырезать буквы!!!!
|
(Offline)
|
|
04.09.2007, 19:25
|
#27
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Например, если надо в строке '1245678' вставить символ '3' после второго символа, надо использовать функцию так:
var
buf:string;
...
begin
buf:='1245678';
buf:=insertchar(buf,2,'3');
На счет шрифтов есть стандартная функция ImageFromImage.
Использование описано в хелпе.
|
(Offline)
|
|
04.09.2007, 19:55
|
#28
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Можеш пример показать с ImageFromImage понимаеш в русскаом хелпе нет такого!! А в англ я слабо!!!
|
(Offline)
|
|
05.09.2007, 15:22
|
#29
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
var
src,dst:image;
begin
src:=loadimage('image.png');
//ImageFromImage(src:image;x,y,w,h:integer)-возвращает изображение из области с координатами x,y и размерами WxH изображения src.
dst:=imagefromimage(src,0,0,10,10);
drawimage(dst,20,20);
|
(Offline)
|
|
05.09.2007, 18:09
|
#30
|
Нуждающийся
Регистрация: 04.06.2007
Сообщений: 87
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Альтернативный экран ввода текста на Моторолах!!!
Все спасибо понял буду тестить!!!!
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 15:50.
|