forum.boolean.name - Альтернативный экран ввода текста на Моторолах!!!

Страница 2 из 4

Показывать 64 сообщений этой темы на одной странице

forum.boolean.name (http://forum.boolean.name/index.php)

- Основной форум (http://forum.boolean.name/forumdisplay.php?f=49)

- - Альтернативный экран ввода текста на Моторолах!!! (http://forum.boolean.name/showthread.php?t=4145)

MotoMustanger

16.08.2007 17:35

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;

BASSON XVI

16.08.2007 22:04

Re: Альтернативный экран ввода текста на Моторолах!!!

Народ Можете мне показать пример!!! С этими «Ресурсовыми файлами» я то знаю как подключать его!!! А вот как его самому написать не знаю!!! Можно маленький пример с подробным описанием!! Или где моно про это почитать!! В прицепи мне нужен вход в Ресурсовый файл, там проверка на наличие в RS данных !! Если они есть то вывод их в основной код!!

П.С. Я не про те ресурсы!!!! ХАХА Я про то ч как написанна либа CRT!! Мне надо что то на подобе!!!

BASSON XVI

19.08.2007 12:33

Re: Альтернативный экран ввода текста на Моторолах!!!

Не ну что мне катонить поможет!!!! Даст какуюнить инфу!!! Про либы написанные на пискале!!!

BASSON XVI

02.09.2007 21:11

Re: Альтернативный экран ввода текста на Моторолах!!!

Как я понял про стандартные либи кторотые пишуться на паске мне не кто не что не раскажет!!!! Вопрос другой!! Моно ли в переменно buf в кторой текст найти определённую букву по счёту и удалить её или заменить??? если да то как примерчик маленький моно!!!! :)

ViNT	03.09.2007 13:38

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);

BASSON XVI

03.09.2007 13:47

Re: Альтернативный экран ввода текста на Моторолах!!!

Понимаеш в чем проблема у меня идейка! переделывать код набранной клавиши в изображение буквы!! А потом двигая курсором на экране удалать определённую избор буквы! и что бы она в buf удалялась!!!

ViNT	03.09.2007 18:50

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;

Например

Код:

DelChar('stroka',4);

возвращает strka.

BASSON XVI

03.09.2007 21:34

Re: Альтернативный экран ввода текста на Моторолах!!!

Ок спасибо! Что бы я без тебя делал!! А можно чем то на подобии этого кода заменять буквы в реестре!
И ещё вопросик как прочитать каждую букву или символ реестра и сопоставить ей изображение!

BASSON XVI

04.09.2007 05:11

Re: Альтернативный экран ввода текста на Моторолах!!!

С сопостовлением кажеться я придумал а вот как мне добавлять букву после скажем 4 символов??

ViNT	04.09.2007 15:22

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;

BASSON XVI

04.09.2007 15:43

Re: Альтернативный экран ввода текста на Моторолах!!!

мож пример я честно не врубаюсь я ещё паскаль не знаю в этом году буду учить!!! А можно как нить из изображения выризать куски мне надо из карты шрифтов вырезать буквы!!!! :) :)

ViNT	04.09.2007 19:25

Re: Альтернативный экран ввода текста на Моторолах!!!

Например, если надо в строке '1245678' вставить символ '3' после второго символа, надо использовать функцию так:

Код:

var

buf:string;

...

begin

buf:='1245678';

buf:=insertchar(buf,2,'3');

На счет шрифтов есть стандартная функция ImageFromImage.
Использование описано в хелпе.

BASSON XVI

04.09.2007 19:55

Re: Альтернативный экран ввода текста на Моторолах!!!

Можеш пример показать с ImageFromImage понимаеш в русскаом хелпе нет такого!! А в англ я слабо!!!

ViNT	05.09.2007 15:22

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);

BASSON XVI

05.09.2007 18:09

Re: Альтернативный экран ввода текста на Моторолах!!!

Все спасибо понял буду тестить!!!!

Часовой пояс GMT +4, время: 00:43.

Страница 2 из 4

Показывать 64 сообщений этой темы на одной странице