Lib_imload-библиотека для загрузки изображений из ФС.

[ViNT]

Lib_imload-набор из двух библиотек-
imloadmotofs и imloadjsr75 для motorola и jsr75 соответственно.
Библиотека позволяет загружать изображения(все поддерживаемые телефоном форматы) из файловой системы.
Описание и пример прилагаются.

[~Lexx~]

У меня не работает с Lib_jsr75i .
Что делать?

Program Prog;
Uses jsr75i, imloadjsr75;
Var
  img: array[1..2] of image;
  f, ss, sss, w: string;
  way: array[0..255] of string;
  i, l, n, z: integer;
  
Begin
  ss:= '/c:/pictures/1.jpg';
	w:= '/c:/pictures/';
  f:= get_files('/c:/pictures/');
  l:= length(f);
  
  for i:= 1 to l do begin
    sss:= copy(f, i, i + 1);
    if sss <> '|' then ss:= ss + sss else begin
    way[z]:= ss;
    z:= z + 1;
    if i < n then i:= i + 1;
    ss:= '';
  end;
if i = l then z:= z - 1;
end;
	
for i:= 0 to z do begin
  ss:= w + way[i];}
  img[1]:= imloadjsr75.loadimage(ss);
  DrawImage(img[1], 0, 0);
  repaint;
  delay(5000);
  end;
  SetColor(0, 0, 0);
  FillRect(0, 0, 176, 220);
  SetColor(255, 255, 255);
  DrawText('END', 80, 104);
  delay(10000);
End.

[ViNT]

1. Что именно не работает?
2. Какой телефон?

[~Lexx~]

1. Не работает все, горит белый экран.
2. SE W700i

[ViNT]

Одно могу сказать определенно - дело не в несовместимости библиотек.
Скорее всего, ошибка где-то в манипуляциях со строками.
Советую вместо Lib_jsr75i для поиска файлов использовать Lib_jsr75ex

[~Lexx~]

Ваще ересь какая-то творится! Пишет "Ошибка приложения".
Я и Uses jsr75i, imloadjsr75; изменил на Uses jsr75i; никак...

[ViNT]

Попробуй выкинуть jsr75i. С SE прекрасно работает Lib_jsr75.

[~Lexx~]

Lib_jsr75 не выводит строку с именами файлов

[ViNT]

В Lib_jsr75 при поиске файлов нужно указывать путь не в виде /c:/pictures/, а в виде c:/pictures/.
А вообще - советую попробовать jsr75ex, там модель поиска ближе к паскалевской.