Как преобразовать String в PAnsiChar?

← →
rolex (2005-01-30 12:33) [0]

Компилятор ругается "Incompatible types: "Strings" and "PAnsiChar"".
Кусок кода вот: Application.MessageBox("С объекта ""+(CheckListBox1.Items[i2])+"" автоматически
Как преобразовать CheckListBox1.Items[i2] в AnsiChar?

← →
Anatoly Podgoretsky © (2005-01-30 12:34) [1]

Функция PChar

← →
ShimON © (2005-01-30 13:11) [2]

Функция??? :) На мой взгляд - это явное приведение типов.... Или я ошибаюсь??

← →
Anatoly Podgoretsky © (2005-01-30 13:15) [3]

ShimON © (30.01.05 13:11) [2]
Заблуждаешься, именно функция, можешь или протрассировать или проверить следующим образом

S := "";
P := PChar(S);

← →
ShimON © (2005-01-30 13:22) [4]

как тогда объяснишь это..
type PRegMusicInfo = ^RegMusicInfo; RegMusicInfo = packed Record Name : ShortString; Adress : TAdress; Path : ShortString; end; procedure lala; var Music: PRegMusicInfo; begin Path:= PChar(Music^.Path); end;

Ошибка вылезает: Invalid Typecast

← →
ShimON © (2005-01-30 13:24) [5]

Ошибся
В варе, конечно Path: PChar;

← →
Anatoly Podgoretsky © (2005-01-30 13:31) [6]

А тос что это не String, а ShortString, мы говорили про String

← →
Anatoly Podgoretsky © (2005-01-30 13:33) [7]

И не уходи от вопроса [3], что ты сделал что бы проверить саое утвержение - просмотрел исходный код, сделал трассировку примера, прогнал пример и сравнил значение P?

← →
ShimON © (2005-01-30 13:37) [8]

Прогнал, посмотрел - похоже ты прав...

← →
rolex (2005-01-30 15:24) [9]

Всем сапиб! Воспользовался этим:
S := ""; P := PChar(S);
Помогло!

2 ShimON

Делфи - он выдумщик такой при работе со строками.
Помогает просмотр кода по Ctrl_Alt_C после срабатывания брекпоинта на строчке исходного текста, где производится операция со строками.
На некоторой стадии изучения матчасти очень помогает (вышеупомянутый просмотр) в понимании механизмов работы со строками.

2rolex:
тогда уж лучше так Application.MessageBox(PChar("С объекта ""+(CheckListBox1.Items[i2])+"" автоматически

← →
rolex (2005-01-30 18:39) [12]

> JaDS © (30.01.05 16:13) [11]
> 2rolex:
> тогда уж лучше так Application.MessageBox(PChar("С объекта
> ""+(CheckListBox1.Items[i2])+"" автоматически

А я так и сделал. (Я не любитель ненужного кода. Люблю чтобы мои исходники были максимально упрощены, и понятны.)

Как преобразовать String в PAnsiChar? Найти похожие ветки