PWideChar обрезает строку

serega6531 · #1 02.12.2013, 21:46

Доброго времени суток. Я пытаюсь обработать через PWideChar строку, которая больше, чем 2048 символов. И она обрезается. Пример:

Код:

'-Xms256m -Xmx512m...многотекста...libraries\org\apache\commons\commons-lang3\3.1\commons-lan'#$0600

Строка обрезается ровно после 2048 символа, я проверил. Почему так происходит и что делать? Почему так происходит и что делать?

poli-smen · #2 02.12.2013, 23:00

Цитата:

Сообщение от serega6531

Доброго времени суток. Я пытаюсь обработать через PWideChar строку, которая больше, чем 2048 символов. И она обрезается. Пример:

Код:

'-Xms256m -Xmx512m...многотекста...libraries\org\apache\commons\commons-lang3\3.1\commons-lan'#$0600

Строка обрезается ровно после 2048 символа, я проверил. Почему так происходит и что делать? Почему так происходит и что делать?

Не вижу причин чтобы обрезалось. Покажи в каком исходном коде это обрезание происходит.

Freeman · #3 03.12.2013, 04:34

Цитата:

Сообщение от serega6531

Строка обрезается ровно после 2048 символа, я проверил.

Если это командная строка, похоже на системное ограничение длины командной строки. Выход один -- прятать параметры в файл параметров, а в командной строке передавать только его имя.

serega6531 · #4 03.12.2013, 07:38

Нет, в файл нельзя. Код:

Код:

procedure ExecuteMinecraft(MinecraftData: TMinecraftData);
var
  lpDirectory, lpFile, lpParameters: PWideChar;
  si:TStartupInfo;
  pi:TProcessInformation;
begin
  with MinecraftData do
  begin
    lpDirectory := PWideChar(MinePath);
    lpParameters := PWideChar(
                               //'-Dfml.ignoreInvalidMinecraftCertificates=true -Dfml.ignorePatchDiscrepancies=true ' +
                               '-Xms' + Xms + 'm ' +
                               '-Xmx' + Xmx + 'm ' +
                               '-Djava.library.path="' + NativesPath + '" ' +
                               '-cp "' + CP + '" ' +
                               'net.minecraft.client.main.Main ' + LogonInfo
                              {
                               'net.minecraft.launchwrapper.Launch' + LogonInfo +
                               ' --tweakClass cpw.mods.fml.common.launcher.FMLTweaker'
                              }
                              );
    lpFile := PWideChar(Java + '\javaw.exe');
  end;
  ShellExecuteW(0,nil,lpFile,lpParameters,lpDirectory,SW_SHOWNORMAL);
  //CreateProcessW(PWideChar('"' + MinecraftData.Java + '\javaw.exe"'),lpParameters, nil, nil, false, NORMAL_PRIORITY_CLASS,nil, nil, si, pi);
 
end;
 
procedure PlayMinecraft(servername:string;auth:TAuthManager);
var
  FileList: TStringList;
  I: Word;
  CP: string;
  MinecraftData: TMinecraftData;
begin
  FileList := TStringList.Create;
  CheckFolder(settings.MinecraftDir+'libraries\', '*.jar', FileList);
  CheckFolder(settings.MinecraftDir+'dists\' + servername + '\', '*.jar', FileList);
  CP := '';
  for I := 0 to FileList.Count - 1 do
  begin
    CP := CP + FileList.Strings[i] + ';';
  end;
  MinecraftData.Minepath := settings.MinecraftDir;
  MinecraftData.Java := getJavaPath();
  MinecraftData.Xms := settings.MinMem;
  MinecraftData.Xmx := settings.MaxMem;
  MinecraftData.NativesPath := settings.MinecraftDir + 'dists\' + servername + '\natives';
  MinecraftData.CP := CP;
  MinecraftData.LogonInfo := '--username ' + auth.getLogin() + ' ' +
                             '--session ' + auth.getParams() + ' ' +
                             '--version 1.6.4 ';
  ExecuteMinecraft(MinecraftData);
  FreeAndNil(FileList);
  ExitProcess(0);
end;

Как раз lpParameters и обрезается.

M.A.D.M.A.N. · #5 03.12.2013, 07:50

Путь до папки майнкрафта полный задается? Вроде бы можно так написать: %APPDATA%\.minecraft

serega6531 · #6 03.12.2013, 07:55

Не уверен, могу попробовать позже

Alegun · #7 03.12.2013, 09:32

Вроде наблюдается лишнее преобразование типов, например

Код:

1	`lpParameters :=` `PWideChar(...);`

эта переменная и так уже заявлена как указатель, попробуйте убрать общее приведение, а если это всё же необходимо относительно других переменных, то тогда лучше так

Код:

1	`lpParameters :=` `'-Xms'` `+` `PWideChar(Xms) +` `'m '+` `PWideChar(LogonInfo);`

есть подозрение что косяк в этом

Добавлено позже

Плохой совет, не проверив ляпнул, извнт. Всё вроде сложнее - это одна из хреновостей делфи при работе с UNICODE. Получилось так, принимается что Xms и LogonInfo типа string

Код:

lpParameters := PWideChar('-Xms' + WideString(Xms) + 'm ' + WideString(LogonInfo));

а иначе "Suspicious typecast String to PWideChar" вылазит с обрезкой строки

poli-smen · #8 03.12.2013, 10:47

Цитата:

Сообщение от serega6531

Нет, в файл нельзя. Код:

Код:

.....
  ShellExecuteW(0,nil,lpFile,lpParameters,lpDirectory,SW_SHOWNORMAL);
  //CreateProcessW(PWideChar('"' + MinecraftData.Java + '\javaw.exe"'),lpParameters, nil, nil, false, NORMAL_PRIORITY_CLASS,nil, nil, si, pi);
.....

Как раз lpParameters и обрезается.

Похоже что такое ограничение действительно есть у ShellExecute - об этом пишет у себя в блоге Реймонд Чен.
Я только что проверил - действительно так и есть.
А вот у CreateProcess ограничение в районе 32768 (тоже проверил) - так что для обхода этого ограничения испльзуй CreateProcess вместо ShellExecute.

UPD.
А вот здесь перевод той статьи из блога Реймонда Чена.

serega6531 · #9 03.12.2013, 16:07

Цитата:

Сообщение от Alegun

Получилось так, принимается что Xms и LogonInfo типа string

Код:

lpParameters := PWideChar('-Xms' + WideString(Xms) + 'm ' + WideString(LogonInfo));

а иначе "Suspicious typecast String to PWideChar" вылазит с обрезкой строки

Код:

1	`...commons\commons-lang3\3.1\commons-lanᤀᓉᥔᓉᖚ`

при

Код:

lpParameters := PWideChar(
                               //'-Dfml.ignoreInvalidMinecraftCertificates=true -Dfml.ignorePatchDiscrepancies=true ' +
                               '-Xms' + WideString(Xms) + 'm ' +
                               '-Xmx' + WideString(Xmx) + 'm ' +
                               '-Djava.library.path="' + WideString(NativesPath) + '" ' +
                               '-cp "' + WideString(CP) + '" ' +
                               'net.minecraft.client.main.Main ' + WideString(LogonInfo)
                              {
                               'net.minecraft.launchwrapper.Launch' + LogonInfo +
                               ' --tweakClass cpw.mods.fml.common.launcher.FMLTweaker'
                              }
                              );

serega6531 · #10 03.12.2013, 17:30

Цитата:

Сообщение от M.A.D.M.A.N.

Путь до папки майнкрафта полный задается? Вроде бы можно так написать: %APPDATA%\.minecraft