Registriert seit: 4. Jan 2003
Ort: Sachsen
573 Beiträge
Delphi 5 Professional
|
Re: combobox + Uppercase
9. Jan 2004, 22: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
|