|
Registriert seit: 3. Jan 2003
Ort: Sachsen
573 Beiträge
Delphi 5 Professional
|
Re: combobox + Uppercase
9. Jan 2004, 21:11
Hallo schniede,
function FU(s : string) : string; // First Uppercase
begin
Result := AnsiUpperCase(copy(s,1,1)) + copy(s, 2, length(s));
end;
mfg
eddy
|