Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вниз

ПОМОЩЬ !!! Знайти схожі гілки


Alligator   (2001-12-17 11:46) [0]

function SelectChars (s: ShortString; a: Integer; b: Integer): ShortString;
було
i: Integer;
ts: ShortString;
tp: PChar;
починати
ts: = "";
StrPCopy (tp, s);
for i: = a to a + b do ts: = ts + tp [i];
Result: = ts;
end;

Ця функція неможуть перетравлювати дуже длиние пропозиції вона (Функція) відразу при вигляді довгих речень вбиває мою прогу
Як це можна виправити ???
зазделегідь дякую!!!



gek   (2001-12-17 11:51) [1]

Ну а навіщо ShortString використовувати
користуйтеся String



Alligator   (2001-12-17 12:26) [2]

З String прога теж дохне я чіткий НЕ пробива нече не виходить може є інша функція або варіант як видерать з тексту то що потрібно ???



McSimm   (2001-12-17 12:38) [3]

1. Пам'ять для PChar не виділена.
2. Навіщо тут взагалі PChar?
3. Навіщо взагалі ця функція? Якщо це копіювання підрядка, то
function Copy (S; Index, Count: Integer): string;



Alligator   (2001-12-17 12:57) [4]

А ... непонял ви мене!



gek   (2001-12-17 13:01) [5]

А в чому непонял? Навіщо все це діло треба, поясни?



Alligator   (2001-12-17 13:34) [6]

Ну припустимо у мене є шматок довгого тексту і мені необхідно перевірити чи вставити тільки перші дві букви.
-memo1.lines.add (SelectChars ( "шматок довжина тексту", 0,1))
тоесть як ви зрозуміли в мемо має буде Записати тільки дві літери починаючи з 0 закінчуючи 1 і ця функція прекрасно працює але не з довгих текстів межа десь 255 символів але що обмежує я непойму.



Digitman   (2001-12-17 13:37) [7]

memo1.lines.add (Copy ( "шматок довжина тексту", 1,1)) - ну чим тебе так не влаштовує? робить те, що тобі потрібно, і без всяких додаткових "викрутасів"



Mbo   (2001-12-17 13:41) [8]


про функцію Copy вже сказали.
а в твоїй, крім 5 зазначених помилок, описаний повернення shortstring,
а Result - PChar



Alligator   (2001-12-17 18:38) [9]

ВСІМ ВЕЛИЧЕЗНЕ СПАСИБІ ЗА ДОПОМОГУ !!! тепер все працює як треба.



сторінки: 1 вся гілка

Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.58 MB
Час: 0.119 c
6-22283
Yuraz
2001-10-08 11:05
2002.01.08
Як можна ще мережевий принтер підключити, крім стандартного способу ??


3-21929
@andrew
2001-12-04 11:38
2002.01.08
ВСІМ ПРИВІТ! Роблю якийсь журнал. Звідки завдання ....


1-22021
Socol
2001-12-18 08:54
2002.01.08
Завантаження файлу!


7-22438
Саша
2001-08-17 16:14
2002.01.08
Голос по модему


1-22206
T2
2001-12-16 07:11
2002.01.08
Align field





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська