현재 listbox에 TableName.FieldName들이 들어가 있습니다.
예) AAATable.FirstField
BBBTable.FirstField
CCCTable.FirstField
..
이중에서 FieldName만을 추출해야 하는데 어떻게 해야 할지를
모르겠군여..
우선 제 생각에는 Post함수를 이용해서 '.'의 위치를 파악하고나서
('.'의 위치+1)의 위치부터 copy함수를 이용하면 될거 같은데
안돼더군여..
아시는분 답변 부탁드리겠습니다.
테스트는 못해봤기에 확실한 것은 모르겠지만
뭐 수정해서 쓰면 되겠죠.
일단 첫인수는 문자열을, 두번째 인수는 구분자를 넣어주시면 될 겁니다.
function ExtractChar(Str: String, Ch: Char): String
var
i: Integer;
begin
for i := 1 to Length(Str) do begin
if Str[i] = Ch then begin
Result := Copy(Str, i+1, Length(Str) - i);
Exit;
end;
end;
end;