Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 22.04.2014, 20:56   #11
alman12
Форумчанин
 
Регистрация: 30.12.2013
Сообщений: 466
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Ставь другую операционку.

Дружище, проблема не там. Проблема в библиотеке badhands.dll
Просто у автора эта библиотека установлена
Отсюда и специфическое сохранение.

Можно. Но будет тоже самое.
а как в одном файле сохранят
alman12 вне форума
Старый 22.04.2014, 20:57   #12
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Цитата:
Отсюда и специфическое сохранение.
Ни коим образом
Цитата:
Persons.Add(edit2.text+memo2.Text);
Да, добавленная таким образом куча строк пишется в одит итем вместе с разделителями, которые и остаются там. Попробуй так

Код:
if Memo2.Lines.Count>0 then Persons.Add(edit2.text+Memo1.Lines.Strings[0]) else Persons.Add(edit2.text);
for i:=1 to Memo2.Lines.Count-1 do Persons.Add(Memo1.Lines.Strings[i]);
Или так, думаю так и задумывалось
Код:
Persons.Add(edit2.text);
for i:=0 to Memo2.Lines.Count-1 do Persons.Add(Memo1.Lines.Strings[i]);
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 22.04.2014 в 21:01.
Аватар вне форума
Старый 22.04.2014, 21:00   #13
alman12
Форумчанин
 
Регистрация: 30.12.2013
Сообщений: 466
По умолчанию

а как в одном файле сохранят ?
alman12 вне форума
Старый 22.04.2014, 21:11   #14
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

а чей мапед
eval вне форума
Старый 22.04.2014, 21:47   #15
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
Ни коим образом
Наоборот, как раз в ней и проблема
badhands.dll коварная штука. А еще и offbrain.sys подозреваю работает на полную катушку. Тут однозначно менять винду на МакОс. Ну или просто на мак
С маками проблем не будет.
I'm learning to live...
Stilet вне форума
Старый 22.04.2014, 21:57   #16
Utkin
Старожил
 
Аватар для Utkin
 
Регистрация: 04.02.2009
Сообщений: 17,351
По умолчанию

Цитата:
Да, добавленная таким образом куча строк пишется в одит итем вместе с разделителями, которые и остаются там.
Я брал его код и поменял на
Код:
Persons.Text:=Persons.Text+edit2.text+memo2.Text;
Этого достаточно для решения проблемы. Сама кнопка называется как-то по-инопланетному saxla.
Маньяк-самоучка
Utkin появился в результате деления на нуль.
Осторожно! Альтернативная логика
Utkin вне форума
Старый 22.04.2014, 22:03   #17
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Нет у меня на семерке badhands.dll и в помине. Но тем не менее вот такие дела. На примере следующего кода после List.Add(Memo1.Text) List.Count=1 со всеми вытекающими последствиями
Код:
procedure TForm1.Button1Click(Sender: TObject);
var List: TStringList;
    i: Integer;
begin
  Memo1.Lines.Clear;
  for i:=1 to 5 do begin
    Memo1.Lines.Add(IntToStr(i));
    Memo1.Lines.Add('');
  end;
  List:=TStringList.Create;
  List.Add(Memo1.Text);
  for i:=List.Count-1 downto 0 do if Trim(List[i])='' then List.Delete(i);
  List.SaveToFile('e:\gggg3.txt');
  List.Free;
end;
Вариант Utkin-а тоже решает проблему, а меня вечно в циклы тянет
Виталий, не выпендривайся с маком
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 22.04.2014 в 22:09.
Аватар вне форума
Старый 22.04.2014, 22:04   #18
alman12
Форумчанин
 
Регистрация: 30.12.2013
Сообщений: 466
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Наоборот, как раз в ней и проблема
badhands.dll коварная штука. А еще и offbrain.sys подозреваю работает на полную катушку. Тут однозначно менять винду на МакОс. Ну или просто на мак
С маками проблем не будет.
а как зашифроват этот сохраненный текст ?
alman12 вне форума
Старый 22.04.2014, 22:25   #19
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

шифратор нужен
eval вне форума
Старый 22.04.2014, 22:27   #20
alman12
Форумчанин
 
Регистрация: 30.12.2013
Сообщений: 466
По умолчанию

Цитата:
Сообщение от eval Посмотреть сообщение
шифратор нужен
как сделать ?
alman12 вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
почему не сохраняеть данные в Tstringlist c под другим ? alman12 Общие вопросы Delphi 64 22.04.2014 15:54
Данные из Memo в TStringList Ilya_L Помощь студентам 2 03.12.2011 07:45
поиск и сохранение под другим именем fitc Общие вопросы Delphi 3 17.07.2009 18:50
Запуск процесса под другим пользователем Андреy Win Api 3 03.12.2008 17:57
Как скопировать проект под другим именем? Dimoney Свободное общение 4 17.12.2007 13:50