Converter string em Delphi
04/07/2019
0
Abs!
Gxf
Post mais votado
04/07/2019
Olá!
1º declare na Uses do seu form a unit StrUtils, e vc pode usar AnsiReplaceStr ou StringReplace
Exemplo simples:
editData.text := ''07-2018'';
editData2.text := AnsiReplaceStr(editData.text.Text, ''-'', ''/'')) );
E nesse link tem um exemplo que deve te ajudar:
https://www.devmedia.com.br/delphi-stringreplace-como-utilizar-a-funcao-stringreplace-no-delphi/13222
Espero que ajude :)
Elaine Urgal
Mais Posts
05/07/2019
Bruno Guelere
Você pode fazer mais ou menos dessa maneira:
Declare na suas uses SysUtils.TStringHelper.Split;
Depois na sua implementação coloque:
var
MyString: String;
Splitted: TArray<String>;
begin
MyString := 'word:doc,txt,docx';
Splitted := MyString.Split(['-']);
end.
O array ficará com duas posições, somente inverta elas.
05/07/2019
Bruno Guelere
Você pode fazer mais ou menos dessa maneira:
Declare na suas uses SysUtils.TStringHelper.Split;
Depois na sua implementação coloque:
var
MyString: String;
Splitted: TArray<String>;
begin
MyString := 'word:doc,txt,docx';
Splitted := MyString.Split(['-']);
end.
O array ficará com duas posições, somente inverta elas.
Onde ficou o texto de exemplo (word:doc,txt,docx) troque pela sua data (2018-07).
08/07/2019
Gxf
No caso pego a string de um XML e ela é no formato 2018-07. Deu certo a conversão do "-" para a "/", porém para deixar como 07/2018 ao invés de 2018/07, teria como tbm?
Abs.
08/07/2019
Rafael Bosco
var NovaData: UnicodeString; OldData: UnicodeString; begin OldData := '2018-07'; NovaData := FormatDateTime('mm/yyyy', OldData); end
08/07/2019
Gxf
"There is no overloaded version of 'FormatDateTime' that can be called with these arguments"
08/07/2019
Gxf
Clique aqui para fazer login e interagir na Comunidade :)